Главная страница
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.014 c
1-26519
anod
2003-05-30 05:15
2003.06.09
Как создать новый класс?


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


1-26555
Jaxtor
2003-05-28 11:29
2003.06.09
Определение количества символов в TCaption


14-26656
vidiv
2003-04-10 10:07
2003.06.09
---|Ветка была без названия|---


7-26803
zolotov
2003-04-05 19:56
2003.06.09
Kernel32.dll в Win2k. Скрытие приложения при нажатии Ctrl+Alt+Del