Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   restringir ingreso de datos!! (https://www.clubdelphi.com/foros/showthread.php?t=74060)

ezequiel913 28-05-2011 01:57:02

restringir ingreso de datos!!
 
hola gente!!

bue el problema que tengo es el siguiente:

tengo un edit que permite ingresar solo números y hasta 11 números, ahora lo que quiero es que si no tiene ingresado los 11 caracteres no me deje cargar los datos, osea que me tire una ventana, o que no me deje salir del edit hasta que no ingrese los 11 dígitos.

yo intente con la propiedad MAXLENGTH pero no me funciono, el código me quedo así:

Código Delphi [-]
If (EditCuit.MaxLength <> 11) then begin
      Application.MessageBox('Debe ingresar los 11 digitos del CUIT', 'Error');
      EditCuit.SetFocus;
      Exit;
     End;


bue gracias por su tiempo, saludos!!!

ecfisa 28-05-2011 02:13:59

Hola.

Hacelo de este modo:
Código Delphi [-]
  if Length(Edit1.Text) <>11 then  // o Length(Trim(Edit1.Text))<> 11  si querés eliminar espacios en blanco
  begin
    ....
    Edit1.SetFocus;
    Exit;
  end;

Saludos.

ezequiel913 28-05-2011 02:34:05

gracias Ecfisa me funciono muy bien!!

saludos


La franja horaria es GMT +2. Ahora son las 07:25: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