Hat nichts mit der DP-Collection zu tun, aber sollte man nicht besser AssignTo statt Assign überschreiben? Ist mit Free/Destroy vergleichbar, Assign/Free prüft den Pointer auf nil, dann wird das vom Programmierer überschriebene AssignTo/Destroy aufgerufen.

Jupp, schlimmer ist aber, dass er überall Assign überschreibt und es wohl nicht ein einziges Mal benutzt.
Er denkt zwar daran Assign zu überschreiben, aber nicht die Sub collections beim Zuweisen durch den Setter zu kopieren.
Das muss man übrigens auch gar nicht, read reicht doch als Zugriff für die sub collection vollkommen aus.
Und das Assign auf den Items, braucht man wirklich nur, wenn man den Inhalt kopieren will.
Das hast du in dem Tutorial an keiner Stelle gebraucht, ich bezweifle, dass man es überhaupt sehr oft braucht.
So siehts für noobs halt ein wenig zu geeky aus, mit all den overrides, inherited, whatsoever...

Nicht übel nehmen, das war nur mein Eindruck.
Ich bezweifle nämlich, dass die ehrenwerte Garde der Nicht-OOP'ler das in seiner Gänze verstehen wird...

ROFL ... wenn du mir jetzt noch erzählst, daß man mit Delphi OOP ...

So'n bissel...

So, ich habe eine kurze Beschreibung eingefuegt und die entsprechenden Posts entfernt, da sie jetzt "sinnlos" sind.


Koenntest du mir das evtl. nochmal genauer erklaeren? Auch in den Vorstellungsthreads der DP-Collection wird Assign ueberschrieben, ich wusste bis jetzt ja nichtmal dass es AssignTo gibt


Also als ich das probiert habe, hat das Kopieren der Collection funktioniert, ich muss die Demos aber noch "veroeffentlichungsreif" machen


Man braucht es nicht oft, ich habe es der Vollstaendigkeit halber eingefuegt. Das Kopieren einer ganzen Collection habe ich nur deshalb eingefuegt, weil ich es einmal gebraucht habe. Aber du hast recht, es ist nicht der meistverwendeste Teil der Collections


Das soll auch nicht der Sinn und Zweck sein, dafuer gibt es OOP-Anfaengertutorials. Das Tutorial ist nicht wirklich fuer OOP-Einsteiger gedacht.

Gibt es sonst noch Vorschlaege zum Tutorial?

Greetz
alcaeus

Als ich mich zu Beginn der Ferien mit Komponentenentwicklung auseinandergesetzt habe, hab ich diese Zeile in den Delphi-Sourcen gesehen:Ich bin davon ausgegangen, dass das Ganze wie mit Free/Destroy funktioniert: Assign wird vom Programmierer nicht überschrieben, sondern bleibt immer gleich. Es testet den Pointer auf nil und ruft dann AssignTo auf, das vom Programmierer überschrieben und mit Anweisungen zum Kopieren der neuen Felder ergänzt wurde.

Gerade habe ich es mir noch einmal genauer angesehen und festgestellt, dass es etwas komplizierter ist .
Angenommen, wir wollen eine neue Klasse schreiben, diese Klasse soll die Daten einer anderen vorhandenen Klasse kopieren können und umgekehrt, obwohl beide Klassen als nächste gemeinsame Basisklasse erst TPersistent gemein haben. Für den einen Weg reicht es, Assign der neuen Klasse zu überschreiben und die Daten zu kopieren. Der andere Weg wird komplizierter, schließlich müssten wir Assign der vorhandenen Klasse überschreiben, diese wollen wir jedoch nicht ändern. Hier nimmt uns aber Delphi die Arbeit ab. Eine Instanz unserer neuen Klasse werde also der anderen als Parameter von Assign übergeben. Nun werden alle Assigns der ganzen Hierarchie bis zu TPersistent aufgerufen, da nirgendwo das Verhalten für das Kopieren unserer Klasse definiert ist. Logisch, wir haben die Klasse ja gerade erst geschrieben. Da die alte Klasse die neue Klasse nicht kopieren kann, ruft TPersistent.Assign nun AssignTo der neuen Klasse auf, damit diese sich in die alte Klasse kopiert. IMO einfach genial !
Aber solange man nur gleiche Klassentypen kopieren will, ist es wohl ziemlich egal, welche Methode man überschreibt . bei AssignTo kann man sich aber sicher sein, dass der Parameter ungleich nil ist.

Gibt es eine möglichkeit die (binären) Dateien zu Komprimieren?

Mit dem RC4-Streamdekorierer kannst du sie verschluesseln, also schaetze ich mal dass man sie auch komprimieren kann. Wie das weiss ich jetzt auch nicht.

Greetz
alcaeus

Ich versuche gerade alle properties einer VCL mit der dbcollection zu speichern und wieder zu laden. Dazu habe ich mal folgende Test unit geschrieben:Das Problem ist nur das fbutton:=tbutton.Create(self); natürlich nicht möglich ist. Ich weiss nicht mal ob ich auf dem richtigen Weg bin ...

Mein Ziel ist es, eine unbestimmte Anzahl von VCL in eine Datei zu speichern und wieder zu laden (Level Editor). Ich hoffe ihr könnt mir helfen, Danke schon mal im Voraus!