HiAsm

Форумы Прочее Странное поведение отображения своего курсора ← Ctrl1Ctrl →

Ответов: 1058

Рейтинг: 76

#1: 2015-03-25 12:06:33 ЛС | профиль | цитата

nesco писал(а):

И в любом случае -

Нет, ты не понял меня. Я имел ввиду чтото типа

code_35383.txt

А LoadCursorFromFile(), можно прикрутить к нашим контролам? К примеру по onMouseEnter смотреть верхнюю точку, если указан путь - грузить курсор, иначе по умолчанию.
------------ Дoбавленo в 12.06:
Имел ввиду прикрутить вот это

Add(MainForm,2953706,420,189)
{
}
Add(Label,527571,490,133)
{
 Left=150
 Top=100
 Width=111
 Height=17
 Caption="test"
 Point(PHandle)
 Point(onMouseEnter)
 link(onMouseEnter,14989892:doSetCursor,[(529,146)(529,174)(487,174)(487,195)])
}
Add(InlineCode,14989892,497,189)
{
 WorkPoints=#11:doSetCursor|
 DataPoints=#7:PHandle|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses kol,Share,Debug,Windows;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|3:   |9:   public|21:   PHandle:THI_Event;|15:   pc:PControl;|54:   procedure doSetCursor(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|0:|34:procedure THiAsmClass.doSetCursor;|5:begin|43:  pc:=PControl(ReadInteger(_Data,PHandle));|60:  pc.Cursor := LoadCursorFromFile('C:\HiAsm\Int\cur\5.cur');|4:end;|4:end.|0:|
 link(PHandle,527571:PHandle,[])
}

карма: 0

файлы: 1 code_35383.txt [777B] [419]

Форумы Прочее Странное поведение отображения своего курсора ← Ctrl1Ctrl →