Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.09;
Скачать: CL | DM;

Вниз

файл массива   Найти похожие ветки 

 
alex78 ©   (2003-05-28 02:46) [0]

Есть текстовой файл с вещественными числами. В каждой строчке по 10 чисел.
Можно ли описать этот файл как
type
dat = record
valu : array [1..10] of real;
end;
var
f:file of dat;
? И как в таком случае обращаться к данным в файле (считывать)?
Или есть возможность сделать это проще, но не рассматривая файл как текстовой (без использования strtofloat)


 
Нуу   (2003-05-28 04:14) [1]

Текстовый файл, в принципе нельзя обработать как "file of dat".
Но можно читать сей файл функцией Writeln(F,real1,real2..real10);
Если, конечно, сам файл записан грамотно.


 
DarkGreen ©   (2003-05-28 06:00) [2]


type
dat = record
valu : array [1..10] of real;
end;
var
F: File of Dat;
D: Dat;
begin
AssignFile(F, "C:\1.dat");
Reset(F);
while not Eof(F) do
begin
Read(F, D);
DoSomething(D);
end;
CloseFile(F);
end;

Вот только если ты захочешь читать из файла по одному числу real48 (если тебе нужны real, а не Double), то Dat надо объявить как:

type
dat = packed record
valu : array [1..10] of real;
end;


 
Думкин ©   (2003-05-28 06:16) [3]

Можно или нельзя?
Создай такой файл с 2 записями и сравни получившееся со своим файлом. Вот и ответ тебе будет.


 
Palladin ©   (2003-05-28 08:36) [4]


> DarkGreen © (28.05.03 06:00)

чушь порите батенька


> alex78 © (28.05.03 02:46)

основной вопрос числа в каком виде?
я понимаю тебе предельно это ясно ведь файл даже может быть перед тобой, но не сблаговолит ли великий спрашивающий запостить сюда пару строчек из этого файла


 
Anatoly Podgoretsky ©   (2003-05-28 09:53) [5]

Одназначно нельзя, в текстовом файле совсем другое представление, да и числа имеют различную длину от одного символа и выше, более того они даже не числа, с точки зрения системы, а наборы букв.


 
Vlad Oshin ©   (2003-05-28 11:24) [6]

Кусочек файла можно?



Страницы: 1 вся ветка

Текущий архив: 2003.06.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
6-26642
Сергей
2003-04-07 00:25
2003.06.09
создание своего WinPopup а


14-26733
Subdigger
2003-05-21 12:25
2003.06.09
EOLESYSERROR


14-26717
Vlad Oshin
2003-05-22 09:03
2003.06.09
ICQ - реальные случаи взлома из-за этого пейджера?


9-26318
Fuylan
2002-12-30 01:42
2003.06.09
OpenGL


9-26327
Gayrus
2002-12-26 03:33
2003.06.09
OpenGL кажется глючит