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

Вниз

TTreeView + event   Найти похожие ветки 

 
Алексей Иванов   (2009-05-26 07:58) [0]

Добрый день, Мастера!

При попытке назначить, хотя скорее, при попытки выполнения процедуры, указанной в качестве события TTreeView.OnCollapsing вылетает ошибка: аксес виолэйшн. Не могу понять, что ему не нравится. Делаю так:
var
 MyTV:TMyTreeView;
implementation

procedure OnColl(Sender: TObject; Node: TTreeNode;
   var AllowCollapse: Boolean);
begin
 Node.ImageIndex:=2;
end;

...
MyTV:=TMyTreeView.Create(Form1);
MyTV.Parent:=Form1;
@MyTV.OnCollapsing:=@OnColl; // Здесь все проходит гладко

Теперь если пытаемся сжать ветку, то происходит ошибка.

Пока писал свой вопрос - появилась мысль )))
Видимо в процедуре OnColl не передается параметр Node:TTreeNode.
Как в этом случае его правильно передать? И вообще не поняно как с этими eventam"и работать. Если предложите через глобальные переменные или, например, MyTV.Selected - не принимается, т.к. для чего все evevnt имеют типы типа Proc(Sender:TObject, ... , ..., ...), если их нельзя как-то автоматически передавать???
Прошу прощения, накипело.


 
KSergey ©   (2009-05-26 08:01) [1]

> @MyTV.OnCollapsing:=@OnColl;

Выделенное - зачем?

и еще. Видимо ошибка внутри OnCollapsing возникает, но оно держится в секрете, почему?


 
Алексей Иванов   (2009-05-26 08:06) [2]

>Выделенное - зачем?

Дабы не было такого сообщения:
[Pascal Error] Unit1.pas(51): E2010 Incompatible types: "TTVCollapsingEvent" and "Pointer"

>и еще. Видимо ошибка внутри OnCollapsing возникает, но оно держится в секрете, почему?

Не понял, что значит в секете???
OnCollapsing - это стандартное свойство TTreeView


 
Сергей М. ©   (2009-05-26 08:38) [3]


> OnCollapsing - это стандартное свойство TTreeView


Это не просто свойство. это свойство-событие.
А свойству-событию может быть присвоено значение типа процедурный метод объекта.
А ты что пытаешься присвоить ? Ты пытаешься присвоить отнюдь не метод, а регулярную процедуру.


 
Сергей М. ©   (2009-05-26 08:42) [4]


> Здесь все проходит гладко


Ребенок кричит-надрывается, мамкину сиську просит, а ему соску заткнули да еще и скочем примотали..

Жесть, но ассоциация самая что ни на есть прямая)


 
Алексей Иванов   (2009-05-26 08:50) [5]

Ну вот так бы сразу!
Спасибо!


 
KSergey ©   (2009-05-26 10:32) [6]

ааа, блин, я как всегда просмотрел половину :(

Автор, наберите в гугле "жизнь и смерть в режиме run-time" (прямо так, с кавычками) и почитайте эту статью с королевства.
Много вопросов отпадет.


 
Amoeba ©   (2009-05-26 11:03) [7]

А вот и ссылка на эту статью:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=342



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

Текущий архив: 2009.07.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.007 c
2-1243410194
Александр
2009-05-27 11:43
2009.07.19
Работа с таблицами в Word


11-1203265400
andreil
2008-02-17 19:23
2009.07.19
7z и KOL


3-1224219776
Аврам
2008-10-17 09:02
2009.07.19
структура бд


15-1242483476
@!!ex
2009-05-16 18:17
2009.07.19
Как сделать Shared секцию в dll на дельфи?


2-1243343409
Alex_C
2009-05-26 17:10
2009.07.19
Перетаскивание формы за угол