Hola a tod@s:
Después de muchos años programando en Delphi 5, me he llevado una sorpresa sobre el funcionamiento del component TEdit. Para verlo mejor, inicia un nuevo proyecto y coloca dos componentes TEdit sobre un form.
Al comopnente TEdit2 le asignamos la propiedad ReadIOnly a true.
Ahora, en el evento OnExit del TEdit1 escribimos el siguiente código:
Código Delphi
[-]
ShowMessage('Hola');
Edit2.ReadOnly:=False;
Edit2.SetFocus;
Ahora ejecutamos el programa. Hay dos modos de pasar de un TEdit a otro: tecla tab, o ratón. Si utilizamos la tercla tab, todo funciona según lo esperado. Sin embargo, si utilizamos el ratón, después de responder a ShowMessage, no podemos ecribir en TEdit2. ¿Alguna solución?