Rückgabewert von Function freigeben

[alcaeus]

Kann mir das mal jemand erklären?

nehmen wir an ich hätte folgende Funktion:

Delphi-Quellcode:

function Foo: TBitmap;
begin
  Result := TBitmap.Create;
end;

Wenn ich nun das mache:

Delphi-Quellcode:

var
  B: TBitmap;
begin
  B := Foo;
  B.Free;
end;

Theoretisch müsste wohl B freigegeben werden, also das Objekt das "Foo" erstellt hat, schließlich wird das Objekt bei den Zuweisungen nicht kopiert, oder doch?

Greetz
alcaeus