Projekt Probleme: Zeitmessung und Highscore

[Sir Rufo]

Vielleicht wird es Dir damit klarer.
Tausche die Zeilen von DeddyH mal mit diesen aus, und wirst es sehen!

Delphi-Quellcode:

if Pos( Sep, Tempstr ) > 0 then
  begin
    Name1[ i ] := Copy( Tempstr, 1, Pos( Sep, Tempstr ) - 1 );   
    Punkt1[ i ] := StrToInt( Copy( Tempstr, Pos( Sep, Tempstr ) + 1, MaxInt ) ); // Neu
  end
else
  ShowMessage( Format( 'In "%s" ist kein Sep "%s" enthalten! Wie soll ich das denn bitte schön trennen?', [ Tempstr, Sep ] ) );