Créer un nouveau projet EXE, créer un timer et copiez-lui le code. (Le timer s'appelle ici Timer1) et règler Interval à 1. Ce code a pour but que lorsque vous approchez la feuille vers le haut de l'écran celle-ci est attirée pour ce "coller" en haut de l'écran comme les fenêtres de Winamp.
Source / Exemple :
Private Sub Timer1_Timer ()
If Form1.Top < 480 Then
Form1.Top = 0
End If
End
Conclusion :
En cas de problème avec la source, contactez-moi par e-mails à:
Kooralyne@aol.com.
3 nov. 2002 à 17:55
Kooralyne.
2 nov. 2002 à 23:36
Private Sub form_load()
Timer1.Interval = 1
End Sub
Private Sub Timer1_Timer()
If Form1.Top < 480 Then
Form1.Top = 0
End If
If Form1.Left < 480 Then
Form1.Left = 0
End If
End Sub
Mais ne peut être réduite ou agrandit car l'erreur suivant se produit :
erreur d'exécution '384' :
Une feuille ne peut etre déplacé ou dimensionnée lorsqu'elle est réduite ou agrandie
J'ai une petite idée pour adaptée le code a différente résolution...
3 oct. 2002 à 20:02
DARK SIDIOUS
3 oct. 2002 à 19:42
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.