Da um olhada no componente EurekaLog ... passa até email quando ocorre um erro,
inclusive com a imagem do erro.
Gerson
Ricardo César Cardoso <[EMAIL PROTECTED]> escreveu:
Extraido do Dicas e Truques de Delphi v.2.7:
637 - Função para gerar Log de Erros
function SaveLogError
Extraido do Dicas e Truques de Delphi v.2.7:
637 - Função para gerar Log de Erros
function SaveLogError(Const AUnitError, ASimbolError, ADescription, ATypeError,
ASQLError, AInsError: string): integer;
var
VMemory: TMemoryStatus;
VLogFile: TextFile;
VLogFileName: string;
vcount : Integer;
2 matches
Mail list logo