Как мне прикрепить растровое изображение к изображению 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;

Но это возвращает ложь, и, насколько я понимаю, я все делаю правильно. Я должно быть что-то упустил.

Answer 1

Вы должны определить размер растрового изображения ДО прикрепления к нему VG.Кроме того, после того как вы подключите, не изменяйте размер растрового изображения, это может привести к возникновению AV (вам нужно будет выполнить новое присоединение после изменения размеров для целей рендеринга).