Вверх ↑
Ответов: 773
Рейтинг: 168
#1: 2024-07-29 13:59:46 ЛС | профиль | цитата
Aziz писал(а):
Не подскажете, как собственно менять программно курсор? Пробовал, подавая на входы компонентов PaintBox и MainForm от счетчика целые числа, не переключает..

Думаю, будет понятно.
Add(MainForm,7245682,413,119)
{
Point(doCursor)
}
Add(ComboBox,13751781,301,161)
{
Left=150
Top=45
Align=2
Strings=#20:NORMAL |20:IBEAM |20:WAIT |20:CROSS |20:UP |20:SIZE |20:ICON |20:SIZENWSE |20:SIZENESW |20:SIZEWE |20:SIZENS |20:SIZEALL |20:ICOCUR |20:NO |20:HAND |20:APPSTARTING |0:|
Text=""
link(onClick,5739169:doGetString,[])
}
Add(StrList,5739169,357,140)
{
Strings=#5:32512|5:32513|5:32514|5:32515|5:32516|5:32640|5:32641|5:32642|5:32643|5:32644|5:32645|5:32646|5:32647|5:32648|5:32649|5:32650|0:|
Point(doGetString)
Point(onGetString)
link(onGetString,7245682:doCursor,[])
}

карма: 15

0
Редактировалось 2 раз(а), последний 2024-07-29 17:22:25