怎样在一创建的TBitmap上画线

newair 2003-08-13 02:47:44
怎样在一创建的TBitmap上画图
麻烦给一个简单完整的例子

...全文
47 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
上海老李 2003-08-13
  • 打赏
  • 举报
回复
hehe
DWGZ 2003-08-13
  • 打赏
  • 举报
回复
Bmp.Canvas.MoveTo(10, 10);
Bmp.Canvas.LineTo(20, 20);
zdcnow 2003-08-13
  • 打赏
  • 举报
回复
//画一条线
procedure TForm1.Button1Click(Sender: TObject);
var
b:TBitmap;
begin
b:=TBitmap.Create;
b.Width:=100;
b.Height:=100;
b.Canvas.MoveTo(1,1);
b.Canvas.LineTo(100,100);
b.SaveToFile('c:\test.bmp');
b.Free;
end;

1,183

社区成员

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

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