ZReport kağıda yazdığında nasıl anlarım ?

Salih · Mesaj gönderen **Salih** » 25 Eki 2004 11:59

Merhaba,

FtrForm isimli formda yazılacak kayıtları seçtik, 'Yazdır' butonuna basınca

ZRprFrmIrs := TZRprIrs.Create (Application);

ile rapor formuna geçtik, kullanıcı burada Print tuşuna basıp da raporu yazdırırsa, FtrForm formuna döndüğünde bazı kayıtları update etmem lazım. Kullanıcı kağıda yazdı mı, yoksa Preview a bakıp döndü mü, nasıl anlarım ?

Mesaj gönderen **mege** » 25 Eki 2004 12:18

bildiğim kadarıyla böyle bir seçenek yok.

zreportun kodları beraberinde geliyor, kendin print fonksiyonunda böyle bir modifikasyon yapabilirsin. eğer fonkisiyona girdi ise ana programa formun kapanışında bir değer gönderirsin.

Mesaj gönderen **mege** » 25 Eki 2004 12:23

yok yanılmışım

Kod: Tümünü seç

    property OnPrintFinish : TNotifyEvent read fOnPrintFinish write fOnPrintFinish;

şöyle bir event varmış.. onu bir kurcala zreport.pas da

Salih · Mesaj gönderen **Salih** » 25 Eki 2004 01:54

Çok teşekkürler, inceleyeyim bir ara. Şimdilik Zreport PrintFinish procedure u ile hallettim olayı. Nasıl yaptığımı yazayım da, belki bizden sonra Zreport'la uğraşanların işine yarar. !

Kod: Tümünü seç

procedure TZrprFrmIrsaliye.ZRComposite1PrintFinish(Sender: TObject);
begin
  SP_IRS_YAZILDI.ParamByName('IRSNO').AsInteger :=  Strtoint(FTRUNIT.yazilanirs);
  SP_IRS_YAZILDI.ExecProc;
end;