Einzelnen Beitrag anzeigen

Popov
(Gast)

n/a Beiträge
 
#14

AW: TObjectList und Delete

  Alt 31. Okt 2012, 23:51
Danke, wollte gerade schreiben, dass laut dem Beispiel Remove Capacity auch nicht reduziert.

Delphi-Quellcode:
var
  ol: TObjectList;
  icon: TIcon;
  i: Integer;
begin
  ol := TObjectList.Create;

  for i := 1 to 5 do
  begin
    icon := TIcon.Create;
    ol.Add(Icon);
  end;
  ShowMessage(Format('Count: %d, Capacity: %d', [ol.Count, ol.Capacity]));

  for i := 1 to 5 do ol.Remove(ol.Items[0]);
  {for i := 1 to 5 do ol.Delete(0);}
  ShowMessage(Format('Count: %d, Capacity: %d', [ol.Count, ol.Capacity]));

  ol.Free;
end;
Somit wäre der Punkt bestätigt.

Das mit Notify gucke ich mir jetzt mal an. Ich dachte mir zwar etwas in die Richtung, aber...
  Mit Zitat antworten Zitat