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