Needed the graph function GetMaxX() and GetMaxY()

[Techno]

Dear Support

1) Where can I find in the online manual for return the maximum X and Y coordinate? I don't know how I can this written in an function?

2) How can I this ported into EBASIC ?? its for my tesis

Code Select Expand



/* MoveTo(wx(100), wy(100 + 3 * Buffer[Channel])) */

/* LineTo(wx(100 + Round(i * 0.8)), wy(100 + 3 * Buffer[i * 4 + Channel) */
LINETO hWnd, wx(100 + ROUND(i * 0.8), wy(100 + 3 * Buffer[i * 4 + Channel)

/* Str(0.5 * i : 2 : 1, Aantal) => Str([integer_var][real_var] : [colums] : [decimal_pos], string) */
I try this:

SUB STR(DOUBLE d, INT n), STRING
SETPRECISION(n)
RETURN STR$(d)
ENDSUB

/* Main program */
/* Call the function */
DEF s AS STRING
s = STR((0.5 * i), 2)

/* OutTextXY(wx(90), wy(100 + 75 * i, Aantal */
MOVE hWnd, 4, 40
PRINT hWnd, STR$(wx(90) + wy(100 + 75 * i)), STR$(Aantal)

/* MoveTo(wx(100), wy(100 + 3 * Buffer[Channel])) */
Where can I find this function, or how can I written this?

/* Where can I find this function SetTextJustify(). I have need this function but how can I write this */
/* Syntax : SUB SetTextJustify(Horizontal AS WORD, Vertical AS WORD) */
/* CONST LEFT_TEXT = 0 */
/* CONST CENTER_TEXT = 1 */
/* CONST RIGHT_TEXT = 2 */
/* CONST BOTTOM_TEXT = 0 */
/* CONST TOP_TEXT = 1 */



Can someone help me if that ported correctly into EBASIC
I have need this functions need for my tesis work
Kind regards
Stephane
Kind regards
Stephane

[sapero]

Code Select Expand

int x,y
getscreensize x,y
x--
y--

[Techno]

Thanks Sapero

And the others questions. I will see an worked memoryscoop today and you can help me for an worked application

I try this written in an function:

int x,y
getscreensize x,y
x--
y--

SUB GetMaxX(x AS UINT), UINT
      GETSCREENSIZE(x, y)
      RETURN x--
END SUB

SUB GetMaxY(y AS UINT), UINT
      GETSCREENSIZE(x, y)
      RETURN y--
END SUB

Is that correct?


Stephane

[sapero]

No, the -- operator does not return any values in Ebasic.

Code Select Expand

SUB GetMaxY(),UINT
UINT x,y
GETSCREENSIZE(x, y)
RETURN y-1
END SUB

[Techno]

Sapero

Can you please ask my others questions about my application?

1e)

/* MoveTo(wx(100), wy(100 + 3 * Buffer[Channel])) */

2e)
/* Str(0.5 * i : 2 : 1, Aantal) => Str([integer_var][real_var] : [colums] : [decimal_pos], string) */
I try this:

SUB STR(DOUBLE d, INT n), STRING
   SETPRECISION(n)
   RETURN STR$(d)
ENDSUB

3e)
/* OutTextXY(wx(90), wy(100 + 75 * i, Aantal */
MOVE hWnd, 4, 40
PRINT hWnd, STR$(wx(90) + wy(100 + 75 * i)), STR$(Aantal)

4e)

/* Where can I find this function SetTextJustify(). I have need this function but how can I write this */
/* Syntax : SUB SetTextJustify(Horizontal AS WORD, Vertical AS WORD) */
/* CONST LEFT_TEXT = 0 */
/* CONST CENTER_TEXT = 1 */
/* CONST RIGHT_TEXT = 2 */
/* CONST BOTTOM_TEXT = 0 */
/* CONST TOP_TEXT = 1 */

Kind Regards
Stephane

I hope that my GUI applications works !