PC Toledo

Eu sei que o grupo de OOHG é em espanhol, mas via github já conversei com o Fernando em inglês e ele preferiu dessa forma.
Então, como a mensagem é pra ele, postei em inglês.
É sobre compilar toda a OOHG no próprio github.
Pelo github, da outra vez passou o tempo, e ele só entrou em contato alguns anos depois, e eu não tinha mais os arquivos.
Desta vez, com mais explicação, e visível pra todos, talvez agilize.

Mas estou batendo o recorde este ano....

Então.....
Ajudo OOHG, ajudo HWGUI, ajudo GTWVG, ajudo Harbour....
Aonde eu puder ajudar, estou ajudando.
Os fontes da OOHG, formatei todos anos atrás, boa parte manualmente.

Reclamo das LIBs, mas ajudo quando elas deixam.
Eu estranho meu nome aparecer aí, no github da OOHG, mas deve ter considerado uma boa ajuda.
OOHG = MINIGUI OOP

HMG 3 também.
Mas cansei de esperar e parei.
Desde 2020 nenhum sinal de vida....

E dá-lhe pull request.

METHOD UpdateScroll( nEnd, nPos, nIndex ) CLASS frmGUIClass

LOCAL oControl

oControl := ::ControlByType( CONTROL_TYPE_VSCROLL, nIndex )
IF oControl != Nil
WITH OBJECT oControl
:SetRange( { 1, nEnd } )
:SetScrollPos( nPos )
//wapi_SetScrollPos( oControl:pWnd, SB_CTL, nPos, .F. )
//:SendMessage( SBM_SETPOS, nPos, 0 )
//:SendMessage( SBM_SETRANGEREDRAW, 1, nEnd )
ENDWITH
ENDIF

RETURN Nil

Já usava no meu aplicativo, mas parece que da forma errada, sei lá, essa API Windows é meio doida.
De qualquer forma, o ideal é dentro da Scrollbar oficial.

No manual diz: é assim que usa, mas não é pra usar desse jeito, é de outro.... sei lá...