[RESOLVED] graphic draw line

[matrik02]

I want to draw line in picture box, When I compare with the autocad, the line much difference of what it draw in Autocad. Why? I thnik, it problem with The coordinate system in the picture box, How to change the coordinate system of picture box so that the its origin 0,0 stat at lower-left corner

Picture1.Line (Text1.Text, Text2.Text)-(Text3.Text, Text4.Text), vbBlue
Picture1.FillStyle = 0
Picture1.FillColor = vbRed
Picture1.Circle (Text1.Text, Text2.Text), 100
Picture1.FillStyle = 0
Picture1.FillColor = vbRed
Picture1.Circle (Text3.Text, Text4.Text), 100

[Doogle]

Just subtract your 'Y' values from Picture1.ScaleHeight

Picture1.Line(Text1.Text, Picture1.ScaleHeight - Text2.Text) - (Text3.Text, Picture1.ScaleHeight - Text4.Text)

[matrik02]

It work,

Why you use Picture1.ScaleHeight? I cannot imagine. And why substract from Y, not from X ?

[Doogle]

Because X = 0 is the left hand side of the PictureBox and Picture1.Scalewidth is the bottom of the PictureBox.