establecer un numero limitado de caracteres
 

hola miembros de Club Delphi. les comento que tengo un form en el cual hay un dbedit que es utilizado para el numero de documento;necesito establecer un control de los datos que se ingresan.lo que deseo saber es como hacer para que solo puedan ingresar si o si 8 digitos(numeros) ya que todos los nº de documento poseen esa cantidad,"no se puede ingresar de menos",ese es el problema que quiero resolver porque lo demas lo tengo echo.
desde ya gracias a todos y espero ansiosa sus respuesta y colaboración.Saludos....

Hola naty_prog.

Podés usar propiedad MaxLength del TDBEdit.

Saludos.

hola, mira,tengo una sentencia echa para esa propiedad para cuando se quiere ingresar mas de 8 digitos, lo que yo necesito es para cuando se ingresa de menos.me sirve igual esta propiedad?
gracias por tu respuesta.

En el evento OnExit:

Código Delphi [-]
If Length(Dbedit1.Text) <  8 then
begin
ShowMessage('Atención. Debe ingresar 8 caracteres.');
DbEdit1.SetFocus;
end;

Un Saludo

Hola naty_prog.

Otra solución puede ser:

Código Delphi [-]
...
 private
    procedure TuCampoSetText(Sender: TField; const Text: String);
 end;
...
implementation

procedure TForm1.FormCreate(Sender: TObject);
begin
  DataSet.FieldByName('CAMPO1').OnSetText :=  TuCampoSetText;
  DataSet.FieldByName('CAMPO3').OnSetText :=  TuCampoSetText;
  // Asignalo a los demás campos en que desees evaluar la condición ( <> 8)
end;

procedure TForm1.TuCampoSetText(Sender: TField; const Text: String);
begin
  if Length(Text) <> 8 then
  begin
    MessageBeep(MB_ICONERROR);
    Abort;
  end;
end;

Asigné el evento TuCampoSetText por código para que sea mas entendible, pero si tenés creados los campos persistentes, podés hacerlo desde el Object Inspector.

Saludos.

hola a todos
 

muchisimas gracias por sus respuestas,no saben la gran ayuda que nos dan a mi compañero de tesis y a mi, ya que no nos dan los tiempos para avanzar con la misma pero hacemos lo que podemos.mis saludos y mejores deseos a todos...hasta luego