Главная страница
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.006 c
14-58411
MasterYoda
2003-02-11 15:19
2003.08.18
Алгоритм


14-58428
IBSN
2003-08-01 16:01
2003.08.18
ctrl+alt+delete или OnExit


14-58476
Inst
2003-07-23 18:41
2003.08.18
как добавить новую запись в базу


14-58413
sergiu
2003-06-04 17:55
2003.08.18
color button??


14-58460
NewJack
2003-07-23 16:54
2003.08.18
Работа с несколькими базами InterBase