TPaintPanel:AddShape

Adiciona um container ou um shape ao painel.

Sintaxe

AddShape( < cTextParser > )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
cTextParser	caractere	Indica o texto que contém o construtor. Para mais informações, consulte a área Observações..	X

Observações

Exemplo da criação do Shape

oPanel:addShape("id=1;type=1;left=4;top=4;width=1000;height=340;gradient=1,0,0,0,0,0.0,#D0CEBC;"+;"pen-width=1;pen-color=#ffffff;can-move=0;can-mark=0;is-container=1;")

Detalhes da criação dos Subpainéis(containers) e Shapes.

Parâmetro	Descrição
can-deform	Permite movimentar o shape dentro de seu container de origem. Exemplo: `can-deform=1` (permite movimentação) e `can-deform=0` (não permite movimentação).
can-mark	Permite mudar a cor do shape quando o ponteiro do mouse estiver posicionado sobre o objeto. Exemplo: `can-mark=1` (muda a cor) e `can-mark=0` (não muda a cor).
can-move	Permite movimentar o shape: Exemplo: `can-move=1` (permite movimentação) e `can-move=0` (não permite movimentação). Importante: caso o parâmetro is-container for informado, o can-move é ignorado pois containers não podem ser movidos.
cross_color	Opção disponível em build igual ou superior à 120420A. Habilita a exibição da posição de alinhamento do shape, através de um conjunto de linhas, vertical e horizontal. Exemplo: `oPanel:addShape("CROSS_COLOR=#808080;"))` A posição default do conjunto de linhas é a mesmo posição do mouse no decorrer do arrasto, para alterar a posição da exibição das linhas consulte o item cross_position. Importante: este método é obsoleto em builds de versão superior a 121227P, por favor utilize o método AddCommand neste caso.
cross_position	Opção disponível em build igual ou superior à 120420A. Define a posição de exibição do conjunto de linhas para alinhamento do shape. 0=Posição do mouse no decorrer do arrasto. 1=Posição à esquerda e superior do shape durante o arrasto. Exemplo: `oPanel:addShape("CROSS_POSITION=1;")` Importante: este método é obsoleto em builds de versão superior a 121227P, por favor utilize o método AddCommand
font	[Apenas para Shape TEXT] Indica a fonte que será definida para o shape. Sintaxe: `font=[nome],[tamanho],[negrito],[italico],[alinhamento(1=Esq/2=Dir/3=Centro)]` Exemplo: `font=arial,14,0,0,1`
from-left	[Apenas para os Shapes LINE e TRACE] Indica a posição à esquerda inicial.
from-top	[Apenas para os Shapes LINE e TRACE] Indica a posição ao topo inicial.
gradient	Indica o efeito de Gradiente do shape. Para mais informações de todos os tipos de gradientes, consulte o texto Entendendo o Gradient e Gradient-hover. A aplicação de transparencia para o gradient foi implementada na build 7.00.111010P, a definição é feita a partir da cor, aplicando o alpha-blend que tem o interválo de 0 (Totalmente transparente) à 255 (Sólido) Exemplo: `gradient=1,0,0,0,0,0.0,#800000120`
gradient-hover	Indica o efeito de Gradiente do shape quando o ponteiro do mouse estiver posicionado sobre o objeto. Importante: Um shape is-container não pode receber esta propriedade. A aplicação de transparencia para o gradient foi implementada na build 7.00.111010P, a definição é feita a partir da cor, aplicando o alpha-blend que tem o interválo de 0(Totalmente transparente) à 255(Sólido) Exemplo: `gradient-hover=1,0,0,0,0,0.0,#800000120`
height	Indica a altura do shape.
Id	Indica o ID do objeto. Esse ID será definido na criação do shape pelo desenvolvedor. Importante: Em builds iguais ou superiores à 120420A, caso um ID seja preenchido com o mesmo ID de um outro shape já existente, os componentes serão tratados como um só, tornando-se "compostos". Desta forma ao mover um shape, todos seus "filhos" serão movidos juntamente com ele.
image-file	[Apenas para o Shape IMAGE] Indica o caminho físico para o arquivo. Sintaxe: `image-file=c:/dir/image.png` Importante: Em builds superiores a 111010P foi disponibilizado a opção para inserção de imagens compiladas no repositório, utilizando a TAG rpo:, sempre em minusculo Exemplo: `oPanel:addShape("id=1;type=8;left=16;top=16;width=50;height=50;image-file=rpo:image.png;")`
is-container	Indica se o shape pode receber outros shapes dentro dele. Exemplo: `is-container=1` (recebe shapes) e `is-container=0` (não recebe shapes) . O conceito desta propriedade é que o shape sirva de "pai" para outros shapes. Com isso, é possível que alguns shapes só possam mudar de lugar quando for movido para um container diferente. Importante: Um shape is-container não pode receber a propriedade gradient-hover. Importante: Este argumento ignora o can-move, um container nunca pode ser movido.
large	[Apenas para o Shape LINE] Indica a altura da linha.
left	Indica a posição à esquerda onde o shape será criado.
pen-color	Indica a cor do traço do shape. A aplicação de transparencia para o traço foi implementada na build 7.00.111010P, a definição é feita a partir da cor, aplicando o alpha-blend que tem o interválo de 0(Totalmente transparente) à 255(Sólido). Exemplo: `pen-color=#ffffff120`
pen-width	Indica a largura do traço do shape.
polygon	[Apenas para o Shape POLYGON] Indica os pontos para desenhar o polígono. Sintaxe: `polygon=Left:Top,Left:Top,...` Exemplo: `polygon=270:310,370:210,470:310`
rotate	[Apenas para o Shape TEXT] Permite aplicar um ângulo de inclinação. Para builds superiores a 111010P. Importante: Ao aplicar esta TAG o shape automáticamente se tornará estático, e não permitirá movimentação.
start-angle	[Apenas para o Shape ARC] Indica o ângulo inicial do arco.
sweep-length	[Apenas para o Shape ARC] Indica o ângulo do shape em graus.
text	[Apenas para o Shape TEXT] Indica o texto que será apresentado no shape.
text-is-hint	Indica que o texto do shape será apresentado na forma de dica de contexto (hint).
to-left	[Apenas para os Shapes LINE e TRACE] Indica a posição à esquerda final.
to-top	[Apenas para os Shapes LINE e TRACE] Indica a posição ao rodapé final.
tooltip	Indica a mensagem, do tipo dica de contexto (tooltip/hint), que será apresentada ao posicionar o ponteiro do mouse
top	Indica a posição ao topo.
type	Indica o tipo de shape que será criado. Tipo: Objeto 1:Rect 2:RectRounded 3:Ellipse 4:Arc 5:Polugon 6:Line 7:Text 8:Image 9:Trace Exemplo: `oPanel:addShape("id=1;type=1;...`
width	Indica a largura do shape.

Entendendo o Gradient e Gradient-hover

O Gradient define a cor de fundo do shape. São dois os tipos de Gradiente, sendo o 1=Linear, que pode ser utilizado para qualquer tipo de objeto, e 2=Radial, que deve ser utilizado apenas em objetos circulares como o Elipse(Type=3) e o Arc(Type=4).

Sintaxe: gradient=[type],[left-color],[top-color],[right-color],[bottom-color],[percent-color01],[color01],[percent-color02],[color02],[percent-color03],[color03]

Tipo	Objetivo
type	1=Linear / 2=Radial
left-color	Indica a posição à esquerda onde a cor deve ser aplicada.
top-color	Indica a posição ao topo onde a cor deve ser aplicada.
right-color	Indica a posição à direita onde a cor deve ser aplicada.
bottom-color	Indica a posição ao rodapé onde a cor deve ser aplicada.
percent-color01	Indica o decimal que representa o percentual de variação da aplicação da cor, iniciando em 0.0 e terminando em 1.0.
color01	Indica a cor aplicada ao percentual acima.
percent-color02	Indica o decimal que representa o percentual de variação da aplicação da cor, iniciando em 0.0 e terminando em 1.0.
color02	Indica a cor aplicada ao percentual acima.
percent-color03	Indica o decimal que representa o percentual de variação da aplicação da cor, iniciando em 0.0 e terminando em 1.0.
color03	Indica a cor aplicada ao percentual acima.

Exemplos

