delphi - ビットマップを AggPas 画像に添付するにはどうすればよいですか?

Question

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を返しています。私が見る限り、私は正しいことをしています。私は何かが欠けているに違いない。

Answer 1

VG をアタッチする前にビットマップ ディメンションを定義する必要があります。また、Attach do not change bitmap dimension を実行した後、AV が発生する可能性があります (レンダリング目的でサイズ変更後に新しい Attach を実行する必要があります)。