Ich habe gerade eine Klasse geändert VCL in Delphi 5 Dieser Artikel wird den Überblick über all diese Veränderungen und warum halten.
Sicherstellen, dass der Ordner in Ihrem Pfad oder Bibliothekseinheiten verändert sich nicht kompilieren.
Bei Verwendung eines TCollection mit Tausenden von Objekten, kann die Befreiung der Sammlung ein bisschen "Zeit (10 Sekunden auf meinem Duron 700 von 3000 Artikel) statt.
ändern in Classes.pas
Verfahren TCollection.RemoveItem (Voice: TCollectionItem);
var
Count: Integer;
Start
NotifyDesigner (self, Stimme, opRemove);
Graf: = FItems.Count;
if (count> 0) und (item = FItems [Count - 1]), so
FItems.Delete (Anzahl - 1)
andere
FItems.Remove (Gesang);
Item.FCollection: = nil;
Geändert wird;
Ende;
Kommentare - 0