HMG 3.4.4
Moderator: Rathinagiri
- serge_girard
- Posts: 2202
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 495 times
- Been thanked: 110 times
- Contact:
Re: HMG 3.4.4
You're welcome, Marek.
I don't use IDE anymore since it crashes to often. And FMG is not my thing.... I'd rather keep it in my PRG!
Serge
I don't use IDE anymore since it crashes to often. And FMG is not my thing.... I'd rather keep it in my PRG!
Serge
- serge_girard
- Posts: 2202
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 495 times
- Been thanked: 110 times
- Contact:
- serge_girard
- Posts: 2202
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 495 times
- Been thanked: 110 times
- Contact:
Marek,
If IDE changes FMG then close IDE, check FMG and try to compile with bat-file.
Serge
If IDE changes FMG then close IDE, check FMG and try to compile with bat-file.
Serge
- mol
- Posts: 3125
- Joined: Thu Sep 11, 2008 5:31 am
- Location: Myszków, Poland
- Has thanked: 191 times
- Been thanked: 102 times
- Contact:
I've tested this wrong behaviour with HMG341 and works bad, too 
I must install new version today and only one solution is to move window definitions to prg file. Stupid work...
It's strange but moving code to prg does not give solution to problem.
I've added timer to main form, which call function WhereAmI() which puts active form name in status bar
After closing my modal form, GetActiveWindow() returns 0 - it should be MainForm handle in my opinion. So, what causes such a strange behaviour?

I must install new version today and only one solution is to move window definitions to prg file. Stupid work...
It's strange but moving code to prg does not give solution to problem.
I've added timer to main form, which call function WhereAmI() which puts active form name in status bar
Code: Select all
function WhereAmI()
local hWin := GetActiveWindow()
local i
local cFormName := ""
i:= ascan( _HMG_SYSDATA[67], hWin)
if i>0
cFormName := _HMG_SYSDATA[66][i]
endif
MainForm.StatusBar.Item(1) := cFormName + " "+str(hWin)+ " " + time()
return .t.
- serge_girard
- Posts: 2202
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 495 times
- Been thanked: 110 times
- Contact:
Marek,
if you want to share complete source in order to debug, please use Private Message!
Serge
if you want to share complete source in order to debug, please use Private Message!
Serge