Procedure MostraErro;
Begin
ShowMessage('Ocorreu algum erro!');
end;
TForm1.Create;
Begin
Application.OnException:=MostraErro;
end;
Mostrando postagens com marcador Criando uma rotina para pegar todos os erros do programa. Mostrar todas as postagens
Mostrando postagens com marcador Criando uma rotina para pegar todos os erros do programa. Mostrar todas as postagens
terça-feira, 16 de junho de 2009
Assinar:
Postagens (Atom)
