Установка курсора

Форумы Между деломУстановка курсора ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 1291

Рейтинг: 47

#1: 2024-07-29 11:46:39 ЛС | профиль | цитата

Приветствую! Не подскажете, как собственно менять программно курсор? Пробовал, подавая на входы компонентов PaintBox и MainForm от счетчика целые числа, не переключает.. Неужели IC нужен, А для чего тогда есть этот вход на компонентах?

карма: 3

Hiasm + Flowstone + CopperCube + GoDot + JS

Ответов: 793

Рейтинг: 168

#2: 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,[])
}

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

карма: 16

Ответов: 1291

Рейтинг: 47

#3: 2024-07-29 14:26:57 ЛС | профиль | цитата

Gunta, спасибо большое.. Правда мало понятны те магические коды курсоров, почему именно так, а не иначе. Уже успел решить проблему скачав компонент специальный и старый. Прямо в него из файлового потока кидаю курсоры виндовые, а то вдруг на целевой машине их не будет.

https://forum.hiasm.com/topic/3831/0

карма: 3

Hiasm + Flowstone + CopperCube + GoDot + JS

Ответов: 793

Рейтинг: 168

#4: 2024-07-29 14:30:18 ЛС | профиль | цитата

Aziz писал(а):

Правда мало понятны те магические коды курсоров, почему именно так, а не иначе.

Всё очень просто
https://learn.microsoft.com/ru-ru/windows/win32/menurc/about-cursors

карма: 16

Разработчик

Ответов: 26155

Рейтинг: 2127

#5: 2024-07-29 17:56:07 ЛС | профиль | цитата

Всем Привет!
Ёшкин бобик, это безобразие даже в справке есть -- https://forum.hiasm.com/wiki/5900
Для кого я только это все писал в свое время?

Редактировалось 1 раз(а), последний 2024-07-29 17:57:20

карма: 22

Ответов: 1291

Рейтинг: 47

#6: 2024-07-30 09:57:44 ЛС | профиль | цитата

Gunta, благодарю. Как-то раньше не заморачивался курсорами, больше функционал развивал. А сейчас недавно с участием чата ГПТ написал свой компонент для рисования японских торговых свечей, для создания финансовых программ и понадобилось. Выложу сейчас его в компоненты. Но он похоже имеет какой-то глюк, тк если частоту перерисовки таймером сделать в районе 100 мс, то программа через некоторое время падает. Просто закрывается без ошибки. Раньше там была утечка памяти, но я ее локализовал в диспетчере винды, смотря как растет память и устранил. Это я просто не дописал в конце уничтожение картинки bmp.clear bmp.free. После этого перестала есть память, стабильно 1- 2 мб. Если кто знает в чем проблема и поправит, будет здорово..

nesco, привет! Спасибо, справку всю перелопачивал, все примеры (там есть один на смену курсоров на внешние из иконок, но это немного не то что искал), форум гуглом и яндексом рыл но все мимо. В разделе справки да, есть эта инфа, но нашел ее лишь после вашей наводки..

Форум не дает даже 8 кб архив zip загрузить, пишет что файл должен быть не больше 54000 байт.. Поэтому на ЯД залил - компонент с примером. Зум по колесу мыши. Потом хочу переделать, чтобы свечу отрисовывал непосредственно по самой динамике цены.

https://disk.yandex.ru/d/zyL_NYKZ-szBaw

Редактировалось 1 раз(а), последний 2024-07-30 10:10:20

карма: 3

Hiasm + Flowstone + CopperCube + GoDot + JS

Ответов: 1291

Рейтинг: 47

#7: 2024-07-30 11:30:31 ЛС | профиль | цитата

nesco, было бы здорово подсказку написать на входы управления курсором, какой тип данных им нужен и где их взять..

Редактировалось 1 раз(а), последний 2024-07-30 11:31:25

карма: 3

Hiasm + Flowstone + CopperCube + GoDot + JS

Ответов: 2267

Рейтинг: 676

#8: 2024-07-30 12:10:18 ЛС | профиль | цитата

nesco, да делов то в win.ini (или где там описание свойства doCursor) добавить: о курсорах см. справку (и путь к теме справки)
Вот как-то так к примеру:

WinControl.ini писал(а):

@Cursor=Курсор(числовые значения курсора см. в справке: Windows\Компоненты\Стандартные идентификаторы курсоров)|14|0|crDefault,crIBeam,crHandPoint,crHourGlass,crHelp,crBusy,crWait,crCross,crSize,crNo,crSizeAll,crSizeNESW,crSizeNS,crSizeNWSE,crSizeWE,crUpArrow,crPen,crCD

Редактировалось 3 раз(а), последний 2024-07-30 16:21:03

карма: 11

Форумы Между деломУстановка курсора ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)