HMG.3.3.0 Patch 3 (32 and 64-bits)

HMG Unicode versions 3.1.x related

Moderator: Rathinagiri

User avatar
srvet_claudio
Posts: 2193
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by srvet_claudio »

mol wrote:Hi!
I've added patch and buttons works fine!
I've found such a strange behavior:
My application is built as ANSI. When I compiled hmg330 with ANSI selection, GRID control is unusable:
Image

When library is compiled with UNICODE selection, everything looks OK:
Image


My BROWSE controls look OK in both cases...
You could upload a chunk of your DBF file of the example.
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com
User avatar
mol
Posts: 3718
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by mol »

my dbf file language is ansi cp-1250, you can download it from http://www.molsystemy.pl/hmg/towary.zip" onclick="window.open(this.href);return false;
User avatar
mol
Posts: 3718
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by mol »

srvet_claudio wrote:
mol wrote:I found another problem.
When I define label with hotkey using & character, it appears in label value.
Previous it generated hotkey.
Image

It's strange, but works OK with checkboxes and buttons
Hi Marek,
this behavior is because the Label control is set by default with SS_NOPREFIX style.
I will change this style as optinal in the new release.
A temporary solución is:

Code: Select all

#define SS_NOPREFIX 128
HMG_ChangeWindowStyle ( Form_1.Label_1.HANDLE, NIL, SS_NOPREFIX, .F. )   // remove style
RedrawWindow(Form_1.Label_1.HANDLE)
OK, thanks for this solution
User avatar
mol
Posts: 3718
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by mol »

While working with hmg 3.1.5, I was using event for detect comma characted typed by user to move cursor beside the decimal dot in textbox:

Code: Select all

CREATE EVENT PROCNAME DetectCommaPressd("MyWindow","TextBox1") HWND MyWindow.TextBox1.HANDLE MSG WM_CHAR
and function code
function DetectCommaPressd
param cNazwaOkna, cBiezacaKontrolka
STATIC lFlagaAktywnosci := .F.
LOCAL hWnd, ch
local lFound := .f.
local nRet := 0

if lFlagaAktywnosci == .t.
return NIL // avoid re-entry
endif

lFlagaAktywnosci := .T.

ch := HMG_GetLastCharacter(@hWnd)
IF hWnd == GetControlHandle (cBiezacaKontrolka,cNazwaOkna)
if ch = ","
_PushKey( 190 )
nRet := 1
endif
ENDIF

lFlagaAktywnosci := .F.

RETURN nRet

Code: Select all


It doesn't work with hmg 3.3.0
What's wrong with my code?
User avatar
Rathinagiri
Posts: 5471
Joined: Tue Jul 29, 2008 6:30 pm
DBs Used: MariaDB, SQLite, SQLCipher and MySQL
Location: Sivakasi, India
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by Rathinagiri »

Is your textbox is defined as numeric?
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
User avatar
mol
Posts: 3718
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by mol »

Rathinagiri wrote:Is your textbox is defined as numeric?
Yes. It doesn't accept any character.
User avatar
Rathinagiri
Posts: 5471
Joined: Tue Jul 29, 2008 6:30 pm
DBs Used: MariaDB, SQLite, SQLCipher and MySQL
Location: Sivakasi, India
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by Rathinagiri »

We have changed the numeric textbox code to accept decimal point '.' We have to change it further if you want to add ',' also.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
Mario Mansilla
Posts: 269
Joined: Wed Aug 13, 2008 2:35 pm
Location: Córdoba - Argentina

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by Mario Mansilla »

Hola :
He probado para testear un sistema realizado con hmg.3.2 con su respectivo IDE con la version Hmg.3.3 patch3 más ultima correcccion de image.c .
Uso imagenes bmp 32x32 en los botones y toolbar , noto una distorsion considerable de las imagenes con la nueva version :? .
Les paso las imagenes para ver la diferencia .

Saludos
Mario Mansilla
Attachments
Hmg.3.30.JPG
Hmg.3.30.JPG (55.18 KiB) Viewed 9816 times
Hmg.3.2.JPG
Hmg.3.2.JPG (45.94 KiB) Viewed 9816 times
User avatar
srvet_claudio
Posts: 2193
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by srvet_claudio »

mol wrote:While working with hmg 3.1.5, I was using event for detect comma characted typed by user to move cursor beside the decimal dot in textbox:

Code: Select all

CREATE EVENT PROCNAME DetectCommaPressd("MyWindow","TextBox1") HWND MyWindow.TextBox1.HANDLE MSG WM_CHAR
and function code
function DetectCommaPressd
param cNazwaOkna, cBiezacaKontrolka
STATIC lFlagaAktywnosci := .F.
LOCAL hWnd, ch
local lFound := .f.
local nRet := 0

if lFlagaAktywnosci == .t.
return NIL // avoid re-entry
endif

lFlagaAktywnosci := .T.

ch := HMG_GetLastCharacter(@hWnd)
IF hWnd == GetControlHandle (cBiezacaKontrolka,cNazwaOkna)
if ch = ","
_PushKey( 190 )
nRet := 1
endif
ENDIF

lFlagaAktywnosci := .F.

RETURN nRet

Code: Select all


It doesn't work with hmg 3.3.0
What's wrong with my code?[/quote]

Hi Marek,
NIL is the best. :lol: 
[b]Local nRet := NIL[/b]
In HMG.3.3.0, I fixed a bug in CREATE EVENT, always you need continue the normal process of the Event you not return a number.
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com
User avatar
srvet_claudio
Posts: 2193
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Contact:

Re: HMG.3.3.0 Patch 3 (32 and 64-bits)

Post by srvet_claudio »

mol wrote:my dbf file language is ansi cp-1250, you can download it from http://www.molsystemy.pl/hmg/towary.zip" onclick="window.open(this.href);return false;" onclick="window.open(this.href);return false;
Thank I will check.
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com
Post Reply