Communication entre form

Résolu
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005 - 19 mai 2005 à 14:50
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005 - 19 mai 2005 à 17:45
Voici mon problème :

j'ai une main form, où qq boutons sont non-actifs.

Pour les activer, il faut saisir un mot de passe dans une nouvelle form façon "pop-up". Question gestion du mot de passe tout est ok.
Mais je voudrai pouvoir activer les boutons de ma main form depuis ce "pop-up", sachant que ma main Form est toujours active en dessous de mon pop-up.
Merci !

7 réponses

cs_lim Messages postés 329 Date d'inscription jeudi 20 novembre 2003 Statut Membre Dernière intervention 10 mai 2014 7
19 mai 2005 à 17:27
Salut, hé non on est pas tous mort

Ex : 2 form
Form1 principale (2 boutons)
buton1 : enabled a false à l'init du prog
buton2 : appel form 2
Form2 secondaire (1 bouton)
buton1 : enabled buton1 de la form1 et ferme la form2

Dans ta form2

Public
Class Form2

Inherits System.Windows.Forms.Form

'Objet form en tant que ta frnêtre Main (Form1)

Dim objfrm
As Form1



#Region " Code généré par le Concepteur Windows Form "



'Modification du New
Public
Sub
New(
ByVal MyForm
As Form1)



MyBase.New()



'Cet appel est requis par le Concepteur Windows Form.


InitializeComponent()



'Ajoutez une initialisation quelconque après l'appel InitializeComponent()

'Initialisation de ton objet


objfrm = MyForm



End
Sub

#end region



Private
Sub Button1_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles Button1.Click


'Active mon bouton Button de ma form 1
objfrm.Button1.Enabled =
True
'Je cache ma form 2 et reviends à la form 1
Me.Hide()



End
Sub


End
Class

Dans ta form 1

'je désactive mon bouton au lancement du prog (c'est pour l'exemple)

Private
Sub Form1_Load(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles
MyBase.Load


Button1.Enabled =
False



End
Sub



'Appui sur le bouton 2
Private
Sub Button2_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles Button2.Click



'Je déclare f en tant que form 2 avec comme paramètre (ME=Form1)
Dim f
As
New Form2(
Me)


'J'affiche form 2 et attend le fait quelle soit caché pour reprendre la main
f.ShowDialog()


'Je ferme la forme2
f.Close()



End
Sub

Sache que ce code n'est pas de moi, je l'ai trouvé par hasard sur le net.
Je sais l'utilisé mais j'ai pas compris toute les implications de fonctionnement

@+
LIM
3
badboy38 Messages postés 95 Date d'inscription vendredi 14 janvier 2005 Statut Membre Dernière intervention 4 mars 2013
19 mai 2005 à 15:17
Salut,



Si ta main form (que l'on nomme form1 dans la suite) est toujours
active, alors le code à placer pour activer le bouton, nommé command1
est:



form1.command1.enabled=true



bonne prog et bonne chance



@+ BadBoy38
0
benbill Messages postés 21 Date d'inscription mercredi 18 mai 2005 Statut Membre Dernière intervention 21 juin 2005
19 mai 2005 à 15:21
Salut à toi AlessandroN

Si j'ai bien compris, tu as 2 forms :

- ta main form où tes boutons sont non-actifs (non accessible quoi)
- ton autre form où il faut rentrer ton mot de passe

donc une fois le bon mot de passe rentré, les boutons de ta main form doivent etre actifs

Donc admettons ta main form s'appelle "form1" et l'autre s'appelle "form2"
admettons aussi que tu as deux boutons sur ta main form qui se nomment "bt1" et "bt2"
admettons encore aussi ^^ que sur ta "form2" tu as un textbox qui se nomme "textp" qui te sert a rentrer ton pass et un bouton "OK" qui te permet de valider ton pass

tu tape ca dans le code de ton bouton OK qui te permet de valider ton pass :

if textp.text = "ton mot de passe" then
form1.bt1.enabled=true
form1.bt1.enabled=true
else
msgbox "mot de passe invalide"
end if

voila voilou

dis moi si ca te va

@é+ché

"Michel, le réparateur de la machine à laver"
0
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005
19 mai 2005 à 15:24
Le soucis c'est que je suis en vb .net !
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005
19 mai 2005 à 15:25
Merci de m'aider en tout cas !
0
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005
19 mai 2005 à 16:40
Youhou !

Y'a-t-il des survivants à vb .net ?
0
AlessandroN Messages postés 10 Date d'inscription dimanche 5 novembre 2000 Statut Membre Dernière intervention 19 mai 2005
19 mai 2005 à 17:45
Merci beaucoup !
ça marche super mais j'avoue également que certaine subtilités m'échappent.... notamment le objfrm = MyForm après les déclarations...
En tous cas mille mercis !
0
Rejoignez-nous