请问-在LineTo时出现 [存储空间不足,无法处理此命令。]的错误提示怎么解决?

suihu 2005-04-26 09:53:02
我在执行下面的代码时是正确的。
 
 Image1.Height:=11650;
 Image1.Width:=2001;
 Image1.Left:=0;
 Image1.Top:=0;
 Image1.Canvas.Pen.Color:=clRed ;
Image1.Canvas.Pen.Width:=1;
Image1.Canvas.MoveTo(0,0);
Image1.Canvas.LineTo(122,211);
Image1.Canvas.LineTo(2000,11650);

但是把上面的 11650 改成大于 11650 以上的数时就会弹出
[存储空间不足,无法处理此命令。]的错误提示
请问这样的错误怎么解决?
...全文
58 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
crix 2005-04-26
  • 打赏
  • 举报
回复
你这么做很难理解,Image1.Canvas.LineTo(2000,11650)这句话就有问题,你图像的Image1.Height:=11650,所以你超过11650时候会出错,现在你可以这样修改Image1.Height:=(大于)11650就可以了!

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi GAME,图形处理/多媒体
社区管理员
  • GAME,图形处理/多媒体社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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