Page 9 of 11

Re: prg code function documentor in HMG

Posted: Wed Jan 22, 2020 8:01 am
by RPC
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.

Re: prg code function documentor in HMG

Posted: Thu Feb 06, 2020 8:13 am
by AUGE_OHR
hi,

this is the Clipper Source to get IndexKey() from NTX without load DBF.
INDDUMP.ZIP
(3.76 KiB) Downloaded 802 times
it use low level and read at byte 22
i have made some test and it seem still work after 20 year :D

Re: prg code function documentor in HMG

Posted: Mon Sep 21, 2020 1:37 am
by AUGE_OHR
hi,

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
c:\hmg.3.4.4\SOURCE\h_controlmisc.prg

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
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
hb_CLICK_20534.ZIP
(64.7 KiB) Downloaded 825 times

p.s.
when work with c:\hmg.3.4.4\SOURCE\*.PRG (no Subfolder) it need some small modification.
i will open extra Thread

Re: prg code function documentor in HMG

Posted: Wed Sep 30, 2020 11:43 pm
by AUGE_OHR
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
DEF_WIN.JPG
DEF_WIN.JPG (12.28 KiB) Viewed 31806 times
Upgrade is just CLICK.PRG so you need last full Version.
CLICK20535.ZIP
(26 KiB) Downloaded 875 times

Re: prg code function documentor in HMG

Posted: Mon Nov 16, 2020 1:15 am
by AUGE_OHR
latest CLICK Version 2.05.36
CLICK20536.ZIP
(26.14 KiB) Downloaded 614 times
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

Re: prg code function documentor in HMG

Posted: Mon Nov 16, 2020 2:29 am
by jairpinho
AUGE_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
hello Jimmy can compile with HMG ide

Re: prg code function documentor in HMG

Posted: Mon Nov 16, 2020 7:25 am
by AUGE_OHR
hi,
jairpinho wrote: Mon Nov 16, 2020 2:29 am hello Jimmy can compile with HMG ide
Upgrade is just CLICK.PRG so you need last full Version.

Re: prg code function documentor in HMG

Posted: Sat Apr 17, 2021 2:41 am
by HGAutomator
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?

Re: prg code function documentor in HMG

Posted: Sat Apr 17, 2021 5:20 am
by AUGE_OHR
hi,
HGAutomator wrote: Sat Apr 17, 2021 2:41 am I have all the sources. Do we build it with hbmk2.bat?
i have include *.HBP so you can use

Code: Select all

build CLICK.HBP  

Re: prg code function documentor in HMG

Posted: Thu Apr 22, 2021 2:05 am
by HGAutomator
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?