procedure TForm2.abfApplicationProperties1Exception(Sender: TObject;
  E: Exception);
begin try
_log_entry('WikiBrowse General runtime error reports : ');
_log_entry_error(E.ClassName,E.Message,'~20000');
except end;End;