prg code function documentor in HMG

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

Tiger
Posts: 62
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei
Has thanked: 16 times
Been thanked: 13 times

Re: prg code function documentor in HMG

Post by Tiger »

AUGE_OHR wrote:
Tue Dec 03, 2019 11:49 pm
p.s.p.s. who have a list of "Keyword" for harbour/HMG to include
Attached a excel file that listed those keyword which I got from hmg\doc and two xml files from the notepad++ ...
Attachments
hmg_keyword.rar
(63.53 KiB) Downloaded 52 times

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hi,

thx for Keyword File that we can use.

Question : did got Click_3.01_HMG.rar running :?:

i got it running until BO_INIT which have a lot of Parameter which crash
when look into OBUFWRIT.PRG you will find FUNCTION BO_INIT() with 4 Parameter :!:

you also can see that Author have deactivate this line

Code: Select all

local cFullPath := if( file( 'CLICK.INI' ), 'CLICK', RootName( ft_origin() ) ) + '.ini'
---

i "think" my harbour FT_ORIGIN() have also Problem with Directory like c:\hmg.3.4.4\ with those "."

under Xbase++ this Code is working where CLICK.EXE / CLICK.INI is "in" Directory of PRG to analyze

Code: Select all

FUNCTION FT_ORIGIN()
return curdrive() + ":\" + curdir() + "\CLICK.EXE"
have fun
Jimmy

Tiger
Posts: 62
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei
Has thanked: 16 times
Been thanked: 13 times

Post by Tiger »

Sorry, I try it long time ago but it just fail .... so I just use the indent program to format the code ...

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hi,

got my Xbase++ CLICK Version running under harbour :!:
here is the hole Source
hb_CLICK_205.ZIP
(51.02 KiB) Downloaded 44 times
BUT ... it is extreme SLOW even used all 4 Core of my i5 :o
hb_Click_slow.jpg
hb_Click_slow.jpg (211.74 KiB) Viewed 728 times
good News : all seems to work correct "in 1st Generation"
what does it mean :?:

when start with F5 in IDE it will start App.
1st it create \clickout Directory and than begin with work.
new Source in \clickout seems fine and i compile it with Xbase++

now i start that Xbase++ App and it give me Warnings about "this" Code ... hm
looking into \clickout\clickout (2nd Generation) it have begin to work wrong to "intend". :shock:

it is going to right but does not "come back" to left.
but you can compile 2nd Generation Code again it it still work ... only looking bad

i think i got a old Cl*pper Soure somewhere which was to "save Space" which align all Code to left side.
than i can run it with CLICK again ...

but it is so SLOW so what do i miss :?: it it (default) MT :?:
have fun
Jimmy

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hi,

do NOT click with Mouse into "CLICK" while it is a Console App and it might enable copy/paste
when switch to other App "CLICK" might "wait of End od mark" and it seem not to work any more :o

so press ENTER and see if work go on.
have fun
Jimmy

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hi,

found out "2nd Generation" Problem ... it is "missing" CLICK.INI so it use "default" Value
as i say i recommend to use S87 Style so "indent" work correct.

my Version seem not to create CLICK.INI ... hm
so here is a CLICK.INI
click_INI.zip
(4.32 KiB) Downloaded 40 times
but it does not change SPEED Problem ... my Xbase++ Version use less 5 Seconds ... :roll:
>>>>>> Click! Run Start: 20191207 10:34:05
>>>>>> Click! Run End: 20191207 10:34:09
have fun
Jimmy

User avatar
serge_girard
Posts: 2518
Joined: Sun Nov 25, 2012 2:44 pm
DBs Used: 1 MySQL - MariaDB
2 DBF
Location: Belgium
Has thanked: 819 times
Been thanked: 154 times
Contact:

Post by serge_girard »

Anyway: it works well!

Thx ! Serge

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

serge_girard wrote:
Sat Dec 07, 2019 2:58 pm
Anyway: it works well!
but why is it so SLOW :?:

it is not not only a "bit slower" it is Factor 1000 ... instead of 4 Seconds it need 4000 Seconds.
but it is "only" Cl*pper Code no GUI so i must do something total wrong ... harbour can't be so slow :roll:

please help me to make it faster. which Compiler Option are used for "Cl*pper" :?:

p.s. how to disable MT :?: it seems me that Screen Output is not sync to what he is doing ...
have fun
Jimmy

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hi,

i have use *.HBC with

Code: Select all

GUI=NO
MT=NO
and disable
* REQUEST HB_GT_WIN_DEFAULT // Console
it did not show any Windows ... BUT
>>>>>> Click! Run Start: 20191207 22:32:16
>>>>>> Click! Run End: 20191207 22:32:18
NOW it have the Speed using 2 Seconds for same Work :D

so please tell me what is the Difference :?:
why will it be so slow when include

Code: Select all

REQUEST HB_GT_WIN_DEFAULT 
p.s. when not "see" App you can't terminate it and it is still in Taskmanager.
have fun
Jimmy

User avatar
AUGE_OHR
Posts: 943
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 145 times
Been thanked: 242 times

Post by AUGE_OHR »

hm ...
i just saw that my Xbase++ Version show "more" than harbour Version
Xb_Click.jpg
Xb_Click.jpg (122.89 KiB) Viewed 673 times
the lower Part is not visible under harbour ... can this made it so slow :?:
have fun
Jimmy

Post Reply