Andorra 2D Render Target

[bassman]

Hallo Andorrianer,

Ich versuche mit Lazarus (Linux) auf ein Render Target zu Zeichnen, z.B. ein Panel.

Anscheinen soll dies mit AdDraw.Window.BindTo gehen.

Mein bisheriger Versuch:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  //Create the main surface.
  AdDraw := TAdDraw.Create(nil);
  //Get a plugin.
  AdDraw.DllName := './openglAndorraOGLLaz.so';

  if not AdDraw.Initialize then
  begin
    ShowMessage('War wohl nix');
    Close;
  end else
  begin
    AdDraw.Display.Width    := 176;
    AdDraw.Display.Height   := 144;
    AdDraw.Display.BitDepth := ad32Bit;
    if not AdDraw.Window.BindTo(@Panel1) then //Was muss ich hier an die Funktion übergeben?
    begin
      ShowMessage('Binding failed');
    end;
  end;
end;

Wäre toll, wenn mich jemand auf die richtige Fährte lotzen könnte.

Jörn

[Neutral General]

Hi,

Ich glaube folgendes reicht schon:

Delphi-Quellcode:

AdDraw := TAdDraw.Create(Panel1);

Edit: Und wenn dann muss es wahrscheinlich

Delphi-Quellcode:

AdDraw.Window.BindTo(Panel1)

heißen. Ohne das @.

Gruß
Neutral General

[bassman]

Zitat:

AdDraw := TAdDraw.Create(Panel1);

War die Lösung. Danke.