Вниз
Скачать: CL | DM;

Курсор   Найти похожие ветки 

 
МегаПупс   (2007-02-28 14:09) [0]

Как можно в делыи использовать свой курсор?


 
Джо ©   (2007-02-28 14:58) [1]

В разделе Справки Cursors/Example есть пример.


 
icWasya ©   (2007-02-28 15:09) [2]

Пусть у Вас есть файлы с изображениями курсоров - MyCursor.cur и MyDinCursor.ani

1) создайте текстовый файл MyCorsor.rc с таким содержимым
MyCursor Cursor MyCursor.cur
MyDinCursor 21 MyDinCursor.ani

в пятом дельфи для динамических курсоров еще не было названия, поэтому 21

 
2) подключите его к проекту

3) если хотите использовать курсор как дополнительный к стандартным курсорам, заведите константу

Const crMyCursor:TCursor = 1024;

// число любое, не совпадающее со стандартными

4) где-нибуть при инициализации сделать так

Screen.Cursors[crMyCyrsor]:=LoadCursor(HInstanse,"MyCursor");//дополнительный курсор
Screen.Cursors[crHourGlass]:=LoadCursor(HInstanse,"MyDinCursor");//замена стандартному


5)ну а потом при необходимости

Form1.Cursor:=crMyCursor;


 
ASoft   (2007-02-28 16:43) [3]


> icWasya ©   (28.02.07 15:09) [2]

Между 1 и 2-ым можно(нужно) добавить скомпилить ресурс.. :)


 
МегаПупс   (2007-02-28 17:19) [4]

Всем большой сенкс :)


 
icWasya ©   (2007-02-28 17:21) [5]

>ASoft   (28.02.07 16:43) [3]
>..скомпилить ресурс
У меня D5 - компилится само



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
2-1172167065
Novichok_New
2007-02-22 20:57
2007.03.18
Снова ListView (+ Hint)


15-1172047475
stone
2007-02-21 11:44
2007.03.18
Великий пост


2-1172584874
Flood_control
2007-02-27 17:01
2007.03.18
OpenDialog и MediaPlayer


3-1166640163
The X
2006-12-20 21:42
2007.03.18
"Table is busy" при попытке добавить новое поле через запрос.


6-1160052302
Прохожев М
2006-10-05 16:45
2007.03.18
Письма с вложением




   Наверх