Events und SpeicherLeaks bei dynamischen Buttons

[frankyboy1974]

Hallo,

der Quellcode kommt mir etwas seltsam vor

Delphi-Quellcode:

function TButtonNames.ButtonsForForm2(anzahlButton: integer): TArrayOfTBitBtn;
begin
  for i := 0 to anzahlButton - 1 do
  begin
    fbuttons[i] := TBitBtn.Create(form);
    fbuttons[i].OnClick := handlerKlickEvent.GetKlick;
end;
function TButtonNames.ButtonsForForm3(anzahlButton: integer): TArrayOfTBitBtn;
begin
  for i := 0 to anzahlButton - 1 do
  begin
    fbuttons[i] := TBitBtn.Create(form);
    fbuttons[i].OnClick := handlerKlickEvent.GetKlick;
end;

Ohne es ausprobiert zu haben, fehlt hier nicht ein (zwei) End;

mfg

frank