Auf Änderungen in einer TObjectList<T> reagieren

[Stevie]

Zitat von RWarnecke:

1.) Ist das soweit schon mal richtig oder gibt es da noch Verbesserungen ? Wenn ja, was kann man im allgemeinen verbessern und auch in Bezug auf mehrere TObjectList<TKlassenname>.Create's ?

Was meinst du mit verbessern im Bezug auf das Create? Du kannst für jede TObjectList<TKlassenname> eine Redefinition machen, wie Uwe schon ansprach. Würd ich aber nicht empfehlen.

Zitat von RWarnecke:

2.) Wie realisiere ich es, dass das OnChange-Event bei neuen Datensätzen ausgelöst wird ?

Listen haben das OnNotify Event, was dich über hinzufügen und entfernen von Datensätzen informiert. Du willst ja zusätzlich noch ein Notify haben, wenn sich innerhalb eines Listenelements was ändert. Da würde ich eine Ableitung von TObjectList<T> schreiben und das dort noch reinnehmen.

Zitat von RWarnecke:

3.) In meiner alten Konstelation hatte ich noch eine extra Procedure für das Löschen eines Datensatzes, wie mache ich das hier in diesem Beispiel ?

Entweder mit Delete oder Remove, je nachdem ob du das konkrete Element hast oder den Index davon, beides geht.

[RWarnecke]

Zitat von Stevie:

Was meinst du mit verbessern im Bezug auf das Create?

Ob ich in meiner FormCreate aus Beitrag #1 soweit alles richtig gemacht habe oder ob es da noch etwas zu verbessern gibt.

Zitat von Stevie:

Du kannst für jede TObjectList<TKlassenname> eine Redefinition machen, wie Uwe schon ansprach. Würd ich aber nicht empfehlen.

Warum empfiehlst Du das nicht. Ich brauche doch immer nur eine ObjectListe ? Oder habe ich da noch ein Verständnisproblem ?

Edit:
Ich habe mir jetzt mal eine Ableitung für TObjectList<TKlassenname> zusammengebaut, die anscheinend Recht gut funktioniert. Die komplette Datei findet Ihr im Anhang.
In der Delete-Procedure, lese ich über die RTTI den Klassennamen aus und dann werden entsprechend den ermittelten Namen die einzelnen DELETE SQL-Befehle ausgeführt. Oder ist die RTTI zu viel für das Auslesen des Klassennamens ?

Gibt es da noch Verbesserungsvorschläge ?

[Uwe Raabe]

Zitat von Stevie:

Du kannst für jede TObjectList<TKlassenname> eine Redefinition machen, wie Uwe schon ansprach. Würd ich aber nicht empfehlen.

Da würde mich aber doch wirklich das Warum interessieren.

Eine Redefinition hat den Vorteil, daß sie sehr leicht geändert werden kann. Im einfachsten Fall ist es einfach nur ein Alias TZahlungsartList = TObjectList<TZahlungsart>; , den ich natürlich auch weglassen könnte. Wenn ich dann aber an 1001 Stellen eine Variable definiert und eine Instanz dieser Liste erzeugt habe und dann feststelle, daß ich doch eine Ableitung brauche, bin ich mit dem Alias in nahezu Null-Komma-Nichts fertig und muss die Deklarationen und Instanzierungen nicht alle ändern.

Ich würde im Gegenteil sogar (fast) immer empfehlen, eine generische Liste über einen Alias zu definieren. Der Code liest sich einfach auch flüssiger.

[RWarnecke]

Hallo zusammen,

ich habe jetzt versucht das Beispiel aus Beitrag #5 auf mein Programm zu übertragen. Nur leider bekomme ich den Fehler : Internal Error URV1111. Dazu habe ich einige Beiträge gefunden, nur leider verstehe ich nicht ganz den Hintergrund, was da passiert. Anscheinend muss das irgendwas mit den Generics zu tun haben.

Hier die drei Beiträge die ich gefunden habe :
Link1
Link2
Link3

Ich benutze eine Ableitung von TObjectList<T> und in den Beiträgen wird von TArray<T> gesprochen. Kann mir bitte jemand weiterhelfen ?