Проблема считать данные из двочного Dos-овского файла

← →
SAN (2002-01-15 17:34) [3]

Тут надо точно знать как писался файл.
ну а делать примерно так.
f: TFileStream;
Sum, i, Digit: integer;

f := TFileStream.Create(FileName, fmOpenRead);
while f.Poistion <> f.Size do
begin
Sum := 0;
for i := 1 to 24 do
begin
f.Read(Digit, SizeOf(integer));
Sum := Sum + Digit;
end;
f.Read(..., SizeOf(...));.// Здесь надо считать в переменную нужного типа и указать размер типа разделителя.
end

Проблема считать данные из двочного Dos-овского файла Найти похожие ветки