Fórum Dúvida sobre o evento show do form #372463
18/07/2009
0
acontece que tenho alguns procedimentos que deve ser executado durante a inicializacao do formulario (onCreate ou onShow) ... tenho usado o onShow
esses procedimentos seguem mais ou menos esse formato
procedure TForm.FormShow(Sender: TObject);
begin
try
// alguns exemplos de procedimentos
carrega_isso;
carrega_aquilo;
habilita_isso;
habilita_aquilo;
except
on Error : Exception do
begin
//trata o erro gerado e informa o usuário que deu erro no formulario
Close;
end;
end;
end;
poiseh, a duvida surge exatamento no close .. que mesmo que ocorra a excessao gerada por alguns daqueles metodos o formulario nao fecha
nao sei se estou fazendo alguma besteira mas nao conseguir fazer funcionar isso
agradeco qualquer ajuda
Tgbtolkki
Curtir tópico
+ 0Posts
18/07/2009
Danielrsanches
try strtoint(´d1´); except on E: Exception do begin MessageDlg(´Erro´+#13+13+E.Message,mtError,[mbOk],0); close; end; end;
post aki o código que está usando ...
abraços !!!
Gostei + 0
18/07/2009
Marco Salles
A unica maneira de fechar um Form em seu Evento OnShow é processando
a mensagem do Windows
postMessage(handle,Wm_Close,0,0)
Gostei + 0
20/07/2009
Tgbtolkki
grato a todos que ajudaram
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)