Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/6062824/tecnologia.css
Portuguese
Pagetitle
TWorkspace
TWorkspace

Cria um objeto que permite receber janelas do tipo tDialog.

Hierarquia

  • TSrvComponent
    • TSrvObject
      • TCustomWindow
        • TWorkspace

Construtores

Inclusão de trecho
Classe TWorkspace - Construtores
nopaneltrue
Classe TWorkspace - Construtores

Propriedades

Inclusão de trecho
Classe TWorkspace - Propriedades
nopaneltrue
Classe TWorkspace - Propriedades

Métodos

Inclusão de trecho
Classe TWorkspace - Métodos
nopaneltrue
Classe TWorkspace - Métodos

Exemplos

Bloco de código
themeEclipse
languagecpp
titleExemplo 1
linenumberstrue
 #include "TOTVS.CH"

 USER FUNCTION TWorkSpace()

 DEFINE DIALOG oDlg TITLE "Exemplo TWorkSpace" FROM 180,180 TO 550,700 PIXEL
 oWSpaceFolder := TWorkspaceFolder():New(oDlg,0,0,260,184)

 oWSpace1 := TWorkSpace():New( " Totvs 10-Aba 01 ", oWSpaceFolder)
 oWSpace1:SetStatusBarText("Texto da barra de status 01")

 oWSpace2 := TWorkSpace():New( " Totvs 10-Aba 02 ", oWSpaceFolder )
 oWSpace2:SetStatusBarText("Texto da barra de status 02")

 ACTIVATE DIALOG oDlg CENTERED ON INIT LoadForm()

 RETURN


 STATIC FUNCTION LoadForm()

 oDlg1 := TDialog():New(0,0,200,200,"Window",,,,,,,,oWSpace2,.T.)
 oDlg1:Activate(,,,.T.,{||.T.},,{||} )

 RETURN

Abrangência

TOTVS Application Server

Veja também

TWorkspaceFolder