Speicher richtig freigeben

[Martin K]

Hi, hab mal ne Frage zum Freigeben des Speichers:

Ich füge zur Laufzeit in FormCreate Bitmaps einer ToolBar hinzu.
Dabei erhalte ich das Bitmap aus einer Funktion, in der das Bitmap erzeugt wird.

Hier mal ein vereinfachtes Beispiel:

Delphi-Quellcode:

function MyBitmap: TBitmap;
begin
  Result := TBitmap.Create;
  Result.LoadFromFile...
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ToolBar1.Images := TImageList.Create(ToolBar1);
  ToolBar1.Images.AddMasked(MyBitmap, clBlack);
end;

Erhalte ich so ein Speicherleck, weil das Bitmap nicht wieder freigegeben wird?
Oder wird es automatisch freigegeben, da es zur ToolBar gehört und die ToolBar zu Form1 ?