Código en Delphi 6, válido para Delphi for win32 y CodeGear RAD Studio (Delphi win32)
Home
Download
Documentos
Links
Historial
Correo

LabelEdit


Este componente tiene el aspecto de una etiqueta (TLabel) pero tiene propiedades de edición, si se hace un doble-click sobre ella se transforma en una caja de edición, al perder el foco el texto de la caja de edición será el texto (caption) de la etiqueta.

Tiene las mismas propiedades, métodos y responde a los mismos eventos que TLabel, pero además tiene lo siguiente :

Propiedades :

Editable : Indica si es posible editar el texto del control o no.
EditStyle : Conjunto de propiedades de la caja de edición que aparece al editar.

Color : Color del fondo de la caja de edición.
WantReturn: Se aceptan o no retornos de carro (varias líneas de texto).
Ctl3D: Forma de presentación de la caja de edición.
MinWidth: Anchura mínima de la caja de edición.
MinHeight: Altura mínima de la caja de edición
BorderStyle: Borde. (bsSingle, bsNone).
Font: Fuente.
MaxLength: Lóngitud máxima del texto.

Métodos :

Edit: Muestra la caja de edición para cambiar el texto del control.
Close : Cierra la caja de edición y muestra la etiqueta (Label)

Eventos :

Tiene los mismos evettos que el componente label y además los siguientes 4 eventos del componente TEdit : OnChange, OnKeyDown, OnKeyUp, OnKeyPress y dos eventos nuevos. Estos dos eventos tienen la siguiente firma (sender:TObject;var TextEdit:String);
Sender es el propio control y TextEdit es el texto que se va a pasar de la caja de edición al control y viceversa.

OnPostEdit : Salta después de editar el texto, pero antes de asignarlo.
OnPreEdit : Salta antes de editar el texto.