Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/6062824/tecnologia.css
|
| Pagetitle | ||||
|---|---|---|---|---|
|
...
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Métodos
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Exemplos
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#include "TOTVS.CH"
User Function TPanel()
DEFINE DIALOG oDlg TITLE "Exemplo TPanel" FROM 180,180 TO 550,700 PIXEL
// TFont
oTFont := TFont():New('Courier new',,16,.T.)
// Usando o método New
oPanel:= tPanel():New(01,01,"Teste",oDlg,oTFont,.T.,,CLR_YELLOW,CLR_BLUE,100,100)
// Usando o método Create
oPanel:= tPanel():Create(oDlg,01,102,"Teste",oTFont,.F.,,CLR_YELLOW,CLR_BLUE,100,100)
ACTIVATE DIALOG oDlg CENTERED
Return
|
...
Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server
Referências
A construção de um componente da classe TPANEL() pelo construtor NEW() também pode ser feita através do comando AdvPL @ .. MSPANEL
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas