Yohn
Member
Hy!
I need to position on frame, but I need to enter Y and X values in fill in.
How do I do that, here is my code:
I have a button and on click he calls procedure for creating dynamic button
which will be position on frame.
procedure create dynamic button on frame:
CREATE BUTTON hbtnT
ASSIGN
X = Z
Y = G
FRAME = FRAME DEFAULT-FRAME:HANDLE
VISIBLE = TRUE
LABEL = Slovo
SENSITIVE = YES.
hbtnt:WIDTH = 5.
END PROCEDURE.
and procedure for display that button in frame
Y = 50.
DO X = 40 TO 240 BY 25:
IF iCounter = 5 THEN iPrirast = -1.
RUN dynButton (X,Y,substring(totar, iCounter, 1)).
iCounter = iCounter + iPrirast.
END.
X = 140.
DO Y = 75 TO 290 BY 25:
RUN dynButton (X,Y,"").
END.
END PROCEDURE.
I place on frame fill in iCordinateY as integer.
thx.
I need to position on frame, but I need to enter Y and X values in fill in.
How do I do that, here is my code:
I have a button and on click he calls procedure for creating dynamic button
which will be position on frame.
procedure create dynamic button on frame:
CREATE BUTTON hbtnT
ASSIGN
X = Z
Y = G
FRAME = FRAME DEFAULT-FRAME:HANDLE
VISIBLE = TRUE
LABEL = Slovo
SENSITIVE = YES.
hbtnt:WIDTH = 5.
END PROCEDURE.
and procedure for display that button in frame
Y = 50.
DO X = 40 TO 240 BY 25:
IF iCounter = 5 THEN iPrirast = -1.
RUN dynButton (X,Y,substring(totar, iCounter, 1)).
iCounter = iCounter + iPrirast.
END.
X = 140.
DO Y = 75 TO 290 BY 25:
RUN dynButton (X,Y,"").
END.
END PROCEDURE.
I place on frame fill in iCordinateY as integer.
thx.