| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Array of byte -->> Record [D6]

LazorenkoX ©   (2002-04-01 21:39:00) 

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

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? Или вообще, что Вы мне посоветуете?

---

deleon   (2002-04-02 09:20:00) [1]

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

---

Alx2   (2002-04-02 07:52:00) [2]

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

---

Anatoly Podgoretsky   (2002-04-01 22:20:00) [3]

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

---

LazorenkoX   (2002-04-01 22:09:00) [4]

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

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

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

---

Anatoly Podgoretsky   (2002-04-01 22:01:00) [5]

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

---

Song   (2002-04-01 21:52:00) [6]

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

---

Наверх