|
|
ПРограма Delph 6
Var
D:LongInt
Begin:
............
BlockRead(File,D,2); //Извлекал 2 байта
Edit1.Text:=IntToStr(d); //Показывал че извлек
............
end;
В некоторых файлах была байда, стоило D описать как WORD стало все нормально. Байда пропала.
|
|
E-mail: 
info@telesys.ru
