HMG 3.4.4
Moderator: Rathinagiri
- serge_girard
- Posts: 2030
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 378 times
- Been thanked: 87 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: 2030
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 378 times
- Been thanked: 87 times
- Contact:
- serge_girard
- Posts: 2030
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 378 times
- Been thanked: 87 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: 2973
- Joined: Thu Sep 11, 2008 5:31 am
- Location: Myszków, Poland
- Has thanked: 157 times
- Been thanked: 85 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: 2030
- Joined: Sun Nov 25, 2012 2:44 pm
- DBs Used: 1 MySQL - MariaDB
2 DBF - Location: Belgium
- Has thanked: 378 times
- Been thanked: 87 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