Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Comprobar campos vacios o con espacios... (https://www.clubdelphi.com/foros/showthread.php?t=48299)

Greco 21-09-2007 00:14:00

Comprobar campos vacios o con espacios...
 
Hola, estoy medio confuso en una parte de mi código ya que no se como podria aplicar lo siguiente:

tengo un form el cual tiene algunos Edit y un boton "GUARDAR", dicho boton está desactivado (BtnGuardar.Enabled:=false) y al momento de escribir algo en el EDIT1 el boton pasa a True su propiedad enable y por medio del siguiente codigo tambien verifico si no ha introducido 1 o dos espacios en lugar de algun texto:

Código Delphi [-]
if (Edit1.Text='') OR (Edit1.Text=' ') then
BtnGuardar.Enabled:=False;
(en el evento OnChange del edit1)

Hasta ahi todo bien, mi duda es que si existe alguna otra forma mejor para comprobar que se haya introducido algun texto en el Edit1 ya que como lo estoy haciendo actualmente solo verifica algun cambio en dicho edit y solo combrueba que no se haya agregado 1 o 2 espacios en blanco y podria ir agregando mas "OR (Edit1.Text=' ')" y cada vez mas espacios entre ' y ' pero creo que esa no seria la forma mas prolija de hacerlo.

Saludos.

jhonny 21-09-2007 00:26:31

Hice la siguiente prueba, espero te sirva para lo que necesitas:

Código Delphi [-]
  if Trim(Edit1.Text) = '' then 
  begin
    ShowMessage('En blanco')
  else
    ShowMessage('Lleno');

El trim limpiaria los espacios en blanco y si el resultado es vacio, es porque definitivamente no hay nada ;).

Greco 21-09-2007 00:31:00

Cita:

Empezado por jhonny (Mensaje 232692)
Hice la siguiente prueba, espero te sirva para lo que necesitas:

Código Delphi [-] if Trim(Edit1.Text) = '' then
begin ShowMessage('En blanco')
else ShowMessage('Lleno');


El trim limpiaria los espacios en blanco y si el resultado es vacio, es porque definitivamente no hay nada ;).

Me funcionó perfectamente el código.
Muchas gracias.

BlueSteel 21-09-2007 03:53:49

Cita:

Empezado por Greco (Mensaje 232696)
Me funcionó perfectamente el código.
Muchas gracias.

tambien puedes agregar la condicion de que lo que se introdusca en el Edit no sea un "." (punto), o contar los caracteres que se ingresaron.. y si posee algo de 3 o 4 caracteres cuando el dato que se requiere necesita más.. volver a pedirlo...

Greco 21-09-2007 03:57:11

Cita:

Empezado por BlueSteel (Mensaje 232715)
tambien puedes agregar la condicion de que lo que se introdusca en el Edit no sea un "." (punto), o contar los caracteres que se ingresaron.. y si posee algo de 3 o 4 caracteres cuando el dato que se requiere necesita más.. volver a pedirlo...

Buena opcion...

Gracias.


La franja horaria es GMT +2. Ahora son las 04:45:48.

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