FiveTech Support Forums

Any news?

EMG

I'm still waiting...

EMG

EnricoMaria wrote:This is a sample:

Code: Select all Collapse

#include "Fwce.ch"


FUNCTION MAIN()

    LOCAL oWnd

    LOCAL nVar := 123.45

    DEFINE WINDOW oWnd

    @ 1, 1 SAY "Test:  "

    @ 1, 10 GET nVar;
            SIZE 70, 20;
            PICTURE "@E 9999.99";
            RIGHT

    ACTIVATE WINDOW oWnd

    RETURN NIL

EMG

Antonio Linares wrote:The problem comes from the PICTURE. If it is not used, then the ES_RIGHT style is working fine:

Code: Select all Collapse

    @ 1, 10 GET nVar; 
            SIZE 75, 20; 
            RIGHT

    REDEFINE SAY oSay PROMPT cVar
       oSay:bGet := {|| Transform( nVar, "@E 999,999.99" ) }

Ugo,

You may use PadL() to add spaces on the left side. is that ok ?