Tamanho do ponteiro da scrollbar

[JoséQuintas]

Alguém sabe como fazer isso?

Tentei

Código: Selecionar todos

hwg_SetScrollInfo( :hWnd, 0, 1, nPos, ( Int( ( nEnd - nBegin ) / 10 ) ), nEnd )

Mas não deu certo.

[JoséQuintas]

Troquei o setrange mas também não deu.
Pelo menos o nome set-range-redraw, deu a impressão de que poderia ser ele.

Código: Selecionar todos

         //:SetRange( { nBegin, nEnd } )
         :SendMessage( SBM_SETPOS, nPos, 0 )
         :SendMessage( SBM_SETRANGEREDRAW, nBegin, nEnd )