_log_entry_error Procedure

Unit
Unit5

Declaration
Procedure _log_entry_error(class_: string; msg_: string; desc_: string);

Implementation

procedure _log_entry_error(class_:String; msg_:String; desc_:String);
begin
if form2.get_ini_params('system','log_file')='1' then begin
   form2._log.Add('[ERR '+DateTimeToStr(now)+'] : Error on Module '+class_+' > '+msg_+' :: '+desc_);
   form2._log.SaveToFile(form2.root+'wikibrowse.log');
end;
End;


HTML generated by Time2HELP
http://www.time2help.com