Pasar al siguiente control

[jcheco]

Hola amigos

Me gustaría saber cómo puedo pasar al siguiente control al sobrepasar la capacidad especificada para un Edit en su propiedad MaxLength.

También quisiera saber cómo hacerlo con un DateTimePicker al terminar de escribir una fecha de forma manual.

Un saludo y gracias.

[[Bicho]]

Hola jcheco que tal?

Yo antiguamente usaba para pasar de control la función SelecNext, pero ahora me inclino más por usar la siguiente

Código Delphi [-]
SendMessage(GetParentForm(self).Handle, WM_NEXTDLGCTL, 0, 0);

ésto lo incluyes dentro del evento OnChange del Edit en el que estés. Supongo que si lo pones en el mismo evento del componente DateTimePicker servirá, sino para éste último prueba a ponerlo en el evento OnClick

Espero te sirva de ayuda

Saludos y felices fiestas

[Fernando]

Hola Delphifílicos:

Perform(WM_NEXTDLGCTL, 0, 0);

Saludos.