Hat sich erledigt...
Funktioniert so:
Delphi-Quellcode:
procedure zeichneWas(xPos : Integer; yPos : Integer; Image : TImage);
begin
MyBitmap := TBitmap.Create();
// irgenwas zeichnen
Image.Canvas.Draw(xPos,yPos,MyBitmap);
MyBitmap.Free;
end;
der Aufruf geht dann z.B. so, wobei Image2 das Zielimage ist.
zeichneWas(10,10,Image2);