O.K. es ist mir immernoch nicht ganz klar.
Deshalb möchte ich gleich zu Praxis übergehen.
Hier ist mein Quelltext:
[delphi]
Bild: TBitmap;
...
Bild:= TBitmap.Create;
...
Bild.Width:= 50;
Bild.Height:= 50;
with Bild.Canvas do begin
Brush.Style:= bsSolid;
Brush.Color:= clWhite;
fillRect(rect(0,0,50,50));
end;
BitBlt(PaintBox1.Canvas.Handle,0,0,Paintbox1.Width ,Paintbox1.Height,
Bild.Canvas.Handle,0,0,SRCCOPY);
Was fehlt hier? Außer einen Graphen natürlich.
P.S.: Bild.Free ist dann später beim Destroy.