Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
1-26550
alex78
2003-05-28 02:46
2003.06.09
файл массива


6-26638
Andre_
2003-04-08 12:46
2003.06.09
Проблема с сокетами


1-26442
zsv
2003-05-29 08:24
2003.06.09
Печать


14-26695
Den
2003-05-21 14:57
2003.06.09
Components


1-26522
Jaxtor
2003-05-27 16:17
2003.06.09
Динамический TComboBox




   Наверх