tGetFer

Clase tGet ampliada.

Hija de
tGet.

Variables

Por herencia tiene las variables de la clase tGet
nClrText	Color del texto en ese momento
nClrPane	Color de fondo en ese momento
nClrFore	Color de texto que se usará cuando no tenga el foco
nClrBack	Color de fondo que se usará cuando no tenga el foco
nClrForeGot	Color de texto que se usará cuando tenga el foco
nClrBackGot	Color de fondo que se utilizará cuando tenga el foco
lContextMenu	Bloquea el botón secundario desde el manejador de eventos, al crear el objeto toma el valor de la variable de clase ::lCntxmnu

Variables de clase

nClrForeDef	Color de texto que se utilizará por defecto para todos los tGetFer cuando tengan el foco
nClrBackDef	Color de fondo que se utilizará por defecto para todos los tGetFer cuando tengan el foco
lCntxmnu	Valor por defecto para bloquear el botón secundario desde el manejador de eventos, al crear el objeto toma el valor de esta variable para cada instancia, por ejemplo, se puede cambiar el valor de esta variable a verdadero cuando se crea un diálogo en el cual no queremos permitir el menú que aparece al dar click con el botón secundario, por defecto tiene valor .f.

Métodos

Por herencia tiene los métodos de la clase tGet
className()	Devuelve "TGET", es importante recordar que debería devolver "TGETFER", pero por compatibilidad no es así.
setColorGot()	Asigna los colores que se utilizarán cuando tome el foco
setColorDefault()	Asigna los colores que se utilizarán cuando no se tenga el foco

Descripción
Es un sustituto para la clase tGet, con la difrencia de:o1. Cambia automáticamente el color cuando toma o pierde el foco.
1. Cambia el color del GET automáticamente al tomar o perder el foco.
2. Permite bloquear el botón secundario del mouse desde el manejador de ventos.
3. El ancho del cursor es delgado cuando el modo insertar está activado y ancho cuando esta desactivado.

IMPORTANTE: Por compatibilidad, esta clase devuelve "TGET" en lugar de "TGETFER" cuando se pregunta el nombre (metodo className()).

Para cambiar el uso de la clase tGet por la clase tGetFer es muy facil, si la creación del objeto es por funciones, solamente hay que reemplazar tGet por tGetFer, todos los llamados a los métodos son exactamente iguales. Si se definen los GETs por comando, simplemente agregé el archivo qSoft.ch al principio del fuente (o antes del uso de los comandos donde se definen los GETs) y eso es todo.

Métodos

className()
Por compatibilidad devuelve "TGET" en lugar de "TGETFER".
Devuelve: "TGET".

setColorGot( nClrForeGot, nClrBackGot )
Asigna los colores que se utilizarán cuando tome el foco.
Devuelve: nClrBackGot.

setColorDefault( nClrForeDef, nClrBackDef )
Asigna los colores que se utilizarán cuando no se tenga el foco.
Devuelve: nClrBackDef.

Ejemplo

oGet := tGetFer():new( 1, 1, bSETGET( xVar ) )