hallo
Delphi-Quellcode:
var
List: TStringList;
I: Integer;
S: String;
begin
S := '1345123515;345235;2352354;23452345;';
List := TStringList.Create;
SetLength( myArr1[j], Succ(Length(myArr1[j]) )); //hier liegt der Fehler
with List do
begin
Delimiter := ';';
DelimitedText := S;
for I := 0 to Count - 1 do
myArr1[j,I]:= strtoint(Strings[I]);
end;
List.Free;
end;
noch eine kleine erläuterung:
myArr1 ist ein 2 dymensionales array. diese funktion soll in die 2te ebene den zerlegten String "S" schreiben, dass zerlegen klappt auch, aber irgendwie das mit dem array noch nicht...zeigerverletzung?
Kann jmd. helfen?
Ich bin ein Teil von jener Kraft, die stets das Böse will und stets das Gute schafft!