Форум АНТИЧАТ - Работа с текстовыми файлами в Delphi

Привет всем, кто меня читает.
Прошу мне немножко помоч.

Пишу прогу на Delphi, она работает с текстовым файлом.
Мне нужно в определённый момент вернуть курсор на нулевую позицию, незакрывая файл.

Поясню:

Код:

var

  F: TextFile;

  S: String;

begin

  AssignFile(F, 'MyTextFile.txt');  //Связываем файловую переменную с файлом

  {$I-}  //Отключаем сообщения об ошибках

  Reset(F);  //Открываю файл для чтения  (Позиция равна нулю)

  Readln(F, S);  //Читаю первую строку (Позиция изменлась)

  Flush(F);  //Освобождаю память (Не уверен, что это нужно делать при чтении,

если кто знает поясните)

  Closefile(F);  //Закрываю файл

end;