Fórum Aguarda tecla para continuar... #254630

15/10/2004

0

Delphi

tenho um formulario onde faço alguns calculos e apos os calculos efetuados eu tenho q fechar o formulario so q antes de sair quero mostrar os resultados para o usuario, e gostaria de aguarda confirmacao do usuario para continuar, que ele pressiona-se um <ENTER> tipo o ReadKey do pascal...

valeu i!!!


Dorivansousa

Dorivansousa

Responder

Posts

15/10/2004

Paulo_amorim

Olá

Pode-se colocar no KeyPress um comando Exit;
Assim, quando ele clicar em alguma coisa o Form fechará

Até+


Responder

Gostei + 0

15/10/2004

Marcelo Saviski

vc pode tentar tb algo do tipo:

while GetKeyState(VK_RETURN) >= 0 do ; 
//Só o ";" mesmo, sem nenhum código



Responder

Gostei + 0

15/10/2004

Dorivansousa

funciona assim: eu faço o calculo assim q o usuario confirma o valor de um edit com um enter, no fim do processo eu fecho o formulario so que eu quero pausar para esperar a tecla antes de fechar.


Responder

Gostei + 0

16/10/2004

Rômulo Barros 

...
Public
   byPodeSair : Byte;
...
EventoOnKeyPressDoEdit
Begin
   If(Not(Key In [´0´..´9´]))Then
   Begin
      Inc(byPodeSair);
      If((Key = 13)And(Trim((Sender As TEdit).Text) <> ´´))Then 
      Begin
           Self.Close();
           Repeat
              Application.ProcessMessage();
           Until(byPodeSair = 2);
      End;
   End;
End;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar