Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

зеркальное отображение курсора. [D5, D6, Win95/98]


Карлсон ©   (2002-11-27 17:51:00) 

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


Almaz   (2002-11-28 01:11:00) [1]

Отобразить куда ? Просто отобразить перевернутый курсор на картинке или установить в системе перевернутый курсор ?
В любом случае, последовательность действий такова:
1. Загрузить курсор HCur := LoadCursor(0, IDC_ARROW);
2. Отобразить его на любой битмап DrawIcon(Bitmap.Canvas.Handle, 0, 0, hCur);
3. Перевернуть его (через ScanLine, например)

Теперь, если необходимо создать курсор на основе полученного битмапа, то создаете его с помощью функции CreateIconIndirect
IconInfo.fIcon := FALSE;
IconInfo.hbmMask := Bitmap.MaskHandle;
IconInfo.hbmColor := Bitmap.Handle;
HCur := CreateIconIndirect(IconInfo);


Удачи.


Карлсон   (2002-11-27 20:56:00) [2]

никто не поможет?


Наверх

Титульная страница Поиск, карта сайта Написать письмо