If I show preview and do not print report then do not save expire_date_card in database

rbuser

Dear friends,

I have RB 10.09 pro. And Delphi 7 in windows XP.
I'd like show in preview time expire_date_card to IncYear(Today,3)+2 and
if print complete finished then save in database.
If I show preview and do not print report then do not save in database
(I have old expire_date_card).
Where event of report I must be write below codes.
MainForm.ADOTable1.Edit;
MainForm.ADOTable1.FieldByName('expire_date_card').AsDateTime := IncYear
(Today,3)+2;
MainForm.ADOTable1.post;


Regards,

Ali Abbasi

Best regards,

Ali Abbasi

--- posted by geoForum on http://delphi.newswhat.com

nicocizik

Hi Ali,

Try using the Report.OnEndPage event to update you database.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

nardmoseley

http://www.digital-metaphors.com/rbWiki/Output/Printer/Detecting_Whether_Report_Printed_to_Printer

--
Nard Moseley
Digital Metaphors
www.digital-metaphors.com