HMGforum.com

Hi Roberto,

Very happy to see you around.

Portable Mysql Server, very interesting. Where we download and test ?

Wbr,

Jayadev

the Goat Father of HMG is back !!

Roberto Lopez wrote: ↑Wed Sep 04, 2024 11:18 pm

mol wrote: ↑Wed Sep 04, 2024 6:27 am Great to see you, Roberto!

Same here!

The time goes fast... in fact, it becomes faster and faster...

AFAIR (like Rathi) you are one of the earliest HMG supporters and you still here!

Thanks for that!

I'm happy to see you here!!!

You are my first teacher of HMG and first person which helped me!

jayadevu wrote: ↑Thu Sep 05, 2024 5:19 am Hi Roberto,

Very happy to see you around.

Portable Mysql Server, very interesting. Where we download and test ?

Wbr,

Jayadev

Hi Again!

Here it is:

https://mariadb.com/kb/en/portable-mariadb/

https://mariadb.org/download/?t=mariadb ... irror=fder

serge_girard wrote: ↑Thu Sep 05, 2024 7:08 am the Goat Father of HMG is back !!

No no no!!! Please!!!!

I'm back (mainly) as a silent reader now.

Roberto Lopez wrote: ↑Wed Sep 04, 2024 11:13 pm

Rathinagiri wrote: ↑Wed Sep 04, 2024 5:18 am Wow. Hearty welcome the Goat Father of HMG!

So happy to see you again sir. How are you?

I guess "Goat" is too much!

I'm currently an active HMG user (apps developer) with various custom apps being currently used. As an HMG user, I've made my own little 'helper' library (perpetually 'under construction' )...

Of all things in that library, I guess that the most useful could be my MySql functions (most of my new apps are MySql based). I use MySql even locally (I use a portable MySql server for local storage), this allows an easy 'upscale' path when required (usually, sooner or later will be ). Since these functions use some public variables, before publish I'd like create a class for then.

Regarding printing, I only generate PDFs with hmg_hpdf (lightly modified to suit some personal needs) and including SumatraPDF as a viewer.

I'm doing IT support too (each day, my hate towards M$ grows more and more )

That's all!

I can feel the same thing Roberto. So eager to see the library!

Roberto Lopez wrote: ↑Fri Sep 06, 2024 1:32 am

jayadevu wrote: ↑Thu Sep 05, 2024 5:19 am Hi Roberto,

Very happy to see you around.

Portable Mysql Server, very interesting. Where we download and test ?

Wbr,

Jayadev

Hi Again!

Here it is:

https://mariadb.com/kb/en/portable-mariadb/

https://mariadb.org/download/?t=mariadb ... irror=fder

Thanks so much Roberto.

Wbr,

Jayadev

Hi

Compilation Error. I'm trying to compile 64 bit version while building unicode version ( buidalllibs64.bat) all libs i'm getting error. Any one facing this issue ?


