Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

Движок БД (file of XXX) 


LazorenkoX   (2002-03-30 00:09) [0]

Есть у меня несколько записей, помогите с написанием класса, которому надо передать только запись, а ReadRec, SaveRec, DeleteRec выполнит сам класс. Делаю:
type
Rec1 = record
X: String[10];
...
end;
Rec2 = record
D: TDate;
...
end;
Rec3 = record
...
end;

А вот как дальше?
TMyEngine = class
private
F: file of ???
public
procedure Read;
procedure Save;
procedure Delete;
...
end;

Мне ведь надо, чтобы F имел разные типы записей. Может стоит передавать тело записи в конструкторе класса? То как это сделать?
Конечно, я могу создавать много классов (для каждой записи), но столько мусора будет: копии процедур, а разница только в записи.



Anatoly Podgoretsky   (2002-03-30 12:30) [1]

Тебе нужен нетипизированный файл




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.033 c
3-32699           irq                   2002-03-21 16:43  2002.04.11  
UNION


4-33005           Cobalt                2002-02-09 15:37  2002.04.11  
Поиск дочерних окон


1-32900           Neox                  2002-03-29 21:26  2002.04.11  
Системное Время


3-32707           Андрей Брусов         2002-03-20 18:22  2002.04.11  
Настраиваемые отчеты


1-32750           Yuraz                 2002-03-30 15:48  2002.04.11  
Функция