PH1959
|
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
|
|
Postada em 21/11/2006 13:58 hs
quero criar um controle shape, em runtime, sendo que o mesmo poderá ser um poligono regular ou irregular... não é uma sequencia de linhas e sim um controle onde eu possa alterar as propriedades backcolor forecolor border...etc |
|
|
|
|
|
|
|
Postada em 21/11/2006 22:16 hs
Exemplo: Private shape_User As Shape
Private Sub Command1_Click()
Set shape_User = Controls.Add("Vb.Shape", "Shape_User")
shape_User.Visible = True
shape_User.Left = 0
shape_User.Top = 500 End Sub at+ :) |
|
|
|
PH1959
|
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
|
|
Postada em 21/11/2006 23:40 hs
é quase isso ghost ....veja bem eu preciso ter um shape (ou algo parecido) com outras formas além das existentes ...a vantagem do shape é q ele é mais facil de carregar do q um picture (e é mais rápido para a minha aplicação tb) eu andei vendo ex de forms com outras formas não retangulares ...é quase o q eu preciso... o q eu quero é algo tipo por ex um shape em forma de hexagono ou triangulo ou qqr outra forma livre que eu possa alterar as cores (e espessuras) das bordas e a cor do preenchimento. O idealseria q eu pudesse criá-lo em runtime ..tipo dando as coordenadas e posições dos pontos... |
|
|
|
PH1959
|
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
|
|
Postada em 22/11/2006 15:48 hs
|
|
|
|
