Comment scroller un ascenseur horizontal dans une table par programmation ?
Le principe est d’envoyer un message à Windows concernant l’ascenseur :
//WM_HSCROLL est la constante Windows qui gére les ascenseurs
WM_HSCROLL est un entier = 0x0114
ehandle est un entier
eNumMessage est un entier
//Envoi du message
ehandle = Handle(Table)
eNumMessage = 7
SendMessage(ehandle,WM_HSCROLL,eNumMessage,0)
//Voici les différentes valeurs que eNumMessage peut prendre pour WM_HSCROLL (horizontal) et WM_VSCROLL (vertical)
//SB_LINEUP 0
//SB_LINELEFT 0
//SB_LINEDOWN 1
//SB_LINERIGHT 1
//SB_PAGEUP 2
//SB_PAGELEFT 2
//SB_PAGEDOWN 3
//SB_PAGERIGHT 3
//SB_THUMBPOSITION 4
//SB_THUMBTRACK 5
//SB_TOP 6
//SB_LEFT 6
//SB_BOTTOM 7
//SB_RIGHT 7
//SB_ENDSCROLL 8
Cette Q&R a été trouvée sur WDForge.org : http://old.wdforge.org/modules/smartfaq/faq.php?faqid=133