TEdit - Readonly

Jose_Pérez · #1 10-05-2012

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?

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Hacer readonly una columna en stringgrid	zcatzz	Varios	5	26-09-2007 16:59:50
Contar Cantidad de ReadOnly	brandolin	OOP	4	23-01-2006 18:34:12
readonly dataset	n0n3	SQL	13	27-04-2005 01:24:45
Pasar el valor de un TEdit dentro de un StringGrid a otro TEdit que está fuera	atirado	Varios	4	11-09-2004 19:13:48
IBDataSet readOnly????	Giniromero	Conexión con bases de datos	2	01-10-2003 11:14:04