Topic: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Здравствуйте!
На форме программно создаю TreeView и заполняю его данными таблицы.
Но при попытке выполнения процедуры "TreeViewOnDoubleClick" получаю ошибку.
Как избавиться от этого?

P.S. Заранее всем большое спасибо!

Post's attachments

Attachment icon MyTree.rar 298.11 kb, 243 downloads since 2020-06-25 

I'm just learning

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Ronin751 wrote:

Здравствуйте!
На форме программно создаю TreeView и заполняю его данными таблицы.
Но при попытке выполнения процедуры "TreeViewOnDoubleClick" получаю ошибку.
Как избавиться от этого?

P.S. Заранее всем большое спасибо!

TreeView: TTreeView замените на TreeView: TdbTreeView

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

sibprogsistem!
Спасибо, что обратили внимание на тему.

Последовал Вашему совету: изменил TTreeView на TdbTreeView. Теперь ошибок стало на много больше. Ругается на всё подряд.
А зачем менять? Что это должно дать?

Для теста пробовал заменить

Procedure TreeViewOnDoubleClick(Sender: TObject);
Begin
ShowMessage(TreeView.Selected.Data);
end;

на

Procedure TreeViewOnClick(Sender:TObject);
Begin
Form1.Caption:=TreeView.Selected.Text;
end;

ну и конечно не забыл

TreeView.OnClick := @TreeViewOnClick;

Почему то TreeViewOnClick работает, а вот TreeViewOnDoubleClick не хочет.
В чем может быть причина?
Заранее всем спасибо!

I'm just learning

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Ну да ...
как-то не понятно.. у меня подобное со TScrollBox...
 
а почему Вы не хотите воспользоваться визуальным компонентом TreeView? там в роди все работает...

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

sibprogsistem,

а почему Вы не хотите воспользоваться визуальным компонентом TreeView? там в роди все работает...

Проблема  с иконками. По умолчанию в свойствах визуального компонента TreeView нет .Nodes.Add(,,[Key],[Text],[Image],) AS Node (как, допустим, у TreeViewот MicroSoft  VBA). А иконки нужны, потому что как показывает практика, при наличии иконок пользователю становится легче ориентироваться в списке приблизительно на 30%. А это уже показатель. ))))
Вот и мучаюсь.

I'm just learning

6 (edited by CDB 2020-06-26 06:53:11)

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Ronin751,


Search for the code called DRAMA, it was posted here recently by someone whose name I can't locate (possibly DAZ) forgotten.  They have done exactly what you are looking for I believe.



Ищите код под названием DRAMA, он был недавно размещен здесь кем-то, чье имя я не могу найти (возможно, DAZ) забыли. Они сделали именно то, что вы ищете, я верю.

Translated by Google

Post's attachments

Attachment icon tree_with_images.PNG 8.45 kb, 122 downloads since 2020-06-26 

On a clear disk you can seek forever

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

CDB,  спасибо что уделили время!
Я видел этот код. Проблема состоит в том, что событие двойного нажатия не хочет декларироваться. Хотя событие одиночного нажатия определяется как положено.


CDB, thanks for your time!
I saw this code. The problem is that the double-click event does not want to be declared. Although a single-click event is defined as expected.
Translated by Google

I'm just learning

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Правильно будет
TreeView.OnDblClick := @TreeViewOnDoubleClick;


Также можете посмотреть данный проект с примером

Post's attachments

Attachment icon TreeView with icons.zip 13.02 kb, 254 downloads since 2020-06-26 

Dmitry.

Re: Error: Undeclared identifier. ( TreeViewOnDoubleClick )

Правильно будет
TreeView.OnDblClick := @TreeViewOnDoubleClick;

Ну вот... Как всегда слона я и не заметил. (((
Однажды три дня мучился. Не мог понять, что не так со скриптом и почему не работает. Кроме как на форум обратится за помощью, вариантов не осталось. Люди более профессиональные, наблюдательные и более сведущие помогли. Я бы даже сказал - ткнули носом. Оказалось, что в одном месте скрипта, банально забыл закрыть кавычки.

DriveSoft, спасибо Вам огромное за помощь! Все работает идеально.

Всем огромное спасибо и успехов в трудах и начинаниях!

I'm just learning