Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как изменить вид курсора 
V
    Опции темы
СВА
Дата 25.2.2006, 05:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 9.1.2006

Репутация: нет
Всего: нет



Как изменить вид курсора если
Код

Me.MouseIcon = LoadPicture("D:\?????\??????\15.cur")


не работает

PM MAIL   Вверх
Voldemar2004
Дата 25.2.2006, 10:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1650
Регистрация: 25.12.2004

Репутация: 7
Всего: 23



Зачем подгружать из файла? Свойство есть такое: mouseicon и mousepointer. Если хочешь сделать свой курсор, то его надо заранее прописать в программе - щелкаешь по свойству MouseIcon - и выбираешь.


--------------------
i_i 
(';') 
(V)

user posted image
PM MAIL   Вверх
Тутанхамец
Дата 25.2.2006, 11:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 612
Регистрация: 10.10.2005
Где: в пирамидЕ!

Репутация: 4
Всего: 6



Лично у меня работает вот так:

Код

Me.MousePointer = 99
Set Me.MouseIcon = LoadPicture("c:\current\cursor1.cur")


Если MousePointer установлен в 0 (default), то форме плевать, что ты загонишь в mouseicon, она всё равно будет пользоваться стандартным курсором. smile

Это сообщение отредактировал(а) Тутанхамец - 25.2.2006, 11:31
PM MAIL   Вверх
СВА
Дата 26.2.2006, 05:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 9.1.2006

Репутация: нет
Всего: нет



ОК я нашел выход

Ниже приведены значение св-ва MousePointer и их описания

Описание значение

Стрелка 1
Стрелка и песочные часы 13
Стрелка и знак вопроса 14
Крестик 2
Песочные часы 11
Текстовый курсор 3
Указатель «Операция невозможна» 12
Стрелки изменения размера 15
Стрелки во всех направлениях 5
Двусторонняя диагональная стрелка (северо-восток — юго-запад) 6
Двусторонняя вертикальная стрелка 7
Двусторонняя диагональная стрелка (северо-запад — юго-восток) 8
Двусторонняя горизонтальная стрелка 9
Стрелка вверх 10
ползовательский курсор 99

значение 99 позволяет загружать собственные курсоры следующим образом

Код

Me.MouseIcon = LoadPicture("c:\current\cursor1.cur")


PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0601 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.