Error
Generating C source output to 'C:\Users\Dhana\AppData\Local\Temp\hbmk_4nb4f8.dir\h_qhtm.c'... Done.
Compiling 'RichEditBoxEx_H.prg'...
Lines 18092, Functions/Procedures 15
Generating C source output to 'C:\Users\Dhana\AppData\Local\Temp\hbmk_4nb4f8.dir\RichEditBoxEx_H.c'... Done.
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_INIT':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:67:36: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(struct HINSTANCE__ *)' {aka 'int (*)(struct HINSTANCE__ *)'} [-Wcast-function-type]
67 | QHTM_INITIALIZE pFunc = ( QHTM_INITIALIZE ) GetProcAddress( hQhtmDll, "QHTM_Initialize" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_MESSAGEBOX':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:219:33: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'int (*)(struct HWND__ *, const WCHAR *, const WCHAR *, UINT)' {aka 'int (*)(struct HWND__ *, const short unsigned int *, const short unsigned int *, unsigned int)'} [-Wcast-function-type]
219 | QHTM_MESSAGEBOX pFunc = ( QHTM_MESSAGEBOX ) GetProcAddress( hQhtmDll, "QHTM_MessageBox" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_ENABLECOOLTIPS':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:363:36: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(void)' {aka 'int (*)(void)'} [-Wcast-function-type]
363 | QHTM_ENABLECOOLTIPS pFunc = ( QHTM_ENABLECOOLTIPS ) GetProcAddress( hQhtmDll, "QHTM_EnableCooltips" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_SETHTMLBUTTON':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:388:36: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(struct HWND__ *)' {aka int (*)(struct HWND__ *)'} [-Wcast-function-type]
388 | QHTM_SETHTMLBUTTON pFunc = ( QHTM_SETHTMLBUTTON ) GetProcAddress( hQhtmDll, "QHTM_SetHTMLButton" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTCREATECONTEXT':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:413:39: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'QHTMCONTEXT (*)(UINT)' {aka 'long unsigned int (*)(unsigned int)'} [-Wcast-function-type]
413 | QHTM_PRINTCREATECONTEXT pFunc = ( QHTM_PRINTCREATECONTEXT ) GetProcAddress( hQhtmDll, "QHTM_PrintCreateContext" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTSETTEXT':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:431:33: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(QHTMCONTEXT, const WCHAR *)' {aka 'int (*)(long unsigned int, const short unsigned int *)'} [-Wcast-function-type]
431 | QHTM_PRINTSETTEXT pFunc = ( QHTM_PRINTSETTEXT ) GetProcAddress( hQhtmDll, "QHTM_PrintSetText" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTSETTEXTFILE':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:449:39: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(QHTMCONTEXT, const WCHAR *)' {aka 'int (*)(long unsigned int, const short unsigned int *)'} [-Wcast-function-type]
449 | QHTM_PRINTSETTEXTFILE pFunc = ( QHTM_PRINTSETTEXTFILE ) GetProcAddress( hQhtmDll, "QHTM_PrintSetTextFile" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTSETTEXTRESOURCE':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:467:42: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(QHTMCONTEXT, struct HINSTANCE__ *, const WCHAR *)' {aka 'int (*)(long unsigned int, struct HINSTANCE__ *, const short unsigned int *)'} [-Wcast-function-type]
467 | QHTM_PRINTSETTEXTRESOURCE pFunc = ( QHTM_PRINTSETTEXTRESOURCE ) GetProcAddress( hQhtmDll, "QHTM_PrintSetTextResource" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTLAYOUT':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:489:33: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(QHTMCONTEXT, struct HDC__ *, const RECT *, int *)' {aka 'int (*)(long unsigned int, struct HDC__ *, const struct tagRECT *, int *)'} [-Wcast-function-type]
489 | QHTM_PRINTLAYOUT pFunc = ( QHTM_PRINTLAYOUT ) GetProcAddress( hQhtmDll, "QHTM_PrintLayout" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTPAGE':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:516:30: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'BOOL (*)(QHTMCONTEXT, struct HDC__ *, UINT, const RECT *)' {aka 'int (*)(long unsigned int, struct HDC__ *, unsigned int, const struct tagRECT *)'} [-Wcast-function-type]
516 | QHTM_PRINTPAGE pFunc = ( QHTM_PRINTPAGE ) GetProcAddress( hQhtmDll, "QHTM_PrintPage" );
| ^
D:/hmg.3.6/hfcl/Source/c_qhtm.c: In function 'HB_FUN_QHTM_PRINTDESTROYCONTEXT':
D:/hmg.3.6/hfcl/Source/c_qhtm.c:539:42: warning: cast between incompatible function types from 'FARPROC' {aka 'long long int (*)()'} to 'void (*)(QHTMCONTEXT)' {aka 'void (*)(long unsigned int)'} [-Wcast-function-type]
539 | QHTM_PRINTDESTROYCONTEXT pFunc = ( QHTM_PRINTDESTROYCONTEXT ) GetProcAddress( hQhtmDll, "QHTM_PrintDestroyContext" );
| ^

Hello Everybody,

Today I could compile and and ran a 3 years old HMG project with SQLite developed with 32 bit Unicode version. Now, it's running on 64 bit.
Thanks to @Rathinagiri for sending me the 64 bit version of HMG.

Now, I am starting to develop a new 64 bit project. Long live HMG.

Dear colleagues,
does anyone know why,
for example, msgdebug() works like this if the ctxt variable has chr(240)?

procedure taguredjaj
ctxt:="TAG URE"+chr(240)+"AJ"

msgdebug( len(ctxt), ctxt) && 10, "TAG URE
msgdebug( ctxt, len(ctxt)) && "TAG URE

strfile(ctxt, "tag.txt") && tag.txt: TAG UREđAJ

return