Delphi图像处理问 Delphi有没有图像控件可以作为容器,放置Label等控件,并保存为图片文件如.bmp? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);begin Image1.AutoSize := True; Image1.Picture.Bitmap.Width := Panel1.Width; Image1.Picture.Bitmap.Height := Panel1.Height; Image1.Picture.Bitmap.Canvas.FillRect(Image1.Picture.Bitmap.Canvas.ClipRect); Panel1.PaintTo(Image1.Picture.Bitmap.Canvas, 0, 0);end; delphi idhttp cookies提交 一个最容易得分的问题!!!(dispatch table) 各位帮帮忙,高分收购串口通讯的源代码!!!!(急) 那位大侠能帮我解决三层体系中SocketConnection的稳定性问题 大家平常做帮助文档和安装程序都用什么啊? 关于报表转EXCEL Word中的每一页,都保存成一个独立的图片。代码我已实现一部分,还有定位每一页问题没解决。有兴趣的看看 help:如何打开.NYF 各位大哥都使用什么报表工具,我不想用quickreport.送分100 关于socket通信的难题 怎样写程序将另一台电脑上的共享文件夹映射成本地硬盘? 回来了~
begin
Image1.AutoSize := True;
Image1.Picture.Bitmap.Width := Panel1.Width;
Image1.Picture.Bitmap.Height := Panel1.Height;
Image1.Picture.Bitmap.Canvas.FillRect(Image1.Picture.Bitmap.Canvas.ClipRect);
Panel1.PaintTo(Image1.Picture.Bitmap.Canvas, 0, 0);
end;