Naja...du zeichnest wunderbar aufs Bitmap..aber das wird erstmal nirgends angezeigt, ist also sozusagen unsichtbar.
Um das ganze anzugzeigen mußt du das Bitmap auch auf die Form zeichnen. Dafür würde sich das
Ereignis onPaint des Formulars anbieten.
Das ganze könnte dann so aussehen (ungefähr !):
Delphi-Quellcode:
procedure TForm1.FormPaint(Sender:TObject);
begin
bitblt(canvas.handle,Clientrect.left,clientrect.top,clientwidth,clientheight,bm.canvas.handle,0,0,SRCCCOY);
end;
Damit solltest du dein Bitmap auch auf der Form sehen.