Редактировалось 5 раз(а), последний 2021-05-22 06:05:32

Это был НиКТО.

А пример привести возможно?

Возможно:
[code:1] Add(TreeView,10272715,189,126)
{
Left=70
Top=10
Width=220
Height=75
Font=[MS Sans Serif,8,0,0]
Strings='1','(','2',')'
Point(doSelect)
}
Add(Button,7164745,112,133)
{
Left=5
Top=10
Font=[MS Sans Serif,8,0,0]
Caption="Add"
Data=String(CTPOKA)
link(onClick,10272715:doAdd,[(166,139)(166,132)])
}
Add(Button,515717,112,189)
{
Left=5
Top=35
Font=[MS Sans Serif,8,0,0]
Caption="Delete"
Data=Integer(0)
link(onClick,10272715:doDelete,[(166,195)(166,146)])
}
Add(Button,6027139,112,238)
{
Left=5
Top=65
Font=[MS Sans Serif,8,0,0]
Caption="Select"
Data=Integer(0)
link(onClick,10272715:doSelect,[(166,244)(166,167)])
}
[/code:1]

Все три кнопки выполняют действия в соответствие с указанным назначением. Строки добавляются, удаляются и выделяются. => Все работает. Рискну предположить, что версию новую вы таки не скачали еще.

Проверил ещё раз - всё по старому
HiAsm b134

HuKTO,скачай HiAsm 3.5 b137 final , только там работает..

Скачал, действительно работает.

doSelect всё равно не работает должным образом
[code:1]Add(MainForm,9324917,21,105) {
Left=20
Top=105
Font=[MS Sans Serif,8,0,0]
link(onCreate,12439362:doData,[])
}
Add(TreeView,11962643,196,105)
{
Left=75
Top=55
Width=185
Height=170
Font=[MS Sans Serif,8,0,0]
Strings='1','(','2','3',')','4','5'
Point(doSelect)
}
Add(DoData,12439362,105,140)
{
Data=Integer(5)
link(onEventData,11962643:doSelect,[])
}
[/code:1]

Работает , только если нет подстрок
[code:1]Add(TreeView,11962643,343,161) {
Left=75
Top=55
Width=185
Height=170
Align=0
TabOrder=0
Color=-16777211
Ctl3D=0
Hint=""
Font=[MS Sans Serif,8,0,0]
ParentFont=1
Visible=0
Enabled=0
Cursor=0
Strings='1','2','3','4','5'
Lines=0
LinesRoot=0
Tooltips=1
Point(doSelect)
}
Add(DoData,12439362,294,196)
{
Data=Integer(3)
link(onEventData,11962643:doSelect,[])
}
Add(Button,6130997,245,196)
{
Left=210
Top=25
Width=55
Height=20
Align=0
TabOrder=0
Hint=""
Font=[MS Sans Serif,8,0,0]
ParentFont=1
Visible=0
Enabled=0
Cursor=0
Caption="Push"
Data=Null()
link(onClick,12439362:doData,[(282,202)(268,202)])
}
[/code:1]
Вернее, если появляется подстрока то следующая строка уже невыделяется

Исправлено

Не все так просто......
Такое дерево выделяется правильно:
[code:1]Add(TreeView,12259783,154,112) {
Left=15
Top=60
Width=125
Height=190
Font=[MS Sans Serif,8,0,0]
Strings='1','2','(','3','(','4','5',')','X',')','6','7','8'
Point(doSelect)
}[/code:1]
А такое уже нет:
[code:1]Add(TreeView,12259783,154,112) {
Left=15
Top=60
Width=125
Height=190
Font=[MS Sans Serif,8,0,0]
Strings='1','2','(','3','(','4','5',')',')','6','7','8'
Point(doSelect)
}[/code:1]