Типиз. файл на CD

[Viteef]

В общем, програ читает из типизированного файла значения, на винте или флехе все нормально, а на CD : "File access denied". Почему? Это поправимо?

Можно, конечно, скопировать куда-то в Temp, а потом оттуда читать, но хочется напрямую.

[Stilet]

Код в студию.

[Alex21]

И какой же "Метод чтения"?

[Viteef]

type
sett=record
r:string[200];
i:integer;
b:string[100];
end;

...
var
f: file of sett;
srec:sett;
...

procedure TForm1.FormCreate(Sender: TObject);
begin
assignfile(f,'\d.txt');
reset(f);
seek(f,0);
read(f,srec);
ListBox1.Items.Add(srec.r);
ListBox1.Items.Add(srec.b);
ListBox1.Items.Add(inttostr(srec.i) );
closefile(f);
end;

И какой же "Метод чтения"?

RESET :-)

[Stilet]

Ты на всякий случай для теста пропиши в ассигн путь правильно, ато '\d.txt' меня смущает

[mutabor]

assignfile(f,'\d.txt');

может так?
assignfile(f,'D:\d.txt');

[JTG]

фигвам, у мну например диск Д никак не сд-ром
extractfilepath(application.exename ) если программа тоже на сд находится

[Viteef]

Сообщение от JTG

фигвам, у мну например диск Д никак не сд-ром
extractfilepath(application.exename ) если программа тоже на сд находится

Дело не в этом. И так и так пробовал, переносил на CD - не работает

P.S. У меня когда то был диск D - CD-ROM.
Но уже столько винд прошло...