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

Вниз

как сохранить в файл тип Record   Найти похожие ветки 

 
Miralex ©   (2003-08-04 14:32) [0]

У меня есть тип-запись:
UserData : Record
Name : String;
Salary: Real;
end;

как мне сохранить UserData в файл?
и как мне потом его читать с файла?


 
MalkoLinge ©   (2003-08-04 14:35) [1]

Есть такая неплохая штука - типизированный файл...

File of ВАШТИП


зы
Книжки нужно читать...научные :)))


 
Miralex ©   (2003-08-04 14:37) [2]

напиши пожалуйста пример для моего случая!


 
Guerrillero ©   (2003-08-04 14:37) [3]

File types + F1


 
HolACost   (2003-08-04 14:40) [4]

Для вашего проблиматично со стрингом 9Если вы не меняли его тип с поумолчанию)... т.к. он = 4 байтам всегда - т..к по умолчанию это указатель!...
а в общем пример

a: UserData
BlockWrite(F, a, sizeof(UserData));
BlockRead*F, a, sizeof(UserData));


 
MalkoLinge ©   (2003-08-04 14:43) [5]

Черт стринга я и не углядел. ShortString почставь там иначе поседеешь :)


 
Miralex ©   (2003-08-04 15:14) [6]

пожалуйста обьясните поподробнее как мне ето сделать!


 
HolACost   (2003-08-04 15:19) [7]

Как!
2 варианта - делать типизированный файл или делать битнарный и писать в него рекорды!
Для работы со стрингом лучше всего указать конкретный размер строки... например a:string[20]!
Далее
f:file of UserData - это для типизированного файла
a:UserData;
AssignFile(f, "path");
Reset/Rewrite(F);
write(f, a);
read(f,a);

Я дал пример ранее!
Но лучше в зависимости от задачи использовать что-то другое... например текстовый файл!


 
Echelon ©   (2003-08-04 16:19) [8]

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


 
Miralex ©   (2003-08-04 17:18) [9]

огромное спасибо!
разобрался!



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

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

Наверх




Память: 0.48 MB
Время: 0.01 c
14-58392
mao
2003-08-04 14:36
2003.08.18
String to PChar


14-58432
Yanis
2003-08-03 02:57
2003.08.18
off


14-58406
artgamer
2002-12-12 23:56
2003.08.18
Караул!!! Не могу запустить приложение MCK!!!


14-58465
Новик
2003-07-21 16:06
2003.08.18
ado и dll


14-58442
sniknik
2003-07-31 17:37
2003.08.18
Обращение к коллективному разуму. :о)) нужен алгоритм.