OnRun() IF CREATE(Orologio) THEN BEGIN Orologio.Interval:=3000; Orologio.Enabled(TRUE); END ELSE ERROR('Timer not initialized'); Orologio::Timer(Milliseconds : Integer) MESSAGE('Running ...'); MyReport.USEREQUESTFORM := FALSE; MyReport.RUN; MESSAGE('Running Completed'); Orologio::TimerError(ErrorString : Text[1024]) ERROR(ErrorString);Thanks for support, bye.
Comments