Форум: "Основная";
Поиск по всему сайту: 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.028 c
1-32855           sammy                 2002-03-29 07:11  2002.04.11  
обработать OnClick


1-32878           Ghost.                2002-03-29 15:14  2002.04.11  
На счет передачи фокуса


1-32839           LiNkS                 2002-03-29 09:32  2002.04.11  
ListBox


3-32697           Евген                 2002-03-19 07:57  2002.04.11  
Работа с компонентом TUpdateSQL


4-33011           Yaro                  2002-02-10 21:38  2002.04.11  
Принудительное завершение работы программы, не имеющую окна или как получить Хэндл процесса