_log_entry Procedure |
Unit
Unit5
Declaration
Procedure _log_entry(data_: string);Implementation
procedure _log_entry(data_:String); begin if form2.get_ini_params('system','log_file')='1' then begin form2._log.Add('[LOG '+DateTimeToStr(now)+'] : '+data_); form2._log.SaveToFile(form2.root+'wikibrowse.log'); end; End; |
|