CLICK HMG Source
Posted: Sat Sep 26, 2020 12:00 am
hi,
i have CLICK HMG Source
it need some small change in HMG \Source Code
---
modify for Type "I", "T" and "@" ( HBFM v1.28 )
---
i have extract C-Code (still in Source) from
new hmg32.hbp and hmg64.hbp include HB_FUNC.PRG
---
modify for CLICK this Syntax in H_GRID.PRG
---
change Code in c:\hmg.3.4.4\SOURCE\h_textbox.prg for CLICK Syntax
---
change /*Comment*/ Code in c:\hmg.3.4.4\SOURCE\h_HMG_HPDF_UNICODE.prg
---
after run CLICK there is a Error in h_controlmisc.prg
must be
i will upload Change to Github HBFM under \Source
backup your \Source Folder before replace with include files
have fun
i have CLICK HMG Source
it need some small change in HMG \Source Code
---
modify for Type "I", "T" and "@" ( HBFM v1.28 )
search for comment "by Jimmy"c:\hmg.3.4.4\SOURCE\H_BROWSE.PRG and h_controlmisc.prg
---
i have extract C-Code (still in Source) from
and Build HB_FUNC.PRG (for CLICK) with C-CodeC:\hmg.3.4.4\SOURCE\h_controlmisc.prg
C:\hmg.3.4.4\SOURCE\h_HMG_HPDF.Prg
C:\hmg.3.4.4\SOURCE\h_HMG_HPDF_UNICODE.prg
new hmg32.hbp and hmg64.hbp include HB_FUNC.PRG
---
modify for CLICK this Syntax in H_GRID.PRG
Code: Select all
IF AEC = 'EDITBOX'
DEFINE WINDOW
ELSE
DEFINE WINDOW
ENDIF
change Code in c:\hmg.3.4.4\SOURCE\h_textbox.prg for CLICK Syntax
Code: Select all
#ifdef COMPILE_HMG_UNICODE
if c != '9' .and. c != '$' .and. c != '*' .and. c !='.' .and. c != ',' .and. c != ' ' .and. c != 'Ђ' .and. c != '€'
#else
if c != '9' .and. c != '$' .and. c != '*' .and. c !='.' .and. c != ',' .and. c != ' ' .and. c != 'Ђ'
#endif
MsgHMGError("@...TEXTBOX: Wrong InputMask Definition" )
EndIf
change /*Comment*/ Code in c:\hmg.3.4.4\SOURCE\h_HMG_HPDF_UNICODE.prg
Code: Select all
DrawText (hDC, cText, -1, &rect, DT_NOCLIP | DT_WORDBREAK | /*DT_EXTERNALLEADING |*/ DT_NOPREFIX | nAlign);
after run CLICK there is a Error in h_controlmisc.prg
Code: Select all
FUNCTION HMG_CallDLL( cLibName, nRetType, cFuncName, ... )
STATIC s_hDLL := { = > } // Error
Code: Select all
STATIC s_hDLL := { => }
backup your \Source Folder before replace with include files
have fun