Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
Pagetitle |
---|
...
...
|
...
|
Cria
...
um
...
objeto
...
do
...
tipo
...
paleta
...
de
...
cores.
Hierarquia
...
...
- TColorTriangle
Construtores
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Métodos
Inclusão de trecho | ||||||
---|---|---|---|---|---|---|
|
Exemplos
Bloco de código | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
#include "TOTVS.CH"
User Function xCorTrig
Local CreateMétodo construtor da classe.TColorTriangle(): Create ( [ oWnd] ) --> oObjeto
oObjeto
oTColorTriangle := tColorTriangle():Create( oDlg ) NewMétodo construtor da classe.TColorTriangle(): New ( [ nRow], [ nCol], [ oWnd], [ nWidth], [ nHeight] ) --> oObjeto
oObjeto
oTColorTriangle := tColorTriangle():New(100,01,oDlg,200,80) RetColorRetorna uma representação numérica do RGB (Red, Green e Blue) da cor.TColorTriangle(): RetColor ( ) --> nRet nRet
Observações
oTColorTriangle:RetColor() // Result: 3788455 SetColorDefine o RGB (Red, Green e Blue) da cor que será utilizada.TColorTriangle(): SetColor ( [ nColor] ) -->
oTColorTriangle:SetColor( CLR_BLUE ) SetColorIniDefine a cor RGB (Red, Green e Blue) inicial.TColorTriangle(): SetColorIni ( [ nColor] ) -->
oTColorTriangle:SetColorIni( CLR_HRED ) SetSizeTriangleDefine o tamanho do triângulo de configuração.TColorTriangle(): SetSizeTriangle ( [ nWidth], [ nHeight] ) -->
nColorIni := CLR_ HREDoTColorTriangleHRED:= tColorTriangle():Create( oDlg)oTColorTriangle:SetColorIni( nColorIni )oTColorTriangle:SetSizeTriangle( 300, 300 )Exemplo do método SetSizeTriangle
#include "TOTVS.CH" User Function xCorTrig //TColorTriangle() Local nColorIni := CLR_HRED DEFINE DIALOG oDlg TITLE "Exemplo TColorTriangle" FROM 180,180 TO 550,700 PIXEL // Usando CreateoTColorTriangle1 := DEFINE DIALOG oDlg TITLE "Exemplo TColorTriangle" FROM 180,180 TO 650,800 PIXEL // Usando Create oTColorTriangle1 := tColorTriangle():Create(oDlg ) oDlg ) oTColorTriangle1:SetColorIni( nColorIni) ) // Usando New oTColorTriangle2 := tColorTriangle():New(100,01,oDlg,200,80) oTColorTriangle2:SetColorIni( nColorIni) ACTIVATE DIALOG oDlg CENTERED Return Exemplo da classe TColorTriangle ![]() )
oTColorTriangle2:SetColor(CLR_BLUE)
oTColorTriangle2:SetSizeTriangle( 200, 80 )
ACTIVATE DIALOG oDlg CENTERED
Return
|
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
...