Objekt aus dyn. Array löschen

[stoermi]

Hallo!

Angenommen, ich habe ein dynamisches Array von Instanzen einer eigenen Klasse mit 10 Objekten drin.

Wie lösche ich beispielsweise das 4. Objekt (array[3])?

Per for-Schleife wird das 5. Objekt zum 4., das 6 zum 5, usw.
Dann wird das Array auf 9 verkürzt (setLength(array,9)).

Reicht das schon?

Oder muss ich irgend wann (wenn dann doch sicherlich vor der Schleife) noch den Destructor bemühen.

[jim_raynor]

Vorher musst du mit Free das Objekt freigeben.

[stoxx]

wenn Du Deine theoretischen Überlegungen nicht gerade für den Informatik Unterricht brauchst, würde ich Dir TList ans Herz legen

[Bernhard Geyer]

Für deine Aufgabe ist TObjectList geeigneter, da diese einiges an Verwaltungsaufwand abnimmt (Automatische freigabe beim Löschen, Alle Einträge könnnen jederzeit gelöscht werden).

Aber sonst reicht dein Ablauf schon.

[Pseudemys Nelsoni]

Zitat:

Per for-Schleife wird das 5. Objekt zum 4., das 6 zum 5, usw.

wieso willst du so oft was verschieben? kopier einfach das letzte item deines arrays, an die stelle des zu löschenden items und setze dann die laenge -1.

sagen wir mal du möchtest das vierte element(=3) löschen....

Delphi-Quellcode:

MyArray[3] = MyArray[High(MyArray)];
SetLength(MyArray, Length(MyArray)-1);

[jim_raynor]

Um allen das Leben zu erleicht habe ich folgenden Beitrag für die Codelib vorgeschlagen:

http://www.delphipraxis.net/internal...ct.php?t=41245

[Pseudemys Nelsoni]

der code sieht ein bisschen übertrieben aus

[jim_raynor]

Zitat von Pseudemys Nelsoni:

der code sieht ein bisschen übertrieben aus

Den musst du aber nur ein mal schreiben und kannst damit jedes beliebige Array kürzen

[Pseudemys Nelsoni]

respekt, sieht nicht schlecht aus, haste selber geschrieben? (bringste mir asm bei? )

[jim_raynor]

Zitat von Pseudemys Nelsoni:

respekt, sieht nicht schlecht aus, haste selber geschrieben? (bringste mir asm bei? )

Denke das sollten wir im anderen Beitrag klären. Hab ich selber geschrieben. Asm kann ich dir auch nicht beibringen, da ich es zu wenig kenne. Für diese Anwendung hat es gerade noch gereicht, aber wie gesagt, das meisste hab ich dadurch rausgefunden, dass ich einfach mir den Asm-Output vom Compiler angeschaut habe.

[edit]Danke[/edit]