Position de ScrollBars

Question

Bonjour à tous,
Est il possible d'empecher un utilisateur de cliquer sur un bouton tant qu'il n'a pas lu tout le texte contenu dans une RichtextBox ? Avec la méthode Enable pour le bouton, et pour la ScrollBar je ne sais pas comment faire pour obtenir sa position ? (Comment peut on voir qu'elle est bien en bas ?)
Merci d'avance.

PCPT · Answer

salut
lTopRow = SendMessage(oRtb.hwnd, EM_GETFIRSTVISIBLELINE, ByVal 0&, ByVal 0&) + 1

ltoprow contiendra la première ligne visible. tu dois savoir combien de lignes sont affichables et le nombre total. de là avec un timer, si total - nombre affichable = ltoprow alors il est au bout

Private Const EM_GETFIRSTVISIBLELINE As Long = &HCE
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

Marneus73 · Answer

Salut;
Je n'ai pas bien compris ton dernier message ?!
Peut tu me réexpliquer ?

Position de ScrollBars

2 réponses

Votre réponse

Discussions similaires