Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 21-09-2007
Avatar de Greco
Greco Greco is offline
Miembro
 
Registrado: jul 2007
Ubicación: Chile
Posts: 97
Poder: 17
Greco Va por buen camino
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.
__________________
Greco - Principiante
Responder Con Cita
  #2  
Antiguo 21-09-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 7.058
Poder: 29
jhonny Va camino a la famajhonny Va camino a la fama
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 .
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita
  #3  
Antiguo 21-09-2007
Avatar de Greco
Greco Greco is offline
Miembro
 
Registrado: jul 2007
Ubicación: Chile
Posts: 97
Poder: 17
Greco Va por buen camino
Cita:
Empezado por jhonny Ver Mensaje
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.
__________________
Greco - Principiante
Responder Con Cita
  #4  
Antiguo 21-09-2007
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Poder: 23
BlueSteel Va por buen camino
Cita:
Empezado por Greco Ver Mensaje
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...
__________________
BlueSteel
Responder Con Cita
  #5  
Antiguo 21-09-2007
Avatar de Greco
Greco Greco is offline
Miembro
 
Registrado: jul 2007
Ubicación: Chile
Posts: 97
Poder: 17
Greco Va por buen camino
Cita:
Empezado por BlueSteel Ver Mensaje
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.
__________________
Greco - Principiante
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
crear mensaje para guardar con campos vacios formularios redimido OOP 1 06-08-2007 20:31:12
Espacios extras en campos CHAR morta71 Firebird e Interbase 2 29-11-2006 21:27:28
DateTime con vacios CamiloU OOP 4 12-01-2006 12:37:34
consultar campos vacios noe SQL 1 21-03-2005 17:35:42
Quitar espacios de campos CHAR cartmanrules Firebird e Interbase 3 22-07-2004 10:53:06


La franja horaria es GMT +2. Ahora son las 15:31:04.


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
Copyright 1996-2007 Club Delphi