急问:怎样在画图画出带箭头的直线?

如题,在线等!  
   
  问题点数：50、回复次数：3Top

1 楼linzhengqun（风。我回来了）回复于 2004-08-01 00:35:29 得分 25

image2.Canvas.Pen.Color:=clred;  
        image2.Canvas.Pen.Width:=3;  
        image2.Canvas.MoveTo(10,10);  
        image2.Canvas.LineTo(100,10);  
        image2.Canvas.LineTo(20,90);  
        image2.Canvas.MoveTo(100,10);  
        image2.Canvas.LineTo(0,90);  
  这样是不是就出来的一个箭头直线啦,   原理就是如此.Top

2 楼xinshiji（自由我有）回复于 2004-08-01 01:40:50 得分 25

image1.Canvas.Pen.Width:=3;  
        image1.Canvas.MoveTo(0,0);  
        image1.Canvas.LineTo(100,100);  
        image1.Canvas.LineTo(94,90);  
        image1.Canvas.MoveTo(100,100);  
        image1.Canvas.LineTo(90,94);  
  你可以试试这个的效果。  
  Top

3 楼iampolaris（北极星）回复于 2004-08-01 09:44:23 得分 0

谢谢呢  
   
  还有就是在用串口通信的时候  
  在接受或者发送数据的时候,怎样将16进制数转换成ASCII代码呢Top

相关问题

• canvas
• lineto
• moveto
• image
• pen

• 帖主：iampolaris
• linzhengqun
• xinshiji

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载