Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
14-46510
Knight
2002-03-07 14:47
2002.04.15
Материал по теории графов...


14-46499
MBo
2002-03-07 11:08
2002.04.15
Поздравляю с 8 Марта!


1-46392
Muzzy
2002-04-02 12:33
2002.04.15
Форматирование ячеек в TStringGrid.


1-46399
Schummi
2002-03-30 08:08
2002.04.15
Panel:=TPanel.Create(Form);


3-46246
Sewix
2002-03-25 14:33
2002.04.15
Добавить столбец в Access





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский