[stinger25]

попробуй следующую последовательность команд
var file_name,str:string;
file_name:='0:\Misc\test.txt';
open_file(file_name);
// имя файла я написал примерный.. указав явный путь
reset();
str:=read_string();
close_file(file_name);