Şirket içindeki şubelerdeki envanter yönetimini sağlamak için bir program geliştiriyorum. Bir şubeden diğerine taşınan malın mukavelesini QuickReport'la geliştirdim. Program MDI kullanarak çalışıyor ve Formları kullanım anında yarattırıyorum. Ancak Raporu basacağımda QReport Formunu yarattırıp PreviewModal ile açtıramıyorum.
s.a.
açtıramıyorum derken hiç bir hareket olmuyormu yoksa rapor geliyor ama modal mı olmuyor. yoksa boş bir rapor mu geliyor.
previewmodal yapmadan önce qr nin dataset bağlantısını manuel atayın bi.
kolay gelsin.
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
aslangeri sorunu çözdüm, bazı kodları başka yere aldım (Create ve Preview dışındakileri). Bu defa da rapor ilk sefer çalışınca görülüyor, diğer çalışmalarında görünmüyor.
trace edince herhangi bir sorun görünmüyor. çünkü ilk raporu başarıyla veriyor. 2. rapordan itibaren boş sayfa geliyor. QReport1'in bulunduğu formun OnClose event'i şu şekilde:
procedure TfrDocument.FormClose(Sender: TObject; var Action: TCloseAction);
var
i: integer;
begin
try
for i := Screen.FormCount - 1 downto 0 do
if Screen.Forms[i].ClassName = 'TQRStandardPreview' then
begin
Screen.Forms[i].Close;
end;
except
ShowMessage('Please close all existing reports');
end;
//Action := caFree;
end;