TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Oberdan de Almeida Santos

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Daniel Motta Yampolschi

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Nota
titleAtenção

Atenção: Essa classe é de uso interno.

Por favor verifique a classe TFolder e os componentes padrões, como TGet, TButton e etc... 

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
Classe TWorkspace - Construtores
nopaneltrue

Propriedades

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

Métodos

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

Exemplos

Bloco de código
languagecpp
themeEclipselanguagecpp
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