Histórico da Página
...
| Portuguese | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Classe: TWorkSpaceFolderCria um objeto do tipo pasta que recebe um objeto do tipo TWorkSpace.TSrvObject -> TControl -> TWorkSpaceFolder NewMétodo construtor da classe.TWorkSpaceFolder(): New ( [ oWnd], [ nLeft], [ nTop], [ nWidth], [ nHeight], [ uParam6] ) --> oObjeto
oObjeto
oWSpaceFolder := TWorkspaceFolder():New(oDlg,0,0,260,184) SetOptionMuda a aba selecionada.TWorkSpaceFolder(): SetOption ( < nAba> ) -->
oWSpaceFolder:SetOption(2)
#include "TOTVS.CH" User Function TWorkSpaceFolder() DEFINE DIALOG oDlg TITLE "Exemplo TWorkSpaceFolder" FROM 180,180 TO 550,700 PIXEL oWSpaceFolder :=PIXEL oWSpaceFolder := TWorkspaceFolder():New(oDlg,0,0,260,184)
:= {|x,c| Iif( empty( c ), ConOut( "Empty!" ), ConOut( c ) ) } oWSpace1 := TWorkSpace():New( " Totvs 10-Aba 01 ", oWSpaceFolder )
da barra de status 01") ACTIVATE DIALOG oDlg CENTEREDACTIVATE DIALOG oDlg CENTERED Return Exemplo da classe TWorkSpaceFolder Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas