![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
наследники TCustomADODataSet [D6]
DSKalugin © (2005-06-04 12:33:00)Как программно проверить являются ли компоненты производными от TCustomADODataSet? И работать с ними как с TCustomADODataSet
DSKalugin (2005-06-04 16:03:00) [1]наоборот, для ленивых - IS (писать короче :-))
а InheritsFrom мне поискать пришлось :-)
Забыл, блин
Anatoly Podgoretsky (2005-06-04 15:01:00) [2]DSKalugin © (04.06.05 12:44) [2]
Это для ленивых, а штатное средство в ООП это IS
DSKalugin (2005-06-04 13:04:00) [3]хехе, внатуре одно и тоже :-))
if (fmDM.dsPrice.DataSet is TCustomADODataSet)
if fmDM.dsPrice.DataSet.InheritsFrom(TCustomADODataSet)
Zacho (2005-06-04 12:57:00) [4]DSKalugin © (04.06.05 12:46) [3]
А isдля проверки ?
:)
DSKalugin (2005-06-04 12:46:00) [5]Да, asя тоже использую, для приведения типов
DSKalugin (2005-06-04 12:44:00) [6]Нашол
class function InheritsFrom(AClass: TClass): Boolean;
П.С. забыл, что сегодня суббота :-))
Zacho (2005-06-04 12:43:00) [7]Я не работал с ADO, но разве операторы isи asв случае с потомками TCustomADODataSet работают как-то по-другому ?