如何将位图附加到 AggPas 图像？
我正在尝试使用 AggPas 但发现文档缺少将其附加到位图的代码示例。
我有这段代码：
procedure DrawScene();
var
ObjLength,LineLength,Filllength,Obj,lin,angle,i:integer;
Npoints : array[0..1] of Tpoint;
VG: Tagg2d;
DOB:Tobject;
Objmap,wholemap:TBitmap;
begin
wholemap := TBitmap.Create;
wholemap.PixelFormat:=pf32bit;
VG := Tagg2d.create;
if VG.attach(wholemap,False) then
showmessage('true')
else
showmessage('false');
wholemap.Width:=area;
wholemap.height:=area;
但它返回 false，据我所知，我做的事情是正确的。我一定是错过了什么。
I'm trying to use AggPas
but find the documentation to lack code examples of attaching it to a bitmap.
I have this code:
procedure DrawScene();
var
ObjLength,LineLength,Filllength,Obj,lin,angle,i:integer;
Npoints : array[0..1] of Tpoint;
VG: Tagg2d;
DOB:Tobject;
Objmap,wholemap:TBitmap;
begin
wholemap := TBitmap.Create;
wholemap.PixelFormat:=pf32bit;
VG := Tagg2d.create;
if VG.attach(wholemap,False) then
showmessage('true')
else
showmessage('false');
wholemap.Width:=area;
wholemap.height:=area;
But it's returning false and as far as I can see I'm doing things right. I must be missing something.
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（1）
在将 VG 附加到位图之前，您必须先定义位图尺寸。
另外，在执行附加操作后，不要更改位图尺寸，这可能会导致 AV（出于渲染目的，您必须在尺寸更改后执行新的附加操作）。
You have to define Bitmap dimension BEFORE attaching a VG onto it.
Also, after you do Attach don't change bitmap dimension, it might cause an AV (you have to do a new Attach after dimensions change for rendering purposes).