Créer une form dynamiquement !!!

zoglub14 Messages postés 62 Date d'inscription mardi 25 mars 2003 Statut Membre Dernière intervention 16 octobre 2007 - 4 janv. 2004 à 10:37
zoglub14 Messages postés 62 Date d'inscription mardi 25 mars 2003 Statut Membre Dernière intervention 16 octobre 2007 - 5 janv. 2004 à 13:19
Bonjour à tous,

Je voudrais ecrire un code source me permettant de générer automatiquement une Form !! que je remplierais d'un nombre aléatoire de boutons.

Je sais créer dynamiquement des boutons, des labels ,etc...

Par contre je n'arrive absolument pas à créer dynamiquement une form !!

Pouvez-vous m'aider ?

Merci d'avance

Zoglub14

4 réponses

pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 5
4 janv. 2004 à 12:01
Voila!!

Dim NvForm As New Form1
Load NvForm
NvForm.Visible = True
0
zoglub14 Messages postés 62 Date d'inscription mardi 25 mars 2003 Statut Membre Dernière intervention 16 octobre 2007
4 janv. 2004 à 21:21
Merci

Mais cela créé une form qui est une copie de la form en cours !

Elle n'apparait pas dans la feuille de projet, elle n'est pas créée en dure !!

Comment puis-je faire

Merci

Zoglub14
0
pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 5
5 janv. 2004 à 00:43
donc c pas une form dynamique que tu veu!!! lol
il te suffit de creer ta form "en dure" et d'y a jouter un label indexé a 0, idem pour les autres controles.

Ensuite tu charge la form au moment ou tu le souhaite : "maform.show", et ensuite tu charge dynamiquement les labels (tous le controles..) ex:
Load label1(1)
label1(1).left =xxx
label1(1).top=xxx
label1(1).caption="lala"
label1(1).visible=true

Evidement si tu sais qu'il y en aura 10 tu fait une boucle for next

for i=1 to 10
Load label1(1)
label1(i).left =xxx
label1(i).top=xxx
label1(i).caption="lala"
label1(i).visible=true
next i

en fait tu gere le nb de controle de ta nouvelle form depuis la form principale!! Je sais pas si c trés clair si ça ne l'est pas dit le moi je te coderais un petit exemple (msn messenger:pcpunch59@hotmail.com)
0
zoglub14 Messages postés 62 Date d'inscription mardi 25 mars 2003 Statut Membre Dernière intervention 16 octobre 2007
5 janv. 2004 à 13:19
Si Si c'est tres clair !!!

Excuse moi pour mon abus de langage

Merci

Zoglub14
0
Rejoignez-nous