En effet, cet active x est un bouton, j'ai plusieurs images qui changent au
grès des actions.
Normal, survol, click, disabled ....
Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande
au prog de changer les images, donc en mode exécution, vb6 répond
"Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture
On Error Resume Next
Set PictureN = Image1.Picture
End Property
Public Property Set PictureN(ByVal NewImage1 As Picture)
On Error Resume Next
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Marc
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
- www.gelase.org "Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
Persones n'a d'idée ?
peut être faut il créer une autre propriete sans le type picture ???
contact@gelase.org - www.gelase.org
"Marc" <contact@asubstra.com> a écrit dans le message de news:
e9OThheNKHA.4700@TK2MSFTNGP05.phx.gbl...
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent
au grès des actions.
Normal, survol, click, disabled ....
Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je
demande au prog de changer les images, donc en mode exécution, vb6 répond
"Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai
fait.
Public Property Get PictureN() As Picture
On Error Resume Next
Set PictureN = Image1.Picture
End Property
Public Property Set PictureN(ByVal NewImage1 As Picture)
On Error Resume Next
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
- www.gelase.org "Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
Marc
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
"Marc" a écrit dans le message de news:
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
"Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
Précision utile c'est quand je fais BaButton1.Picture =
ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je
voudrait que mon controle se comporte comme le controle Image1.picture =
ImageList1.ListImages(1).Picture.
"Marc" <contact@asubstra.com> a écrit dans le message de news:
OPBfV3iNKHA.1372@TK2MSFTNGP02.phx.gbl...
Persones n'a d'idée ?
peut être faut il créer une autre propriete sans le type picture ???
"Marc" <contact@asubstra.com> a écrit dans le message de news:
e9OThheNKHA.4700@TK2MSFTNGP05.phx.gbl...
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent
au grès des actions.
Normal, survol, click, disabled ....
Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je
demande au prog de changer les images, donc en mode exécution, vb6 répond
"Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai
fait.
Public Property Get PictureN() As Picture
On Error Resume Next
Set PictureN = Image1.Picture
End Property
Public Property Set PictureN(ByVal NewImage1 As Picture)
On Error Resume Next
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
"Marc" a écrit dans le message de news:
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
"Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
Marc
En fait la propriété créée en type Picture ou ipicturedisp et en lecture seule eu cours de l'exécution, comment peut on la passer en écriture ?
Par avance merci.
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
"Marc" a écrit dans le message de news:
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
"Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
En fait la propriété créée en type Picture ou ipicturedisp et en lecture
seule eu cours de l'exécution, comment peut on la passer en écriture ?
Par avance merci.
Précision utile c'est quand je fais BaButton1.Picture =
ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je
voudrait que mon controle se comporte comme le controle Image1.picture =
ImageList1.ListImages(1).Picture.
"Marc" <contact@asubstra.com> a écrit dans le message de news:
OPBfV3iNKHA.1372@TK2MSFTNGP02.phx.gbl...
Persones n'a d'idée ?
peut être faut il créer une autre propriete sans le type picture ???
"Marc" <contact@asubstra.com> a écrit dans le message de news:
e9OThheNKHA.4700@TK2MSFTNGP05.phx.gbl...
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent
au grès des actions.
Normal, survol, click, disabled ....
Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je
demande au prog de changer les images, donc en mode exécution, vb6
répond "Utilisation incorrecte de la propriété", pourtant elle est
publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai
fait.
Public Property Get PictureN() As Picture
On Error Resume Next
Set PictureN = Image1.Picture
End Property
Public Property Set PictureN(ByVal NewImage1 As Picture)
On Error Resume Next
En fait la propriété créée en type Picture ou ipicturedisp et en lecture seule eu cours de l'exécution, comment peut on la passer en écriture ?
Par avance merci.
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
"Marc" a écrit dans le message de news:
Persones n'a d'idée ? peut être faut il créer une autre propriete sans le type picture ???
"Marc" a écrit dans le message de news:
Bonjour,
Je suis en train de créer un Active X.
En effet, cet active x est un bouton, j'ai plusieurs images qui changent au grès des actions. Normal, survol, click, disabled .... Cela fonctionne très bien.
Juste un problème, quand le control est dans un programme et que je demande au prog de changer les images, donc en mode exécution, vb6 répond "Utilisation incorrecte de la propriété", pourtant elle est publique.
Avez vous une idée, je joint un bout de code pour montrer ce que j'ai fait.
Public Property Get PictureN() As Picture On Error Resume Next
Set PictureN = Image1.Picture End Property
Public Property Set PictureN(ByVal NewImage1 As Picture) On Error Resume Next
Private Sub UserControl_ReadProperties(PropBag As PropertyBag) On Error Resume Next
Set PictureN = PropBag.ReadProperty("PictureN", Image1.Picture) End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag) On Error Resume Next
PropBag.WriteProperty "PictureN", PictureN End Sub
Par avance merci
Marc
Jacques93
Bonjour Marc Marc a écrit :
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
Dans le code de ton ActiveX, la propriété s'appelle PictureN, essaie :
Set BaButton1.PictureN = ImageList1.ListImages(1).Picture
en faisant bien précéder l'affectation par Set
--
Cordialement,
Jacques.
Bonjour Marc
Marc a écrit :
Précision utile c'est quand je fais BaButton1.Picture =
ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je
voudrait que mon controle se comporte comme le controle Image1.picture =
ImageList1.ListImages(1).Picture.
Dans le code de ton ActiveX, la propriété s'appelle PictureN, essaie :
Set BaButton1.PictureN = ImageList1.ListImages(1).Picture
Précision utile c'est quand je fais BaButton1.Picture = ImageList1.ListImages(1).Picture que j'ai le message d'erreur, en fait je voudrait que mon controle se comporte comme le controle Image1.picture = ImageList1.ListImages(1).Picture.
Dans le code de ton ActiveX, la propriété s'appelle PictureN, essaie :
Set BaButton1.PictureN = ImageList1.ListImages(1).Picture
