COMO FECHAR UM FORMULARIO DEPOIS DE EXIBIR UMA MENSAGEM DE ERRO ?
if FileExists(EREL.Text)=false then begin
ShowMessage('Erro Ao Localizar: '+EREL.Text);
end;
O que eu coloco no if para fechar a tela depois dessa mensagem ser apresentada ?
Desdejá agradeço !
ShowMessage('Erro Ao Localizar: '+EREL.Text);
end;
O que eu coloco no if para fechar a tela depois dessa mensagem ser apresentada ?
Desdejá agradeço !
Rodrigo Oliveira
Curtidas 0
Melhor post
Mateus Ribeiro
13/12/2016
Boa tarde! Tente isso...
if not FileExists(EREL.Text) then
begin
ShowMessage('Erro Ao Localizar: ' + EREL.Text);
Close;
end;
GOSTEI 1
Mais Respostas
Raimundo Pereira
13/12/2016
Para fechar o form >> Tform1.close ou Close
Para Finalizar aplicação >> application.terminate
Então basta colocar depois da mensagem
ShowMessage('Erro Ao Localizar: '+EREL.Text);
Para Finalizar aplicação >> application.terminate
Então basta colocar depois da mensagem
ShowMessage('Erro Ao Localizar: '+EREL.Text);
GOSTEI 0
Rodrigo Oliveira
13/12/2016
está gerando o formulario do mesmo jeito
GOSTEI 0
Rodrigo Oliveira
13/12/2016
if FileExists(EREL.Text)=false then begin
ShowMessage('Erro Ao Localizar: '+EREL.Text);
PostMessage(Handle, WM_CLOSE, 0, 0);
exit;
end;fiz assim e deu certo
GOSTEI 0