I was applying the solution to the problem when you press ENTER, when I noticed a lot of problems inside "HMG.ch".
I will give you an example: TEXTBOX. Within "HMG.CH" I can find this:
Code: Select all
DEFINE TEXTBOX <oObj>..... => With Object <oObj> := TEXTBOX():New( <"oObj">..........
Code: Select all
DEFINE TEXTBOX <oObj> ..... => With Object TEXTBOX():New( <"oObj">..........
1) With use of switch "/w3" (Harbour compiler) you can find a lot of errors: many var are undeclared and so on. With "/w0", obviously, no errors but not every time.
2) Because with XBase (old HMG3) we have this syntax: FormName.ControlName.Value and not ControlName.Value And the first syntax do it.
3) On the other hand, with HMG4 parent system, we can use "FormName:ControlName:Value" without problem. I've tested.
So, in my program I write:
Code: Select all
DEFINE TEXTBOX NameOfTextbox
....
END TEXTBOX
If I write with OOP (new HMG4) syntax, the problem is different, because I apply directly the OOP syntax to my program:
Code: Select all
WITH OBJECT NameOfTextbox := TEXTBOX():New()
........
END WITH
It's my mystake/misunderstanding? What do you think?
I can clean "HMG.ch" before a commit, but I want your opinion.
Best regards