[Yurk@]

Код:

var
F :TextFile;
begin
AssignFile(F,'C:\1.txt'); // привязка переменной к файлу
Reset(F);  // Открытие файла (невизуально)
CloseFile(F); //закрытие файла (при выходе из программы)
end;