prg code function documentor in HMG
Moderator: Rathinagiri
Re: prg code function documentor in HMG
Hi Jimmy
I got confused, your DP mentions it as AUGE_OHR so I was addressing you accordingly.
Henceforth I will call you Jimmy.
Yes I got a different icon instead of your icon.
I think the second icon is redundant, it doesn't seem to be used anywhere.
I got confused, your DP mentions it as AUGE_OHR so I was addressing you accordingly.
Henceforth I will call you Jimmy.
Yes I got a different icon instead of your icon.
I think the second icon is redundant, it doesn't seem to be used anywhere.
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
hi,
this is the Clipper Source to get IndexKey() from NTX without load DBF. it use low level and read at byte 22
i have made some test and it seem still work after 20 year
this is the Clipper Source to get IndexKey() from NTX without load DBF. it use low level and read at byte 22
i have made some test and it seem still work after 20 year
have fun
Jimmy
Jimmy
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
hi,
i do have a Problem with HMG Source Syntax and Logic of CLICK
c:\hmg.3.4.4\SOURCE\H_GRID.PRG
c:\hmg.3.4.4\SOURCE\h_controlmisc.prg
there is a DEFINE but no ENDxxx before ELSE or ENDIF ... hm
so i have change 2 lines in CLICK
NOT to use "DEFINE WINDOW" to indent
search for "Jimmy 20200921" in new CLICK.PRG
here changed Code
--- deleted ---
here working full Source Code (only PRG) v2.05.34
p.s.
when work with c:\hmg.3.4.4\SOURCE\*.PRG (no Subfolder) it need some small modification.
i will open extra Thread
i do have a Problem with HMG Source Syntax and Logic of CLICK
c:\hmg.3.4.4\SOURCE\H_GRID.PRG
Code: Select all
1017 IF AEC = 'EDITBOX'
DEFINE WINDOW _HMG_GRID_InplaceEdit AT 0, 0 ;
WIDTH 350 ;
HEIGHT 350 + IF( IsAppThemed(), 3, 0 ) ;
TITLE _HMG_SYSDATA[ 7 ] [ idx ] [ ci ] ;
MODAL ;
NOSIZE ;
SHORTTITLEBAR
ELSE
DEFINE WINDOW _HMG_GRID_InplaceEdit AT r + DR, c + DC ;
WIDTH This.CellWidth + DW ;
HEIGHT This.CellHeight + 6 + DH ;
TITLE '' ;
MODAL NOSIZE NOCAPTION
ENDIF
Code: Select all
3437 IF nR + nH > GetDeskTopRealHeight()
nDiff := nR + nH - GetDeskTopRealHeight()
// nR := nR - nDiff
DEFINE WINDOW _InputWindow AT nR, nC WIDTH nW HEIGHT( nH - nDiff ) ;
VIRTUAL HEIGHT nH VIRTUAL WIDTH nW + 20 ;
TITLE cTitle MODAL NOSIZE BackColor aBackColor ON RELEASE _InputWindowOnRelease(OldScrollStep, aHotKeys )
SET SCROLLSTEP TO 20
ELSE
DEFINE WINDOW _InputWindow AT nR, nC WIDTH nW HEIGHT nH ;
TITLE cTitle MODAL NOSIZE BackColor aBackColor ON RELEASE _InputWindowOnRelease( OldScrollStep, aHotKeys )
ENDIF
so i have change 2 lines in CLICK
NOT to use "DEFINE WINDOW" to indent
search for "Jimmy 20200921" in new CLICK.PRG
here changed Code
--- deleted ---
here working full Source Code (only PRG) v2.05.34
p.s.
when work with c:\hmg.3.4.4\SOURCE\*.PRG (no Subfolder) it need some small modification.
i will open extra Thread
have fun
Jimmy
Jimmy
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
hi,
Modification in v2.05.34 for HMG \Source work but it look not nice with "normal" Syntax.
So I add option in CLICK whether to indent DEFINE WINDOW or not Upgrade is just CLICK.PRG so you need last full Version.
Modification in v2.05.34 for HMG \Source work but it look not nice with "normal" Syntax.
So I add option in CLICK whether to indent DEFINE WINDOW or not Upgrade is just CLICK.PRG so you need last full Version.
have fun
Jimmy
Jimmy
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
latest CLICK Version 2.05.36
add "NODE" for DEFINE TREE like thisCode: Select all
DEFINE TREE Tree_1 ...
NODE 'Item 1'
TREEITEM 'Item 1.1'
TREEITEM 'Item 1.2' ID 999
TREEITEM 'Item 1.3'
END NODE
have fun
Jimmy
Jimmy
Re: prg code function documentor in HMG
hello Jimmy can compile with HMG ideAUGE_OHR wrote: ↑Mon Nov 16, 2020 1:15 am latest CLICK Version 2.05.36
CLICK20536.ZIP
add "NODE" for DEFINE TREE like this
Code: Select all
DEFINE TREE Tree_1 ... NODE 'Item 1' TREEITEM 'Item 1.1' TREEITEM 'Item 1.2' ID 999 TREEITEM 'Item 1.3' END NODE
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
hi,
Upgrade is just CLICK.PRG so you need last full Version.
have fun
Jimmy
Jimmy
-
- Posts: 188
- Joined: Thu Jul 16, 2020 5:42 pm
- DBs Used: DBF
Re: prg code function documentor in HMG
Wow. I remember CLICK, I didn't know someone built a harbour version. Thanks.
I have all the sources. Do we build it with hbmk2.bat?
I have all the sources. Do we build it with hbmk2.bat?
- AUGE_OHR
- Posts: 2060
- Joined: Sun Aug 25, 2019 3:12 pm
- DBs Used: DBF, PostgreSQL, MySQL, SQLite
- Location: Hamburg, Germany
Re: prg code function documentor in HMG
hi,
i have include *.HBP so you can use
Code: Select all
build CLICK.HBP
have fun
Jimmy
Jimmy
-
- Posts: 188
- Joined: Thu Jul 16, 2020 5:42 pm
- DBs Used: DBF
Re: prg code function documentor in HMG
Thanks Auge,
But I only see the PRGs. Which Zip file is the hbp file in?
Should I just throw in the full list CLICK files, CLICK,XBASE,FUNCTRAK, etc. into a CLICK.HBP?
But I only see the PRGs. Which Zip file is the hbp file in?
Should I just throw in the full list CLICK files, CLICK,XBASE,FUNCTRAK, etc. into a CLICK.HBP?