Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TreeView Variant [D6, Win2k]


Сатир ©   (2002-05-20 14:23:00) 

Написал сначала две перегруженные процедуры с одинаковым именем и кол-вом переменных но разными типами. В первой на вход подавал Parent:TTreeNode, а второй - Parent:TTreeView. А потом подумал, зачем столько лишнего кода, если можно переменную Parentобъявить как Variant, а в теле процедуры поставить проверку типа параметра. Да вот не тут-то было...
Не схавала:-(. Поможите, люди добрыя, советом дельным, мож юнит какой надобно подсунуть ему...
А плюётся таким макаром:
Operator not applicable to this operand type.

Вот место, на котором это приключилось

procedure ...(Parent:Variant;...)
...
if Parent is TTreeNode then
tn:=Parent.owner.AddChildObject(Parent,astr,domNode);
if Parent is TDCTreeView then
tn:=Parent.Items.Add(nil,astr);
...


С уважением,


NailS   (2002-05-20 14:25:00) [1]

Попробуй TObject написать


Наверх

Титульная страница Поиск, карта сайта Написать письмо