restringir ingreso de datos!!

[ezequiel913]

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]

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]

gracias Ecfisa me funciono muy bien!!

saludos