Springt nicht in die Schleife

[UliBru]

Delphi-Quellcode:

try
  tmpline := txt[I];
  tmpI:= StrToInt(Copy(tmpline,5,5));

  tmpS:= Copy(tmpline],1,4);
  tmpSX := tmpline[10]; 

  if (tmpS = '    ') and (tmpSX = ' ') then
  begin
    CurrentDebNr:= tmpI;
  end;

  I:= I+1;
  Continue;
except
  //Continue;
end;

Ich würde mal den Code etwas umschreiben und dann lässt sich der Inhalt von tmpS und tmpSX auch besser debuggen, somit auch die if-Bedingung