[RESOLVED] Making shapes in picture boxes

[idecoyx]

Im trying to make an application where you type 4 numbers... an x1 coordinate, a y1 coordinate, an x2 coordinate, and a y2 coordinate in text boxes. When you type these in and click the command button a line with these coordinates appears inside a picture box. I have the form all set up frmlines.frm Thanks

[Siddharth Rout]

Yes it is possible. Use the Picture1.Line to draw the shape

Private Sub DrawSquare()
    '~~> This will draw a square
    '~~> You can replace the hardcoded values
    '~~> with the textboxes values
    Picture1.Line (2500, 2200)-(3000, 2200), vbBlue
    Picture1.Line (3000, 2200)-(3000, 1800), vbBlue
    Picture1.Line (3000, 1800)-(2500, 1800), vbBlue
    Picture1.Line (2500, 1800)-(2500, 2200), vbBlue
End Sub

Edit:

Similarly to draw a circle, you can use

Picture1.Circle (2050, 2200), 1000

[LaVolpe]

Yes it is possible. Use the Picture1.Line to draw the shape

Private Sub DrawSquare()
    '~~> This will draw a square
    '~~> You can replace the hardcoded values
    '~~> with the textboxes values
    Picture1.Line (2500, 2200)-(3000, 2200), vbBlue
    Picture1.Line (3000, 2200)-(3000, 1800), vbBlue
    Picture1.Line (3000, 1800)-(2500, 1800), vbBlue
    Picture1.Line (2500, 1800)-(2500, 2200), vbBlue
End Sub

Sid's code above draws lines not squares/rectangles as his comments say. Squares/rectangles can be drawn with additional parameters to the .Line method: B (block) or BF (block fill)

[Siddharth Rout]

Sid's code above draws lines not squares/rectangles as his comments say.

Attaching an example...

[idecoyx]

Sid's code above draws lines not squares/rectangles as his comments say. Squares/rectangles can be drawn with additional parameters to the .Line method: B (block) or BF (block fill)

Could you show me a line using these methods?

[Golgo1]

Help files

Syntax
object.Line [Step] (x1, y1) [Step] - (x2, y2), [color], [B][F]

The Line method syntax has the following object qualifier and parts:

Part Description
object Optional. Object expression that evaluates to an object in the Applies To list. If object is omitted, the Form with the focus is assumed to be object.
Step Optional. Keyword specifying that the starting point coordinates are relative to the current graphics position given by the CurrentX and CurrentY properties.
(x1, y1) Optional. Single values indicating the coordinates of the starting point for the line or rectangle. The ScaleMode property determines the unit of measure used. If omitted, the line begins at the position indicated by CurrentX and CurrentY.
Step Optional. Keyword specifying that the end point coordinates are relative to the line starting point.
(x2, y2) Required. Single values indicating the coordinates of the end point for the line being drawn.
color Optional. Long integer value indicating the RGB color used to draw the line. If omitted, the ForeColor property setting is used. You can use the RGB function or QBColor function to specify the color.
B Optional. If included, causes a box to be drawn using the coordinates to specify opposite corners of the box.
F Optional. If the B option is used, the F option specifies that the box is filled with the same color used to draw the box. You cannot use F without B. If B is used without F, the box is filled with the current FillColor and FillStyle. The default value for FillStyle is transparent.


Remarks

To draw connected lines, begin a subsequent line at the end point of the previous line.

The width of the line drawn depends on the setting of the DrawWidth property. The way a line or box is drawn on the background depends on the setting of the DrawMode and DrawStyle properties.

When Line executes, the CurrentX and CurrentY properties are set to the end point specified by the arguments.

[Siddharth Rout]

@idecoyx: Did you even check the sample project that I uploaded?