![]() |
cambiar font en un edit
Hola, me gustaria saber como puedo cambiar el tipo de font, mas concretamente el color, en un edit cuando su propiedad enabled es igual a false. Por defecto al hacer esto, el texto se pone de color gris y yo quiero que siga siendo negro.
Comentar que realmente no estoy usando un edit, sino el currencyedit de las rx, pero vamos, supongo que sera exactamente igual. Gracias. |
A lo mejor te sirve ponerlo en ReadOnly a true y TabStop a false. No es exactamente un Enabled a false, pero lo simula muy bien ;)
|
Gracias por el intento, pero no hace lo que yo quiero que haga.
Realmente el edit lo quiero usar de display, no quiero que el usuario pueda editarlo; es para una calculadora (tipo la de windows) :) |
Cita:
|
A mi lo que me interesa realmente es lo siguiente:
Usar el edit simplemente para visualizar valores. Que el usuario no pueda editar, ni pinchar con el ratón encima para copiar el valor ni nada. Un "se mira pero no se toca" :D . Luego ya le pondré la opción de copiar en el menu. Ah, y perdón por las molestias, que soy un novatillo :P |
Para que no puedan moverse con el raton por ese edit prueba esto:
procedure TFormPrincipal.Edit1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin SetCursorPos(0,0); //Pone el cursor arriba a la izquierda end; Para que no entren en el campo pon el edit con TabStop=False |
Mira yo estos casos los resuelvo con un pequeño truco con el que no pierdo ninguna funcionalidad visual y sin embargo no se puede acceder a él.
Bájate un Tpanel, ponlo Enabled a "False" y ahora coje el Edit córtalo y pégalo encima del tpanel. Reduce de tamaño el Tpanel hasta ajustarlo al edit, ni se nota el tpanel, pero el edit ya hace lo que tu quieres. un Saludo. |
marcoszorrilla mil gracias, eso es exactamente lo que quería hacer. Al fin!!!!!:)
|
La franja horaria es GMT +2. Ahora son las 13:18:36. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi