jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 7 juil. 2008 à 15:44
Salut,
Regarde ce code (un peu modifier pour l'exemple)
la ligne s'y affiche bien.
Option Explicit
Private i_ligne As Integer
Private Sub Command1_Click()
i_ligne = i_ligne + 1
Call LoadGroupObject(i_ligne)
End Sub<hr />
Private Sub LoadGroupObject(idx As Integer)
Call Load(Frame1(idx))
With Frame1(idx)
Set .Container = Picture1
.Visible = True
.Top = (idx - 1) * .Height
End With
Call Load(Line7(idx))
With Line7(idx)
Set .Container = Frame1(idx)
.Visible = True
.Y1 = 300
.Y2 = 300
End With
bonjourcheval
Messages postés228Date d'inscriptionmercredi 13 décembre 2000StatutMembreDernière intervention 8 août 2011 7 juil. 2008 à 22:43
J'ai déjà eu un probleme semble avec des frames créés dynamiquement.
En supposant que le Line7 est un type de controle :
dim unctl as control
Dim uneLigne as Line7
For each unctl in frame(tonIndex)
If TypeOf unCtl Is Line7
set uneLigne = unCtl
uneLigne.Visible = true
uneLigne.zorder = 25 'Nombre assez haut pour etre au premier plan
end if
next
ça fonctionne si le contener de ta Line est ton frame.