hbXbp using HMG library instead of Qt
Posted: Wed Jan 03, 2018 5:09 pm
As I was going through my downloaded folders of Harbour, HMG, MiniGui, qtContribs etc., I stumbled upon hbXbp.
Looking at the codes of hbxbp\tests\demoxbp.prg, I noticed how similar it is to the Xbase++ code I use.
After googling I knew that Pripal Bedi has done enormous work in making it similar to Xbase++ classes and procedures.
After compiling and running the demo I found that it is purely based on QT library. Now since we have the codes of the classes, I was trying to make changes so that the xbp classes uses HMG library instead of Qt.
Easier said then done. Now I am here to get some guidance on my goal. Please advise.
Regards,
Anand
Looking at the codes of hbxbp\tests\demoxbp.prg, I noticed how similar it is to the Xbase++ code I use.
Code: Select all
oDlg := XbpDialog():new( , , {10,10}, {900,500}, , .f. )
/* NOTE: method to install the windows icon is bit different than Windows */
/* So curretly we can only place disk icon file only */
oDlg:icon := "test.ico"
/* TODO: still not implemented*/
oDlg:taskList := .T.
oDlg:title := cTitle
oDlg:create()
oDlg:Show()
/* Enter Xbase++ Event Loop - working */
DO WHILE .t.
nEvent := AppEvent( @mp1, @mp2, @oXbp )
IF ( nEvent == xbeP_Close ) .OR. ( nEvent == xbeP_Keyboard .and. mp1 == xbeK_ESC )
EXIT
ELSEIF nEvent == xbeP_Keyboard .and. mp1 == xbeK_F1
//
ENDIF
oXbp:handleEvent( nEvent, mp1, mp2 )
ENDDO
oDlg:destroy()
After compiling and running the demo I found that it is purely based on QT library. Now since we have the codes of the classes, I was trying to make changes so that the xbp classes uses HMG library instead of Qt.
Easier said then done. Now I am here to get some guidance on my goal. Please advise.
Regards,
Anand