#include "TOTVS.CH"
User Function TPaintPanel()
DEFINE DIALOG oDlg TITLE "Exemplo - TPaintPanel" FROM 180,180 TO 550,700 PIXEL
// Cria o objeto principaloPanel := TPaintPanel():new(0,0,300,200,oDlg)
//--------------------------------------------------------------------------------------------------
// Define os blocos de codigo com eventos de Mouse
//--------------------------------------------------------------------------------------------------
// EVENTO DE RELEASE(SOLTAR) BOTÃO ESQUERDO DO MOUSE APÓS ARRASTO DO SHAPEoPanel:blClicked := {|x,y| alert("Release(Soltar)botão esquerdo - x:"+; strZero(x,5)+' - y:'+strZero(y,5)+; " - ShapeAtu:"+strZero(oPanel:ShapeAtu,3)+; " - FrameAtu:"+strZero(oPanel:FrameAtu,3) ) }
// EVENTO DE CLIQUE COM BOTÃO DIREITO DO MOUSEoPanel:brClicked := {|x,y| alert("Clique com botão direito - x:"+strZero(x,5)+' - y:'+strZero(y,5)+; " - ShapeAtu:"+strZero(oPanel:ShapeAtu,3)+; " - FrameAtu:"+strZero(oPanel:FrameAtu,3) ) }
// EVENTO DE CLICAR DUAS VEZES COM BOTÃO ESQUERDO DO MOUSE
oPanel:blDblClick := {|x,y| alert("Clique duas vezes com botão esquerdo- x:"+strZero(x,5)+; " - y:"+strZero(y,5)+; " - ShapeAtu:"+strZero(oPanel:ShapeAtu,3)+; " - FrameAtu:"+strZero(oPanel:FrameAtu,3) ) }
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Container do tipo Retângulo - Type=1
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=0;type=1;left=0;top=0;width=270;height=400;"+; "gradient=1,0,0,0,0,0.0,#D0CEBC;pen-width=1;"+; "pen-color=#ffffff;can-move=0;can-mark=0;is-container=1;")
oPanel:addShape("id=1;type=1;left=272;top=0;width=270;height=400;"+; "gradient=1,0,0,0,0,0.0,#B0B7E0;pen-width=1;"+; "pen-color=#ffffff;can-move=0;can-mark=0;is-container=1;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona retângulo ovalado - Type=2
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=2;type=2;left=4;top=4;width=140;height=080;"+; "gradient=1,0,0,0,0,0.0,#CCE2CB;pen-width=1;"+; "pen-color=#ff00ff;can-move=0;can-mark=0;is-blinker=1;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona elipse - Type=3
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=3;type=3;left=4;top=90;width=140;height=080;"+; "gradient=1,0,0,0,0,0.0,#EF8F8F;pen-width=1;"+; "pen-color=#ff00ff;can-move=0;can-mark=0;is-blinker=1;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona gráfico Pizza - Type=4
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=4;type=4;start-angle=90;sweep-length=200;left=04;"+; "top=180;width=100;height=100;gradient=2,050,050,070,-1,0.2,"+; "#ffffff,0.8,#67FF67,1.0,#000000;gradient-hover=2,050,050,"+; "070,-1,0.2,#ffffff,0.8,#C6FF9F,1.0,#000000;tooltip=Pizza 01;"+; "pen-width=1;pen-color=#000000;can-move=1;can-mark=1;is-container=0;")
oPanel:addShape("id=5;type=4;start-angle=290;sweep-length=120;left=04;top=180;"+; "width=100;height=100;gradient=2,050,050,070,-1,0.2,#ffffff,0.8,"+; "#67FF67,1.0,#000000;gradient-hover=2,050,050,070,-1,0.2,#ffffff,"+; "0.8,#C6FF9F,1.0,#000000;tooltip=Pizza 02;pen-width=1;"+; "pen-color=#000000;can-move=1;can-mark=1;is-container=0;is-blinker=1;")
oPanel:addShape("id=6;type=4;start-angle=410;sweep-length=040;left=04;top=180;"+; "width=100;height=100;gradient=2,050,050,070,-1,0.2,#ffffff,0.8,"+; "#67FF67,1.0,#000000;gradient-hover=2,050,050,070,-1,0.2,#ffffff,"+; "0.8,#C6FF9F,1.0,#000000;tooltip=Pizza 03;pen-width=1;"+; "pen-color=#000000;can-move=1;can-mark=1;is-container=0;is-blinker=0;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Polígono - Type=5
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=7;type=5;polygon=280:04,310:085,280:085;gradient=1,0,0,0,0,0.0,#ff0000;"+; "gradient-hover=1,0,0,0,0,0.0,#ffff00;tooltip=Poligono;pen-width=1;"+; "pen-color=#000000;can-move=1;can-mark=1;is-container=0;is-blinker=01;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Linha - Type=6
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=8;type=6;gradient=1,0,0,0,0,0.0,#134E8D;tooltip=Linha 01;pen-width=1;"+; "pen-color=#000000;can-move=1;can-mark=1;large=1;from-left=280;from-top=90;"+; "to-left=400;to-top=90;")
oPanel:addShape("id=9;type=6;gradient=1,0,0,0,0,0.0,#E88C23;tooltip=Linha 02;pen-width=1;"+; "pen-color=#FF0000;can-move=1;can-mark=1;large=10;from-left=280;from-top=100;"+; "to-left=400;to-top=100;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Texto - Type=7
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=10;type=7;pen-width=1;font=arial,14,0,0,1;left=280;top=130;width=580;"+; "height=420;text=Teste de Texto...;gradient=0,0,0,0,0,0,#000000;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Imagem - Type=8
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=11;type=8;left=280;top=180;width=100;height=100;"+; "image-file=c:/dir/image.png;tooltip=Figura Teste;can-move=1;is-blinker=1;")
//--------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------
// Adiciona Linha (Trace) - Type=9
//--------------------------------------------------------------------------------------------------
oPanel:addShape("id=12;type=9;from-left=20;from-top=300;to-left=200;to-top=350;pen-width=1;pen-color=#000000;")
//--------------------------------------------------------------------------------------------------
ACTIVATE DIALOG oDlg CENTERED
Return

Árvore de páginas