| _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; |
|
|