Probleme mit SetLength

[bumpelwumpel]

Hi,

ich habe ein Problem. Die Funktion SetLength funktiniert bei mir nicht richtig.
Mit SetLength will ich einen String (output) kürzen. Und zwar um den Wert "StartInt".
Dieser setzt sich aus einem String zusammen, der in etwas so aussieht "30-35". Also suche ich nach dem "-",
und benutzt dann nur noch die "30". Die wandle ich in einen Integer um. Das sollte dann die
Länge meines Strings sein, doch das Programm stürtz mir immer mit deiser Fehlermeldung ab:

Zitat:

Zugriffsverletzung bei Adresse 004570ED in Modul 'Projekt 1.exe'. Lesen von Adresse 000000000

Delphi-Quellcode:

        begin
           output:=Textfile.strings[Line];
           for counter1 := 0 to Length(Points[Line])-1 do
           begin
            if Points[Line][counter1]='-' then
              begin
               Start:=Points[Line];
               SetLength(Start, counter1-1);
               StartInt:=StrToInt(Start);
              end;
             if ((output[1]='>') and (output[2]='>'))=true then
               begin
                  Delete(output,1,2);
                  SetLength(output, StartInt);
                  ListBox1.Items.Add(output);
                  end;