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

Вниз

Движок БД (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]

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

---

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

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

Наверх

Память: 0.46 MB
Время: 0.012 c