FiveTech Software tech support forums

Frank, The Windows API dialogboxes management has a different way to consider coordinates when creating a dialogbox. If you want to have exact coordinates, you may place the controls from the ON INIT clause of the dialogbox: ACTIVATE DIALOG oDlg ; ON INIT PlaceControls( oDlg ) ... ...

Antonio, what was the exact reason why you commented out the following statement from TDialog?

// 28/06/05 AL
// ::nResult:LostFocus() // updates related variable

EMG

... with SetSel() or it is just not the function I need. I still need to implement justification (npad above) and how to continue printing at the exact position that the last char was printed, but I'll get to that later. Right now, I only need to solve the setsel() problem. Please help. Reinaldo.

Enrico;

Thank you for your reply.

Added the line #include "dll.ch" at the top of the file, but I still get the exact same errors.


Reinaldo.

... in my code to stack. I did a complete search of the code to be sure. My program compiled beautifully with FWH 2.5 plus October xHarbour. The same exact script now will not link because of the _hb_stack issue. A utility program that does not use FWH builds just fine ! So ... what should we check ...

Grumpy:

But there is it. The exact link is:

http://www.vikthor.com.mx/fivewin/files ... apture.zip

Regards,

... found this runtime error in the previous xharbour build that you published : " " = "" is true for Clipper " " = "" is false for xHarbour when SET EXACT ON. This is a very important incompatibility between Clipper code and xHarbour code. You can tell me "it's easy to replace with the function Empty()", ...

... several code lines, to be sure xHarbour has no others very important bugs. Today i can't continue my tests because " " is not equal to "" when Set Exact is On, with the version of xHarbour i use. I could give you others informations to debug xHarbour today, if the latest update was in my pc. It's ...

From your sample

*************
FUNCTION TEST()
**********
LOCAL cName := SPACE(10)
SET EXACT ON
IF cName = ""
? "OK : This work like Clipper"
ELSE
? "STOP : This work bad"
ENDIF
INKEY(0)
RETURN NIL

I get

"OK : This work like Clipper"

using the latest xHarbour from CVS.

EMG

No error message now.

When there is SET EXACT ON, a cVariable with space(s),
like cVar := " ", is not equal to "" for xHarbour.
When SET EXACT OFF, it's ok, " " = "".
With Clipper, " " = "", always.

Badara

What is the exact error message you get?

EMG

This works fine for me:

*************
FUNCTION TEST()
**********
LOCAL cName := SPACE(10)
SET EXACT ON
IF cName = ""
? "OK : This work like Clipper"
ELSE
? "STOP : This work bad"
ENDIF
INKEY(0)
RETURN NIL

EMG

Thanks Enrico. Now i can run the program, but this code work bad : ************* FUNCTION TEST() ********** LOCAL cName := SPACE(10) SET EXACT ON IF cName = "" MessageBox("OK : This work like Clipper") ELSE MessageBox("STOP : This work bad") ENDIF RETURN NIL This is too hard... (But i confirm, ...