Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

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

 
X-Disa   (2004-09-07 16:08) [0]

Здравствуйте. У меня такой вопрос:
Мне нужно, чтоб пока курсор находится на image"e, под ним рисовалась окружность (xor"ом например), а когда мышь выходила за его пределы, круг автоматически убирался. Как сделать?


 
Mihey_temporary ©   (2004-09-07 16:35) [1]

Нужно ввести OnMouseEnter, OnMouseLeave (либо потомком, либо подменив оконную функцию), и OnMouseMove. Курсор спрятать:   ShowCursor(False); Курсор нарисовать своё - это ты сможешь.


 
Рыба ©   (2004-09-07 18:43) [2]

А если окружность в диаметре <= 32 то можно и обычный курсорчик :))
Image.Cursor


 
Mihey_temporary ©   (2004-09-07 18:59) [3]


> А если окружность в диаметре <= 32 то можно и обычный курсорчик
> :))


А инвертируешь как?


 
Рыба ©   (2004-09-07 19:32) [4]

>Mihey_temporary ©  (07.09.04 18:59) [3]
>А инвертируешь как?

Дык это не проблема. Специальная маска или что там. Загляни в ImageEditor в нем можно создавать курсоры, которые будут инвертироваться. Там внизу 4 варианта рисования линий курсора - белый черный и два для инверсии.


 
Mihey_temporary ©   (2004-09-07 21:47) [5]


> Дык это не проблема. Специальная маска или что там. Загляни
> в ImageEditor в нем можно создавать курсоры, которые будут
> инвертироваться. Там внизу 4 варианта рисования линий курсора
> - белый черный и два для инверсии.


Тады гут. Так гораздо лучше будет - быстрее и надёжней.



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

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.045 c
1-1101777731
Змей
2004-11-30 04:22
2004.12.12
две формы в активе


3-1099996664
sergeii
2004-11-09 13:37
2004.12.12
Филтрация


1-1101899743
Islander
2004-12-01 14:15
2004.12.12
Как определить, что содержимое папки изменилось?


1-1101608757
Bobby Digital
2004-11-28 05:25
2004.12.12
Listbox pt.2


1-1101515434
Sirakuz
2004-11-27 03:30
2004.12.12
Delphi 8: TBytes ??