Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Validar Edit (https://www.clubdelphi.com/foros/showthread.php?t=46489)

maru1981 02-08-2007 03:25:45

Validar Edit
 
Hola de nuevo expertos!!. Alguien me podria decir como puedo validar un edit para que no me acepte dejar espacios en blanco y a la vez validar la longitud del campo. Mi base de datos es SQL Server. Gracias por su tiempo. Este es el codigo que introduje, pero me manda un error, es este:

Código:

[Error] Unit1.pas(34): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(35): Missing operator or semicolon

Código:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Edit1.Text = " then
  begin
    Edit1.SetFocus;
    ShowMessage('El campo nombre esta en blanco!');
  end;
end;


Caro 02-08-2007 04:30:28

Hola, te sale el error porque no es una comilla doble, deben ser dos comillas simples, para preguntar por vacio

Código Delphi [-]
 if Edit1.Text='' then

y pon tu codigo en el evento onExit de tu Edit.

Saludos

roman 02-08-2007 04:33:16

A lo que bien comenta Caro, quizá yo añadiría un Trim:

Código Delphi [-]
 if Trim(Edit1.Text)='' then

// Saludos

AzidRain 02-08-2007 05:28:55

Usa un maskedit

maru1981 03-08-2007 01:22:15

gracias!!
 
gracias al fin pude validar cosa sencilla pero cuando estas comenzando todo parece dificil gracias amigos por la ayuda!!


La franja horaria es GMT +2. Ahora son las 20:30:01.

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