chcialbym sie dowiedziec w jaki sposób napisac funkcje ktora podawala by rozmiar pliku z atrybutem Read Only (nagranego na plyte CD). Polecenie FileSize(f) nie radzi sobie z plikami tylko do odczytu. Za sugestie z góry dziki..
0
0
var F : File of Byte;
FSize : integer;
begin
AssignFile(F,'e:\cos.txt');
FileMode := 0;
Reset(F);
FSize := FileSize(F);
CloseFile(F);
end;