nTop, nLeftNuméricoObligatorio
Fila y columna de la coordenada inicial del marco.
COMANDOPublicado
@ ... GROUP
@ <nTop>, <nLeft> GROUP <oGroup> TO <nBottom>, <nRight> [LABEL <cLabel>] [OF <oWnd>] [COLOR <nClrText>, <nClrBack>] [PIXEL]Dibuja un marco TGroup con título opcional para organizar visualmente los controles.
Descripción general
El comando @ ... GROUP dibuja un rectángulo de agrupación en la interfaz y puede mostrar un título. Durante la compilación se traduce al constructor New() de la clase TGroup. A diferencia de TPanel o TFolder, TGroup no crea un contenedor: los controles colocados dentro del marco siguen perteneciendo al diálogo, panel o pestaña indicado en sus propios comandos.
Sintaxis
@ <nTop>, <nLeft> GROUP <oGroup> TO <nBottom>, <nRight> [LABEL <cLabel>] [OF <oWnd>] [COLOR <nClrText>, <nClrBack>] [PIXEL]Parámetros
oGroupObjetoObligatorio
Variable que recibe el objeto TGroup creado.
TO nBottom, nRightNuméricoObligatorio
Fila y columna finales, que definen los límites inferior y derecho.
LABEL / PROMPT cLabelCaractereOpcional
Título mostrado en el marco de agrupación.
OF oWndObjetoOpcional
Diálogo, panel, pestaña u otro componente padre donde se dibuja el marco.
COLOR / COLORS nClrText, nClrBackNuméricoOpcional
Color del texto y, opcionalmente, color de fondo del componente.
PIXELCláusulaOpcional
Indica que las coordenadas se expresan en píxeles desde la esquina superior izquierda del componente padre.
Agrupación visual de credenciales
#Include "TOTVS.ch"
User Function ExGroup()
Local oDlg
Local oGroup
Local cUsuario := Space(30)
Local cContrasena := Space(20)
Define Dialog oDlg Title "Acceso" ;
From 100, 100 To 300, 560 Pixel
@ 10, 10 Group oGroup To 90, 250 ;
Label "Credenciales" Of oDlg Pixel
@ 30, 20 Say "Usuario:" Of oDlg Pixel
@ 28, 75 Get cUsuario Size 130, 12 Of oDlg Pixel
@ 58, 20 Say "Contraseña:" Of oDlg Pixel
@ 56, 75 Get cContrasena Size 130, 12 ;
Of oDlg Pixel Password
Activate Dialog oDlg Centered
ReturnResultado esperado
GROUP dibuja el marco. SAY y GET pertenecen directamente a oDlg aunque aparezcan dentro.
Grupo dentro de una pestaña
#Include "TOTVS.ch"
User Function ExGroupFolder()
Local oDlg
Local oFolder
Local oGroup
Local lEnviar := .T.
Define Dialog oDlg Title "Configurações" ;
From 0, 0 To 320, 560 Pixel
@ 10, 15 Folder oFolder Prompts "Notificações" ;
Size 240, 120 Of oDlg Pixel
@ 10, 10 Group oGroup To 75, 210 ;
Label "E-mail" Of oFolder:aDialogs[1] Pixel
@ 30, 20 CheckBox lEnviar Prompt "Enviar confirmação" ;
Size 120, 15 Of oFolder:aDialogs[1] Pixel
Activate Dialog oDlg Centered
ReturnResultado esperado
El marco y CHECKBOX pertenecen a la misma pestaña; oGroup sigue siendo solo un elemento visual.
- Incluye TOTVS.ch para que el compilador reconozca el comando.
- Utiliza GROUP para comunicar que ciertos campos pertenecen a la misma sección.
- Asocia los controles internos al mismo diálogo, panel o pestaña que el grupo, no a oGroup.
- Usa títulos LABEL o PROMPT breves y significativos.
- Deja margen suficiente entre el borde, el título y los controles.
- Informa OF explícitamente para no depender de la ventana activa.
- TGroup no es un contenedor: no utilices OF oGroup para los controles mostrados dentro del marco.
- Las coordenadas TO deben ser mayores que las iniciales para formar un área válida.
- Mezclar PIXEL con otra unidad entre marco y controles puede provocar desalineación.
- Los campos sobre el título o muy próximos al borde reducen la legibilidad.
- Demasiados grupos anidados o decorativos hacen pesada la interfaz.
- Sin OF, el marco se dibuja en la ventana o diálogo activo.