Discussion :

[bestsimo2]

salut

j ai un ptit problème avec la fermeture de demarrage de l'application

ce que j veus faire c fermer la fenêtre de démarrage de l'application apres avoir ouvert une autre ,sauf que quand j ecris

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveForm.Close()

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Close()

tt court puis j ouvre l'autre fenêtre ,j vois cette derniere s'ouvrir puis se ferment les 2 fenêtres celle du demarrage et l autre que j viens d'ouvrir

d ailleur meme quand je la ferme la fenetre de demarrage manuellement toutes les autres fenêtres ouvertes se ferment automatiquement
j sais vraiment pas comment fermer uniquement celle du demarrage

dans ma fameuse fenêtre de démarrage mon code est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
ActiveForm.Close() 
fenetre2.Show()

merci d avance

[trotters213]

C'est quoi l'intérêt de démarrer une fenêtre pour la fermer directement et en ouvrir une autre : : :
Pourquoi tu ne démarres pas directement avec la 2 fenêtre :

[bestsimo2]

j la ferme pas sur le champ ,j effectue des traitments puis suite a la verification de certaines conditions j la ferme
en faite c est une fenetre d identification que j ferme si le authentification est réussi mais en meme temps ca férme ma fenetre principale
c est ca le probleme!!

[graphicsxp]

Salut,

Moi ce que je fais c'est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Public Sub main()
     Dim f As frmLogin = New frmLogin
     Dim r As DialogResult
     Do
     r = f.ShowDialog
     Loop While Not (r = DialogResult.Cancel Or r = DialogResult.OK)
      If r = DialogResult.OK Then
              Application.Run(New frmWebs)
      End If
End Sub

C'est la meme chose, j'ai ma fenetre d'identification qui s'ouvre et si l'identification est bonne je ferme la fenetre :
sur l'evenement click du bouton de login dans mon form login :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
If m_login.ValidateLogin(str) Then
            Me.DialogResult = DialogResult.OK
   Else
            Me.DialogResult = DialogResult.Abort
   end if
    Me.Close()

Voila

[Dinytro]

Ta deuxième fenêtre se ferme parce que tu l'ouvre dans la première donc quand tu ferme la première fenêtre, tu tues le thread qui a lancé l'autre et donc elle se ferme.

je pense que tu t'y prend à l'envers.
Explique nous ce que tu fais comme traitements dedans et à mon avis, ça devrait pas être compliqué...

[toxine]

pourquoi tu veux absolument la fermer ?
Il te suffit de la cacher ...

formprincipal.hide()

[graphicsxp]

ca c'est une mauvaise idee
Si il la cache, comme c'est la fenetre qui appelle le main form, lorsqu'il fermera le main form, l'application restera en idle et ne se fermera jamais car la fenetre d'identification sera toujours active, bien que cachée

[toxine]

bah non, a la fermeture de sa form secondaire, il ferme la form principale en même temps, et donc son programme...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
     Private Sub FormSecondaire_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        If Me.DialogResult <> DialogResult.OK Then
            Application.Exit()
        End If
    End Sub

[toxine]

principale pour moi étant la form appelante et secondaire étant la form appelée

[graphicsxp]

Ok, ca marcherait, mais bon autant la fermer, elle ne sert plus a rien sinon a occuper de la memoire pour rien. La methode que j'ai donne plus haut permet de faire ca facilement.

[bestsimo2]

salut tout le monde
j avais pensé a hide sauf que j e prefere la fermé au debut j vois as l interet de la laisser cahé si j peus la fermé

en faite voila ce que j fais dans cette fenétre d identification

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Private Sub Valider_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Valider.Click
 
        Dim for1 As form1 = New form1
         Dim id As ident = New ident
         'la je parcour la base de donné a la recherche du mot de passe et du login saisie pr l utilisateur
        rownumber = ObjetDataTable.Rows.Count - 1
 
           'si l authentification est réussi
           If rownumber = 0 Then
 
            for1.Show()
            'ici j veus pouvoir fermé uniquement la form active :(fenetre d' identification  celle ou j'écris ce code)  
        Else
                  res = MsgBox("Authentification échoué",   MsgBoxStyle.Exclamation, "Authentification")
 
            End If
 
    End Sub

c'est une identification assez banale

merci d avance

[graphicsxp]

Salut,
Non mais t'as vu mon message au dessus ???
Je t'ais file exactement le code que tu veux..

Donc ca c'est ce que tu mets en fonction de l'identification reussie ou non:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
If identification reussie Then 
            Me.DialogResult = DialogResult.OK 
Else 
            Me.DialogResult = DialogResult.Abort 
end if 
Me.Close()

et ensuite il te faut une sub Main dans un fichier global comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Sub main() 
     'ici creation de ton form login
     Dim f As frmLogin = New frmLogin 
     Dim r As DialogResult 
    'tant que le form login ne renvoit pas DialogResult.OK ou   DialogResult.Cancel (ca c'est parceque j'ai un bouton Cancel sur mon form Login), on le laisse a l'ecran
 
     Do 
       r = f.ShowDialog 
     Loop While Not (r = DialogResult.Cancel Or r = DialogResult.OK) 
 
      'Si le resultat est OK tu lance l'application en lui passant le main form en argument
      If r = DialogResult.OK Then 
              Application.Run(New frmWebs) 
      End If 
End Sub

Voila, la t'as tout je pense
@+

[bestsimo2]

salut graphicsxp

ca marche le code que tu m a donné sauf que j ai pas trop compris ce que t a fais
j suis encore debutant en vb.net
stp ca serai vraiment tres gentil de ta part si tu me donnai un peu plus d expliquation sur ce que t a fais sutout ds la Sub main()

[graphicsxp]

Salut,
Ben y a pas grand chose a comprendre...La methode ShowDialog renvoit un message de type DialogResult et tant que ce message n'est pas DialogResult.OK, tu affiches ton form Login.
Ensuite quand l'utilisateur s'est logue avec les bons parametres tu fermes ton form login, tu renvoies DialogResult.OK , tu sors de la boucle et tu lances l'application grace a Application.Run(New frmWebs)

Simple non ?
@+

[bestsimo2]

enfin j ai compris
j te remercie ca parrait assez simple mais une fois qu on a compris
merci bien c tres gentil de ta part

[graphicsxp]

De rien. Penses a cliquer sur Resolu