|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Как загрузить несколько курсоров в массив из курсоров?
Я не хочу для каждого курсора делать отдельную переменную, проще сделать массив и загружать из него по номеру. но вот я сделал так:
Код:
var Cursors: array of HCursor; //У меня динамичный массив begin Cursors[0]:=LoadCursorFromFile('NowMouse.cur');//Загружаю курсор Cursors[1]:=LoadCursorFromFile('SelectMouse.cur');//Загружаю курсор end; Что мне делать? |
#2
|
||||
|
||||
Может SetLength(Cursors, 2)?
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#3
|
||||
|
||||
Так?
Код:
Cursors:=LoadCursorFromFile('NowMouse.cur'); SetLength(Cursors, 1) |
#4
|
||||
|
||||
Код:
var Cursors: Array of HCursor; begin SetLength(Cursors, 2); Cursors[0]:=LoadCursorFromFile('NowMouse.cur'); Cursors[1]:=LoadCursorFromFile('SelectMouse.cur'); end; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#5
|
||||
|
||||
Только так по-моему не получится... Лучше так
Код:
Screen.Cursors[50]:=LoadCursorFromFile('NowMouse.cur'); Screen.Cursors[51]:=LoadCursorFromFile('SelectMouse.cur'); Cursor:=50;{51} Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#6
|
||||
|
||||
Курсоры загружаются в массив?
Еще проблема , я делаю Код:
MainForm.Cursor:=Cursor Код:
Mainform.cursor:=50 но курсор не меняется. |
#7
|
||||
|
||||
Перед Mainform.cursor:=50 написал Screen.Cursors[50]:=LoadCursorFromFile('NowMouse.cur')?
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#8
|
||||
|
||||
Код:
Screen.Cursors[50]:=LoadCursorFromFile('now.cur'); Screen.Cursors[51]:=LoadCursorFromFile('pen.cur'); Cursor:=50; MainForm.Cursor:=50; |
#9
|
||||
|
||||
У меня работает... Когда подводишь курсор на форму, он меняется. А файлы точно есть?
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#10
|
||||
|
||||
Да. Но курсор остается обычным...
Я даже на кнопку этот код писал - безрезультатно. |
#11
|
||||
|
||||
Может у тя все форма компонентами закрыта? Панельками например.
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#12
|
||||
|
||||
Да. Я даже менял курсор на панельке, но также безрезультатно:
Код:
Screen.Cursors[50]:=LoadCursorFromFile('new.cur'); Screen.Cursors[51]:=LoadCursorFromFile('pen.cur'); Cursor:=50; LeftPanel.Cursor:=50; |
#13
|
||||
|
||||
Попробуй указать полный путь к курсору
Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |