Форум: "Основная";
Текущий архив: 2002.05.30;
Скачать: [xml.tar.bz2];

Вниз

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 написать

---

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

Форум: "Основная";
Текущий архив: 2002.05.30;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c