Вообщем такое дело, мне надо написать архиватор по алгоритму LZW для файлов(не только текстовых), так вот каким образом мне необходимо открывать этот файл и считывать, т.е. как типизированный или нет я вот так делаю, но не пойму так надо или нет :
type
Tzap = record
ch:char;
end;
var
zap:Tzap;
DataFile: File of Tzap;
и далее вот таким образом читаю:
........
while not EOF(DataFile) do
begin
Read(DataFile,zap);