Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Validar MessageBox (https://www.clubdelphi.com/foros/showthread.php?t=74616)

San29 29-06-2011 00:57:22

Validar MessageBox
 
Hola a todos, quisiera saber si se puede validar el ingreso en un MessageBox.
Lo que yo necesitaría es que el MessageBox reconozca solo letras (tengo que ingresar palabras).
Gracias!!!.

ecfisa 29-06-2011 01:33:19

Hola San29.

En un Edit sería algo como:
Código Delphi [-]
procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
begin
  if not (UpCase(Key) in[#8,'A'..'Z']) then
  begin
    Beep;
    Key:= #0;
  end;
end;

Saludos.


La franja horaria es GMT +2. Ahora son las 05:29:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi