Array of ?

[Haxxer]

Hallo!
Ich schreibe gerade ein Programm, in dem ich eine unbekannte Anzahl an Zeilen habe, deren Wörte ich Zeilenweise in ein Array schreibe. Dazu benutze ich diese Explode-Funktion http://www.delphipraxis.net/internal...ect.php?t=3816. Diese gibt ja ein Dynamischen Array zurück, den ich wieder in einem dynamischen Array speichern.
Wie stelle ich sowas am besten an?

[Aurelius]

Such dir per High(Array) die Höhe des ersten Arrays und dann weißt du mit SetLength(Hoehe_Arary) die selbe Anzahl an Elementen zu. Dann einfach Array2 := Array1.

Sollte doch so klappen, oder? (Vllcht noch ein bissel Mit der Anzahl der Elemente rumspielen wenn es nicht klappt.

[DeddyH]

Beinahe ;). Bei dynamischen Arrays gibt Low(Array) immer 0 zurück, d.h. High(Array) entspricht der Anzahl der Elemente -1. Demzufolge muss es heißen

Delphi-Quellcode:

SetLength(NeuesArray,High(AltesArray) + 1);

[DasZiesel]

Geht aber auch noch einfacher. :wink:

Delphi-Quellcode:

SetLength(NeuesArray, Length(AltesArray));

[DeddyH]

Jepp, wieso einfach, wenn es auch umständlich geht? ;)

[DasZiesel]

Zitat:

Zitat von DeddyH

Jepp, wieso einfach, wenn es auch umständlich geht? ;)

Dies wird wohl für immer ein Geheimnis bleiben. :zwinker:

[Haxxer]

Von welchem Typ muß Foo sein?
Bei

Delphi-Quellcode:

Foo := Explode(' ', Memo1.Lines[i]);

kommt immer der Fehler inkompatible Typen.

[Matze]

Das steht in der Code-Library alles mit dabei ;)

Delphi-Quellcode:

type TSTringdynarray = array of String;

[DasZiesel]

Laut dem von dir geposteten Link muss es ein array of String sein.

Delphi-Quellcode:

type TStringdynarray = array of String;

[DeddyH]

Außerdem stimmt der Aufruf nicht, der zu trennende String wurde vergessen ;)