Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Controle dynamique

Controle dynamique

4 réponses
Avatar
Raymond Fournier
Bonjour a tous,
Je voudrais ajouter dynamiquement un contrôle image. Pour ce faire
j'utilise:
Load imgEpicerie1(i)
imgEpicerie1(i).Top = imgEpicerie1(i - 1).Top + imgEpicerie
(0).Height
imgEpicerie1(i).Visible = True.

Ca fonctionne bien mais je voudrais avoir une image différant dans
le contrôle créé dynamiquement que celui original.

Merci de vos solution.
Raymond Fournier.
Signaler un problème avec ce contenu

4 réponses

Supprimer
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
Avatar
François Picalausa
Bonjour/soir,

AMHA, il te suffit de faire quelquechose comme
imgEpicerie1(i).Image = LoadPicture("c:toto.bmp")
ou, si ton image est stoquée dans les ressources, LoadResPicture

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


Raymond Fournier wrote:
Bonjour a tous,
Je voudrais ajouter dynamiquement un contrôle image. Pour ce faire
j'utilise:
Load imgEpicerie1(i)
imgEpicerie1(i).Top = imgEpicerie1(i - 1).Top + imgEpicerie
(0).Height
imgEpicerie1(i).Visible = True.

Ca fonctionne bien mais je voudrais avoir une image différant dans
le contrôle créé dynamiquement que celui original.

Merci de vos solution.
Raymond Fournier.


Avatar
Raymond Fournier
In article ,
says...
Bonjour a tous,
Je voudrais ajouter dynamiquement un contrôle image. Pour ce faire
j'utilise:
Load imgEpicerie1(i)
imgEpicerie1(i).Top = imgEpicerie1(i - 1).Top + imgEpicerie
(0).Height
imgEpicerie1(i).Visible = True.

Ca fonctionne bien mais je voudrais avoir une image différant dans
le contrôle créé dynamiquement que celui original.

Merci de vos solution.
Raymond Fournier.




J'ai bien essayer d'écrire
imgEpicerie1(i).Picture = LoadPicture(App.Path & "" & "fond blanc +
check OFF.bmp")

Mais sa ne fonctionne pas

Merci de votre aide

Raymond Fournier
Avatar
François Picalausa
Raymond Fournier wrote:
In article ,
says...
Bonjour a tous,
Je voudrais ajouter dynamiquement un contrôle image. Pour ce faire
j'utilise:
Load imgEpicerie1(i)
imgEpicerie1(i).Top = imgEpicerie1(i - 1).Top + imgEpicerie
(0).Height
imgEpicerie1(i).Visible = True.

Ca fonctionne bien mais je voudrais avoir une image différant dans
le contrôle créé dynamiquement que celui original.




J'ai bien essayer d'écrire
imgEpicerie1(i).Picture = LoadPicture(App.Path & "" & "fond blanc +
check OFF.bmp")

Mais sa ne fonctionne pas




Bonjour/soir,

Ce bout de code fonctionne correctement ici:
Private Sub Command1_Click()
If Image1.Ubound < 1 Then
Load Image1(1)
Image1(1).Visible = True
Image1(1).Picture = LoadPicture("C:toto1.bmp")
Image1(1).Left = 3000
Image1(1).Top = 3000
End If
End Sub

Private Sub Form_Load()
Image1(0).Picture = LoadPicture("C:Toto2.bmp")
End Sub

Vu ton code, il y a risque de supperposition des deux images.. regarde
peut-être si ça ne vient pas de là...
Si c'est le cas imgEpicerie1(i).ZOrder devrait faire apparaitre la bonne
image.

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com
Avatar
Raymond Fournier
In article ,
says...
Bonjour a tous,
Je voudrais ajouter dynamiquement un contrôle image. Pour ce faire
j'utilise:
Load imgEpicerie1(i)
imgEpicerie1(i).Top = imgEpicerie1(i - 1).Top + imgEpicerie
(0).Height
imgEpicerie1(i).Visible = True.

Ca fonctionne bien mais je voudrais avoir une image différant dans
le contrôle créé dynamiquement que celui original.

Merci de vos solution.
Raymond Fournier.



Merci François de ton aide, j'avais une erreur de syntaxe.

Raymond Fournier