pjouy
Messages postés110Date d'inscriptionmardi 8 juillet 2003StatutMembreDernière intervention18 mai 2009
-
17 févr. 2006 à 22:34
pjouy
Messages postés110Date d'inscriptionmardi 8 juillet 2003StatutMembreDernière intervention18 mai 2009
-
17 févr. 2006 à 23:35
Bonjour,
Je souhaiterais savoir si on peut déplacer un contrôle (dans mon cas une Frame) à l'intérieur d'une Form, un peu comme une fenêtre MDI dans environnement multi-fenêtres. J'ai pensé vaguement à un drag & drop mais je pense que ça ne correspond pas à un besoin.
Mon idée étant de permettre de placer ses contrôles là où l'on veut dans la fenêtre.
Une petite recherche et t'aurait eu ta réponse sans poser ta question.
J'y ai déjà répondu a pas mal de message ou la question était la même
Pas la peine d'utiliser DragDrop, tout simplement:
Private PtClickX As Single, PtClickY As Single
Private Sub Frame1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
PtClickX = X
PtClickY = Y
End If
End Sub
Private Sub Frame1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Frame1.Move Frame1.Left + (X - PtClickX), Frame1.Top + (Y - PtClickY)
End If
End Sub
Kenji
<hr size="2" width="100%">
Merci de cliquer sur "Réponse acceptée" si une réponse vous convient.
pjouy
Messages postés110Date d'inscriptionmardi 8 juillet 2003StatutMembreDernière intervention18 mai 2009 17 févr. 2006 à 23:35
Merci beaucoup à vous deux, les réponses me conviennent toutes.
Malheureusement, depuis quelques semaines, j'ai beaucoup de mal à trouver réponse à mes questions via le moteur de recherche (je tombe souvent sur des choses qui n'ont rien à voir).
[Désolé le Réponse acceptée ne fonctionne pas... ]