CRIAR PROPRIEDADES EM UM OBJETO OU CLASSE

FLAVIO.HFS 24/07/2005 13:38:09
#95810
ae pessoal, como eu faço para criar um objeto e posteriormente suas classes?? Por exemplo, vou fazer um jogo de corrida, ai preciso usar a condição if Carro.Cor = "Azul" then... como eu crio esse objeto Carro e suas propriedades??

Valew!! [S99]
USUARIO.EXCLUIDOS 24/07/2005 14:02:42
#95812
Esse Carro.Cor pode ser propriedade ou simplesmente um campo de um user defined type.

Ex:

Type tpCarro
Corredor as String
Cor as String
End Type

Dim Carro As tpCarro


Daí você poderia referenciar Carro.Cor

Ou então pode ser uma instancia de uma classe

Classe clsCarro.cls

Dim sCor as String

Property Get Cor() as String
Cor = sCor
End Property

Property Let Cor(sNewValue as String)
sCor = sNewValue
End Property


Depende muito do que você queira fazer.
FLAVIO.HFS 24/07/2005 14:33:40
#95813
blz... não sei se tem como, mas será que posso associar esse novo objeto Carro a uma pictureBox por exemplo??

Valew!!
FLAVIO.HFS 24/07/2005 16:19:59
#95821
???
USUARIO.EXCLUIDOS 24/07/2005 16:59:18
#95827
Associar o objeto à  pic é meio complicado, você pode fazer o contrário, associar a pic ao objeto. Basta definir uma propriedade dentro do objeto do tipo PictureBox, e em vez de setar a variável interna com o Let implicito, seta com o Set msm. Dai qualquer referencia basta usar o byref da classe.
FLAVIO.HFS 24/07/2005 21:26:42
#95838
nossa cara, tem como mandar algum exemplo?? sou iniciante e não entendi mto bem..

Valew!!
FLAVIO.HFS 25/07/2005 14:16:15
#95925
??
FLAVIO.HFS 26/07/2005 11:28:17
#96027
oq eu queria fazer mesmo é associar o bojeto a uma pictureBox, por exemplo, ao escrever carro.cor = "Azul", a picture box já carregasse um desenho de um carro azul gravado em um arquivo .res por exemplo... alguém sabe??

Valew!!
Tópico encerrado , respostas não são mais permitidas