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]

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

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

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