Citat:
captPicard: Šta se nebi QR zatvorio ako se Free poziva odmah nakon Preview a ako forma nije modalna?
Ne bavim se Delphijem, ali imam poneka znanja o VCL-u. Na osnovu koda koji si ostavio, mislim da je greska sto uopste koristis ove dve linije:
QRacun.Free;
Close;
Da li si pokusao samo sa ovakvim kodom:
Code:
procedure TFRacun.cmdSnimiClick(Sender: TObject);
begin
....
QRacun.Preview;
end;
... ili ovakvim:
Code:
procedure TFRacun.cmdSnimiClick(Sender: TObject);
begin
....
QRacun.PreviewModal;
end;
Pogledaj i primere za Preview u Examples folderu Delphija (DBTasks\MastApp i DBTasks\QuickRpt). Nigde ne vidim Free i Close, nakon upotrebe.
To što program radi na X mesta a ne radi na jednom mestu, nemoj da ti bude vodilja. Pretpostavka je preduslov svih zaIeba, a QR je poznat po tome što ima čudno ponašanje kada je memory management u pitanju ;)