Array mit Recordinhalten löschen

[Mojito]

Hallo liebe Delphi-Freunde,

wie lösche ich am Sinnvollsten einen Array bzw. leere ihn? Bei einem einfachen Records würde ich es einfach mit ='' tun, aber mein Array hat zahlreiche "Unterelemente": array(1..10).Haus, array(1..10).Land, array(1..10).Nation, array(1..10).Name.

Wie lösche ich das gesamte Element an einem bestimmten Index?

Vielen Dank!

[Furtbichler]

Äh... ohne Quellcode? Keine Ahnung.

[Mojito]

Hier der Code.

Delphi-Quellcode:

Type
TErfassung = record
    Mitarbeiter: string[25];
    Vorgesetzter: string[25];
    PNummer: string[6];
    Gehaltsstufe: 1..10;

TDataArray = array[1..15] of TErfassung;

var
  Data: TDataArray;

Ich möchte nun Beispielsweise alle Daten in Data[1] löschen und das ohne die einzelnen Unterbereiche wie Data.mitarbeiter anzusteuern. Gibt es ein schlanke Möglichkeit, alle Daten auf einmal an einem Bestimmten Indexwert(wie Data[1]) zu löschen?
Vielen Dank!

[Bummi]

So lange Du nur ShortStrings wie in Deinem Beispiel verwendest:

Delphi-Quellcode:

  ZeroMemory(@data[1].Mitarbeiter,SizeOf(data[1]));

[sx2008]

Irgendwie seltsam, dass Delphi Programmierer so blind sind und immer nur Arrays sehen wo in anderen Programmiersprachen (z.B. Python, C#,...Lisp!) schon längst Listen verwendet werden.

Arrays und Listen sind sich sehr ähnlich, aber nur aus Listen kann man schmerzfrei Elemente löschen.
Intern können Listen auch über Arrays nachgebildet werden aber entscheidend ist was dem Programmierer als API angeboten wird:

(dynamische) Arrays
* Wahlfreier Zugriff auf Elemente (über Index)
* nachträgliches Vergrössern/Verkleinern des Array

Listen
* Wahlfreier Zugriff auf Elemente (über Index und Inhalt)
* automatisches Vergrössern/Verkleinern der Liste
* Löschen von Elementen (ohne das Löcher zurückbleiben)
* Einfügen von Elementen an beliebiger Stelle

[Popov]

Vor allem spätestens sein TObjectList (k. A. ab welchem Delphi). Wobei TList auch nicht viel komplizierter ist, aber TObjectList macht es endgültig Kinderleicht.

[DeddyH]

Dann muss man aus dem Record aber erst einmal eine Klasse machen.

[Popov]

Also bei dem oberen Beispiel wäre es kein Akt. record gegen class tauschen, auf property verzichten, der Rest mit TObjectList.

Oder etwas aufwändiger - eine Klasse ableiten.

[DeddyH]

Oder je nach Delphi-Version eine generische Liste (ich wundere mich, dass das noch niemand vorgeschlagen hat).

[Furtbichler]

Zitat:

Zitat von sx2008 (Beitrag 1194008)

Irgendwie seltsam, dass Delphi Programmierer so blind sind und immer nur Arrays sehen wo in anderen Programmiersprachen (z.B. Python, C#,...Lisp!) schon längst Listen verwendet werden.

Arrays sind schneller und wenn ich die Schmerzfrei-Lösch-Funktionalität nicht brauche, hänge ich mir keine Liste ans Bein. Warum auch?

Im Übrigen kann man auch mit FaustkeilenArrays trefflich und performant Elemente löschen. Vor allen Dingen kann man damit eins: Lernen, wie es geht.