Basic syntax (for line, rectangle, square)
=============================
Expand|Select|Wrap|Line Numbers
- OBJECT.LINE [STEP] (X1, Y1) [STEP] -(X2, Y2), [COLOR], [B[F]]
X1, Y1 -- SINGLE VALUES INDICATING THE COORDINATES OF THE STARTING POINT FOR THE LINE OR RECTANGLE. IF OMITTED THE LINE BEGINS AT THE POSITION INDICATED BY CURRENTX AND CURRENTY.
STEP -- KEYWORD SPECIFYING THAT THE END POINT COORDINATES ARE RELATIVE TO THE LINE STARTING POINT.
X2, Y2--SINGLE VALUES INDICATING THE COORDINATES OF THE END POINT FOR LINE BEING DRAWN.
COLOR -- INDICATES THE COLOR OF THE LINE. CAN USE RGB() OR QBCOLOR() FUNCTIONS, OR NAMED COLOR CONSTANTS SUCH AS vbGreen.
IF OMITTED, THE CURRENT VALUE OF THE FORECOLOR PROPERTY IS USED.
B -- ("BOX") - IF INCLUDED, CAUSES A BOX TO BE DRAWN USING THE COORDINATES TO SPECIFY OPPOSITE CORNERS OF THE BOX.
F -- ("FILL") - CAN ONLY BE USED WITH "B" OPTION. IF USED, "F" SPECIFIES THAT THE BOX IS TO BE FILLED WITH SAME COLOR USED TO DRAW THE BOX. IF B IS NOT FILLED WITH F(F option is not used), THE BOX IS FILLED WITH CURRENT "FILLCOLOR" AND "FILLSTYLE". DEFAULT VALUE FOR FILLSTYLE IS TRANSPARENT.
Expand|Select|Wrap|Line Numbers
- Me.Line Step(7000, 5000)-Step(2000, 4000), QBColor(5), BF
================================================
Expand|Select|Wrap|Line Numbers
- OBJECT.CIRCLE [STEP] (X, Y), RADIUS, [COLOR, START, END, ASPECT]
X, Y -- COORDINATES INDICATING THE CENTER POINT OF THE CIRCLE OR ELLIPSE.
RADIUS -- INDICATES THE RADIUS OF THE CIRCLE OR ELLIPSE.
START, END -- WHEN AN ARC (A PARTIAL CIRCLE) IS TO BE DRAWN, START AND END SPECIFY THE BEGINNING AND THE ENDING POSITION OF THE ARC.
THE RANGE FOR BOTH IS -2Pi RADIAN TO 2Pi RADIAN. THE DEFAULT VALUE FOR START IS 0 RADIANS AND THAT FOR END IS 2Pi RADIANS. IN OTHER WORDS, THE DEFAULT IS TO DRAW A COMPLETE CIRCLE OR ELLIPSE.
ASPECT -- INDICATES THE ASPECT RATIO OF THE CIRCLE/ELLIPSE. DEFAULT IS 1.0, WHICH YIELDS A PERFECT CIRCLE ON ANY SCREEN.
Expand|Select|Wrap|Line Numbers
- Me.Circle (ScaleWidth / 2, ScaleHeight / 2), Switch(ScaleWidth >= ScaleHeight, ScaleHeight / 2, ScaleWidth < ScaleHeight, ScaleWidth / 2), vbRed, 0, 3, 0.8