TreeView Variant

← →
Сатир (2002-05-20 14:23) [0]

Написал сначала две перегруженные процедуры с одинаковым именем и кол-вом переменных но разными типами. В первой на вход подавал 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) [1]

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

TreeView Variant Найти похожие ветки