Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.30;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
3-97128
dens
2002-05-06 11:16
2002.05.30
descending в объекте ttable


1-97331
Gumbert-Gumbert
2002-05-19 16:23
2002.05.30
Вопрос по функции: TTreeView.Items.AddObject(TTreeNode, S, Ptr)


3-97132
Sergant
2002-05-05 03:44
2002.05.30
Автоопределение кодировки DBF-файла


3-97167
Reticent
2002-05-07 18:38
2002.05.30
Подскажите


1-97324
agrig
2002-05-19 18:27
2002.05.30
Какой ModalResult при закрытии по Alt+F4 или кнопке с крестом?