Bitmap mit Hintergrund drucken

[thomas2009]

Hallo
standardmässig wird die Bitmap ohne Hintergrund (wenn die Farbe Weß) als transparent gedruckt
Wie kann ich beim Drucken die Hintergrund-Farbe steuern ?
SetBkMode(Printer.Canvas.Handle, TRANSPARENT);// sagt mir nicht viel

[s.h.a.r.k]

Zeichne halt ein Rechteckt auf das Canvas, bevor du andere Sachen drauf pinselst. Und zum Thema Zeichnen auf Canvas gibt ausreichend Threads hier im Forum.

[thomas2009]

Wie meinst Du ?
Hier ist ein Beispiel :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
bmp: TBitmap;
begin
bmp:=Tbitmap.Create;
bmp.PixelFormat:=pf24Bit;
bmp.Width:=400;
bmp.Height:=400;
Image1.Picture.Bitmap.Assign(bmp);
image1.Canvas.Pen.Width:=2;
image1.Canvas.Pen.Color:=ClRed;
image1.Canvas.Rectangle(2,2,396,396);
bmp.Free;

// nun drucken
with printer do begin
    BeginDoc;
    SetBkColor(Canvas.Handle,clYellow);
    Canvas.Draw(0,0,Image1.Picture.Bitmap);
    EndDoc;
    end;
end;

[himitsu]

Zu deinem SetBkColor:
Hast du mal im MSDN nachgelesen, was das überhaupt macht?
Speziell das Ende des ersten Absatzes, in Remarks, kann ich dir wärmstens empfehlen.

Zitat:

Zeichne halt ein Rechteckt auf das Canvas

Zitat:

Wie meinst Du ?

Zeichnet SetBkColor ein Rechteck?
PS: Schau mal was du in deinem image1 gemacht hast.