TVItem
Fuente: source/classes/vitem.prg
Clase independiente (no hereda de TControl)
TVItem representa un elemento individual dentro de un panel TVMenu. Cada TVItem contiene un caption de texto, bitmap/icono opcional, bloque de accion y propiedades de visualizacion. Al crearse, un TVItem se anade automaticamente al array aItems de su TVMenu padre. TVItem soporta estilos de separador, encabezados de grupo, menus popup, clausulas when y colores personalizados.
Constructor New()
TVItem():New( oParent, cText, cBmp1, cBmp2, lGroup, nClrText, nClrPane,;
nTextAlign, nImgAlign, nHeight, nLeft, separator, nWidth,;
lUnder, nLeftImg, nClrPane2, lVGrad, bAction, oPopup,;
nClrPSel, nClrTSel, lMirGrad, nSteps, cToolTip,;
nColorSep, lIcon, nTop, bWhen, nClrPSel2 )
| Parametro | Tipo | Descripcion |
|---|---|---|
| oParent | TVMenu | Menu padre (requerido) |
| cText | Caracter | Texto del caption |
| cBmp1 | Caracter/Numerico | Ruta de bitmap, nombre de recurso o handle |
| lGroup | Logico | Es encabezado de grupo (por defecto: .f.) |
| nClrText | Numerico | Color de texto personalizado |
| nClrPane | Numerico | Color de fondo personalizado |
| separator | Caracter | "LINE", "SEPARADOR", "INSET", "DOTDOT" |
| bAction | Bloque | Bloque de accion del item |
| bWhen | Bloque | Clausula when (retorna .t. para habilitar) |
Metodos
| Metodo | Retorna | Descripcion |
|---|---|---|
SetImage(cBmp, lIcon) | nil | Establecer imagen desde archivo, recurso o handle numerico |
SetBold(lBold) | Logico | Alternar texto en negrita |
SetDialog(cResName) | nil | Asociar recurso de dialogo |
lOption() | Logico | Es el item seleccionado actualmente |
Ejemplo
local oItem oItem := TVItem():New( oMenu, "Documentos" ) oItem := TVItem():New( oMenu, "Inicio" ) oItem:SetImage( hMiBitmap ) oItem := TVItem():New( oMenu, "" ) oItem:nSeparator := 2