| Voir le sujet précédent :: Voir le sujet suivant |
Tiois Junior Webmaster

Inscrit le: 26 Juil 2004 Messages: 10 Localisation: Saint-Paulin
|
Posté le: Lun Juil 26, 2004 10:28 am Sujet du message: Les librairies Windows |
|
|
|
Salut,
J'ai du utiliser des fonctions qui utilisent les librairies de windows, entre autre user32. Le problème, c'est que je ne connais pas comment les utiliser afin de modifier l'apparence de ma form, entre autre pour disabler le bouton X d'une form, ou encore pour down scroller une scrollbar d'un textbox a partir du code. J'ai trouvé un source code sur le net qui le fait, mais j'aimerais comprendre! Je sais qu'on doit déclarer entre autres des constantes qui prennent des valeur Hexadecimales puis des variables Integer qui servent de parametre aux fonctions utilisant "user32". Je vais te montrer mon code VB.NET ... alors si tu peux m'expliquer ce qu'est la librairie user32, quelles sont les utilités et surtout comment s'en servir
This will scroll the window, without changing the current location:
Public Const WM_VSCROLL As Integer = &H115
Public Const SB_LINEDOWN As Integer = 1
Public Const SB_PAGEDOWN As Integer = 3
Public Const SB_LINEUP As Integer = 0
Public Const SB_PAGEUP As Integer = 2
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
Code pour la faire baisser....
SendMessage(Me.RichTextBox1.Handle, WM_VSCROLL, SB_PAGEDOWN, 0)
Code pour la faire monter....
SendMessage(Me.RichTextBox1.Handle, WM_VSCROLL, SB_PAGEUP, 0)
-----------------------
Merci! |
|
| Revenir en haut de page |
|
|
matt Web Admin

Inscrit le: 06 Avr 2004 Messages: 157 Localisation: Trois-Rivières
|
Posté le: Lun Juil 26, 2004 2:47 pm Sujet du message: |
|
|
|
Ici, il faut que tu comprennes que pour Windows, un événement ca n'existe pas. Il y a un flux de message constant dans Windows ca s'appelle les Message. Un événement en VB, c'est tout simplement une fonction qui est appeller lorsque tel Message a été envoyé sur tel Handle.
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
hwnd : L'identificateur de l'objet à lequel tu veux envoyer un mesage
wMsg : Le message
wParam, lParam : Paramètre supplémentaire.
SendMessage(Me.RichTextBox1.Handle, WM_VSCROLL, SB_PAGEDOWN, 0)
Ici, tu envoies le message WM_VSCROLL (Scroll Vertical) avec le paramètre additionel SB_PAGEDOWN au handle spécifié.
Pour continuer dans la ligné des Message. Tu peux utiliser des HOOK. Ce qui te permet de te mettre en écoute sur les messages de tout le système. Pour te donner un example concret, c'est la méthode de prédilection des keyloggers.
Bonne journée,
Matt |
|
| Revenir en haut de page |
|
|
Tiois Junior Webmaster

Inscrit le: 26 Juil 2004 Messages: 10 Localisation: Saint-Paulin
|
Posté le: Lun Juil 26, 2004 3:27 pm Sujet du message: |
|
|
|
Merci beaucoup pour la réponse claire et rapide!  |
|
| Revenir en haut de page |
|
|
|
Vous ne pouvez pas poster de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas voter dans les sondages de ce forum
|
|
|
|
|
|