Contar vcaracteres

[jhcaboverde]

Amigo: si lo que quieres es que cuando llegue al decimo caracter salte a otro edit te mando un ejemplo:

procedure TForm1.DBEdit6Change(Sender: TObject);
begin
if length(dbedit6.text)=6 then
begin
DBEdit6.SelectAll;
dbedit2.setfocus;
end;
end;

espero que te sirva.

Empezado por JoanKa

Yo estoy haciendo algo parecido, pero no puedo obtener el resultado ya que yo quiero validar solo que se me ingrese 10 caracters y cuando llegue al decimo caracter salta a otro edit.

He usado la funcion var_cuenta_dni:=Length(EDT_Nif.Text); y lo puesto dentro del evento keypress y no me lo hace.

COmo puedo hacer esto ??

Gracias y saludos