import.css=/download/attachments/6062824/tecnologia.css |
Cria um objeto do tipo barra de divisão.
#include "TOTVS.CH" User Function TSplitter() DEFINE DIALOG oDlg TITLE "Exemplo TSplitter" FROM 180,180 TO 550,700 PIXEL oSplitter := tSplitter():New( 01,01,oDlg,260,184 ) oPanel1:= tPanel():New(322,02," Painel 01",oSplitter,,,,,CLR_YELLOW,60,60) oPanel2:= tPanel():New(322,02," Painel 02",oSplitter,,,,,CLR_HRED,60,80) oPanel3:= tPanel():New(322,02," Painel 03",oSplitter,,,,,CLR_HGRAY,60,60) ACTIVATE DIALOG oDlg CENTERED Return |
Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server