For-In-Schleifen-Problem mit String-Array

**DieDolly**

Man könnte denke ich bin mal wieder eine blinde Kuh.
Aber der Code hier unten wirft eine Exception aus, nachdem die Messagebox mit "cab" angezeigt wurde und mir ist es völlig schleierhaft warum ?!

Der Code ist auf das absolut Nötigste reduziert und da tritt der Fehler auch noch auf.
Ich möchte jeden Wer von Array Values ins Array ResArray schreiben. Natürlich ist der Code umfangreicher und gewisse Anpassungen werden vorgenommen wenn z.B. ein Eintrag einen Punkt als erstes Zeichen hat wird der entfernt und sowas. Aber das da unten ist das Miniumum-Beispiel was noch immer nicht funktioniert.

zusammenfalten · markieren

Delphi-Quellcode:

			var

 ResArray, Values: TArray<string>;

 Tmp: string;

begin

 // Ein ganz normales String-Array

 Values := TArray<string>.Create('1', '2', '3');

 // String-Array Values durchiterieren

 for Tmp in Values do

  begin

   ShowMessage(Tmp);

   SetLength(ResArray, Length(ResArray) + 1);

   ResArray[Length(ResArray)] := Tmp; // Der Fehler tritt in dieser Zeile auf glaube ich

  end;

end;

For-In-Schleifen-Problem mit String-Array

For-In-Schleifen-Problem mit String-Array

Forumregeln