Forum: Object-Pascal / Delphi-Language
by norwegen60,
26. Jan 2017
Hallo,
warst nicht du gemeint sondern die anderen in dem erwähnten Thread.:-D
Weil ich es eben so verstanden hatte, dass TObjectList nur das zusätzlich Löschen hat, habe ich nicht verstanden warum dann in dem andern Thread zu TList geraten wird.
In meinem Projekt habe ich schon auf TObjektList umgestellt. Dein Leckanzeiger werde ich gleich mal ausprobieren:thumb:
Forum: Object-Pascal / Delphi-Language
by norwegen60,
26. Jan 2017
Den Schuss hatte ich auch schon probiert. Wenn ich CONST entferne meckert er wieder, dass sich die Definition von der vorherigen Unterscheidet. Und dass der Ptr <> nil ist habe ich ja abgesichert.
Eigentlich wollte ich doch nur rausbekommen wie das mit dem Notify funktioniert nachdem in der Hilfe doch steht
Und warum raten sie in...
Forum: Object-Pascal / Delphi-Language
by norwegen60,
26. Jan 2017
Noch mal 1mm weiter aber immer noch nicht am Ziel.
Jetzt streikt der Aufruf procedure TMyList.Notify(const Ptr: TMyclass; Action: TCollectionNotification); // Überschreiben nicht virtual
begin
if (FFreeOnDelete) and (Ptr<>nil) and (Action = cnRemoved) then
Ptr.Free; // Ungültige Zeigeroperation
inherited Notify(Ptr, Action);
end;
Forum: Object-Pascal / Delphi-Language
by norwegen60,
26. Jan 2017
Die Warnmedlung hatte ich gesehen, nur wusste ich nichts damit anzufangen. Auch nachdem ich noch mal in Netz gesucht habe. Gut dass du mich direkt darauf gelüpft hast.
Viel weiter gekommen bin ich aber noch nicht, denn jetzt bin ich wieder bei und wenn ich es auf procedure Notify(const Item: T; Action: TCollectionNotification); override; ändere mag er den Typ T nicht.
Forum: Object-Pascal / Delphi-Language
by norwegen60,
26. Jan 2017
Das mit den TObjectList hatte ich schon verstanden und will es mir auch noch anschauen. Zuerst wollte ich aber mal die TList verstehen da eine für mich wichtige Anwendung mit TList<> arbeitet und ich noch nicht abschätzen kann welche Auswirkungen ein Wechsel auf TObjectList hat. :(
Zweifel an meinem Verständnis hatte ich aufgrund der vermeintlich falsch gelöschten Daten in der Kopierliste....
Forum: Object-Pascal / Delphi-Language
by norwegen60,
25. Jan 2017
Hallo,
ich habe mich etwas mit Generic TList beschäftigt und hänge nun bei ein paar Punkten. Hier zunächst Code-Auszüge (im Anhang das ganze Projekt).
TMyClass = class
private
FCounter, FValue: Integer;
public
property Counter: Integer read FCounter write FCounter;
property Value: Integer read FValue write FValue;
end;