TBitmap kopieren

[Schneider-Huetter]

Hallo,
wird im folgenden Beispiel das Bitmap kopiert oder nur die Referenz darauf?

Delphi-Quellcode:

var
  bitmapSave, bitmapWork : TBitmap;
begin
  bitmapSave := TBitmap.Create;
  bitmapWork := TBitmap.Create;

  bitmapWork.LoadFromFile( 'foo.bmp' );
  
  // hier soll das Bitmap kopiert werden
  bitmapSave := bitmapWork;
  
  //mach irgendwas

  bitmapSave.Free;
  bitmapWork.Free;
end;