不会用image的canvas画图(10分)

E

EdwinYeah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-01

• #1

用以下几行代码为何不能画出一条线?
Form1.Image1.Canvas.Pen.Color := clYellow;
Form1.Image1.Canvas.Brush.Color := clYellow;
Form1.Image1.Canvas.MoveTo(10, 10);
Form1.Image1.Canvas.MoveTo(30, 30);

上面用到的坐标在显示范围之内.

 

C

charlie chen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-01

• #2

第四句错：Form1.Image1.Canvas.LineTo(30,10);

 

L

liangjinguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-01

• #3

moveto(x:integer;y:integer)的功能只是将坐标移到(x,y),
接下来要用lineto(x1:integer;y1:integer)连线到(x1,y1)点.

 

E

EdwinYeah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-04

• #4

是我搞错了.
其实我贴的代码并不是和我程序里的一样,后面那句用的是LineTo.
程序出错是由于LineTo的参数不正确.
虽然问题自己解决了,但分还是要给两位大侠.

 

E

EdwinYeah

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-04

• #5

多人接受答案了。