Application mdi

Description

Ceci permet de crée une application MDI à plusieurs form qui s'imbrique les une dans les autres et non pas seulement une dans l'autre comme celui de vb.
Pour cette exemple vous aurez besoin de 3 pages form et d'un Module.

Source / Exemple :


'Placé ce qui suit dans un MODULES
Public Declare Function SetParent Lib "user32" (ByVal hwndchild As Long, ByVal hwndparent As Long) As Long

'Placé ce qui suit dans la form1
Private Sub Form_Load()
      Form2.show
End Sub

'Placé ce qui suit dans la form2 pour quelle apparaisse dans la form1
Private Sub Form_Load()
      SetParent Me.hWnd, form1.hwnd
      Form3.show
End Sub

'Placé ce qui suit dans la form3 pour quelle apparaisse dans la form2
Private Sub Form_Load()
      SetParent Me.hWnd, form2.hwnd
End Sub

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.