Image32 und drucken?

[mlspider]

Ich versuche ein Bild das in einer Image32-Kompo aus GR32 geladen wurde wie folgt zu drucken:

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
begin
 printer.begindoc;
 printer.canvas.draw(1, 1, Vorschau.Bitmap.Canvas );
 printer.enddoc;
end;

Gibt mir leider einen Fehler aus:

Inkompatible Typen: TGraphic und TCanvas

[DGL-luke]

Na klar... du kannst da nicht das Canvas übergeben. Die Funktion verlangt da ein TGraphic.

Ich würde das per CopyRect machen.

[mlspider]

Und wie würde das im Klartext aussehen?

[DGL-luke]

Naja...

printer.Canvas.CopyRect(rect(0,0,x,y),Image32.Canvas,rect(0,0,x,y)); die rechtecke natürlich mit sinnvollen werten füllen ^^