Suser_time := my_file.Strings[found - 32];
Logisch, dass du da nen Fehler kriegst.
Mit my_file.Strings[bla] erhältst du das, was in Zeile Nummer bla - 1 steht.
Du durchsuchst die einzelnen Zeilen mit Pos() nach deinem String.
Du müsstest also oben genannte Zeile durch
Suser_time := myFile.Strings[i][found - 32]
Mit [ i ] hast du die Zeile i und mit [found-32] hast du das Zeichen, das an Stelle found - 32 steht.
Dann müsste das klappen.
Allerdings vermute ich mal, dass Suser_time nicht nur ein Zeichen beinhalten soll, sondern einige Zeichen
von found - 32 an gezählt, oder?
In dem Fall müsstest du mit
copy arbeiten
Julian J. Pracht