Debugen nicht möglich

[Edelfix]

Hallo,

ich kämpfe schon seit ein paar Tagen (mit Unterbrechungen) an einem unlösbarem Problem.

Nach dem Klick auf einen Button läuft die dazugehörige Funktion bis zur einer Zeile an der es zu einer „ACCESS_VIOLATION“ kommt.

Ab da ist mein Programm und die Die nicht mehr bedienbar. Eingefroren. Mein Programm kann dann über den Task Manager killen und die Die ist wieder bedienbar.

Aber so ist natürlich das Debugen nicht möglich. Ein Try Except um die Stelle hilft leider auch nicht.

Was kann ich noch machen?

Die Stelle:

Delphi-Quellcode:

  If K<SS.Count Then
  begin
   TS.Free;
   TS := nil;
   TS := TStringList.Create;
   //--
   TS.CommaText := '0,0,0,0,0,0'; // hier knallt es
   //--
   TS.CommaText := SS.Strings[k]; // original version
   //--
   for L:=0 to TS.Count-1 do
    If L<=High(VK) Then
     VK[L] := StrToFloatDef(TS.Strings[L],0);
  end;