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

Вниз

Array of byte -->> Record   Найти похожие ветки 

 
LazorenkoX ©   (2002-04-01 21:39) [0]

Мне надо использовать нетипизированные файлы, но данные с каждого блока переносить в запись. Например:

type
RPerson = record
FirsName, MiddleName, LastName: String[30];
BirthDate: TDate;
end;

var
F: file;
B: array of Byte;
R: RPerson;

Так вот, читаю я запись из файла F в буфер B. Как мне перенести данные из B в R? Можно ли так: R := B? А как сделать наоборот, можно ли B := R? Или вообще, что Вы мне посоветуете?


 
Song ©   (2002-04-01 21:52) [1]

А что Вам мешает сохранять в файле Var f: File of RPerson; ???


 
Anatoly Podgoretsky ©   (2002-04-01 22:01) [2]

Ну так не интересно, слишком просто и как у всех


 
LazorenkoX ©   (2002-04-01 22:09) [3]

Дело в том, что у меня будут разные типы, а процедуры чтения, записи, удаления и т.д. для записей будут одни. Если не понятно вот пример:

type
TMyEngine = class
public
constructor Create(FileName: String; RecordSize: LongInt)
procedure Read; procedure Write; procedure Delete;
...
end;

И этот тип будет управлять файлами как было сказано в вопросе. Но вот записи то будут разные.


 
Anatoly Podgoretsky ©   (2002-04-01 22:20) [4]

Много?
И ведь как то будешь их различать.


 
Alx2 ©   (2002-04-02 07:52) [5]

>LazorenkoX © (01.04.02 22:09)
Не движок ли для базы данных ваяем?


 
deleon ©   (2002-04-02 09:20) [6]

Move(R, B, SizeOf(RPerson));



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
1-46323
dymka
2002-04-03 08:06
2002.04.15
Нужен совет по проектированию компонент


1-46365
Glonia Zbanov
2002-04-01 14:28
2002.04.15
Как использовать GetScreenWidth


1-46332
kserg@ukr.net
2002-04-01 18:03
2002.04.15
Как переопределить нажатия клавы, чтоб Enter работал как TAB


1-46304
Locked
2002-03-30 08:15
2002.04.15
как перевести string в widestring?


3-46295
IronHawk
2002-03-21 10:58
2002.04.15
Иммитация нажатия клавиш DBNavigator !