Saltar de campo sin presionar Enter

[[oscarac]]

buenas tardes
se que he visto esta respuesta en el foro, pero no la encuento
alguien sabe como puedo pasar de un campo cuando este haya llegado al maximo de caracteres permitidos? (Maxlength)

[ecfisa]

Hola oscarac.

Un ejemplo con un TEdit:

Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
  if Length(Edit1.Text) = Edit1.MaxLength then
    Perform(WM_NEXTDLGCTL,0,0);
end;

Lógicamente la propiedad MaxLength debe tener un valor distinto de 0.


Saludos.

[ecfisa]

Hola oscarac.

Aca ando, intrigado si te sirvió la propuesta...

¿ O fué tan mala que ni mejor ni hablar ?

Saludos.

[[oscarac]]

Empezado por ecfisa

Hola oscarac.

Aca ando, intrigado si te sirvió la propuesta...

¿ O fué tan mala que ni mejor ni hablar ?

Saludos.

jejejejeje.....

disculpa mi malcriadez, si me sirvio te lo agradezco, no pude agradecerte antes porque me entrampre en otros "chiches" que queria meterle al programita que estoy haciendo