如何画直线能看到画的过程!

win20000 2004-01-20 05:52:18
大家好
...全文
27 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
myling 2004-01-20
  • 打赏
  • 举报
回复
你在timer事件里写
begin
Image.Canvas.MoveTo(TopLeft.x,TopLeft.y);
Image.Canvas.Lineto(TopLeft.x,TopLeft.y);
inc(TopLeft.x);
inc(TopLeft.y);
end

TopLeft是全局变量


你这样看看:)
ly840325 2004-01-20
  • 打赏
  • 举报
回复
用TIMER 然后作图可能可以
Eastunfail 2004-01-20
  • 打赏
  • 举报
回复
这样也看不到画线的过程的
win20000 2004-01-20
  • 打赏
  • 举报
回复
我就是提问的新手。
我看见书上是这样写的:
var
TopLeft,BottomRight:TPoint;
begin

Image.Canvas.MoveTo(TopLeft.x,TopLeft.y);
Image.Canvas.Lineto(BottomRight.x,BottomRight.y);
end
为啥等我用了就不灵了呀?
郁闷!
tellyes 2004-01-20
  • 打赏
  • 举报
回复
我倒是作过,只是代码在天津,我人有不在那里,如果你不急,过完年给你.
Eastunfail 2004-01-20
  • 打赏
  • 举报
回复
用高中学的直线方程,一个一个的画点.

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