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

Движение курсора мыши   Найти похожие ветки 

← →
Nils ©   (2002-07-21 17:58) [0]

Hi ALL!
Есть ли у кого идеи о реализации такой фичи:
нужно в части окна дискретно двигать курсор мыши (с шагом 20 пикселей)
т.е. что бы курсор скакал!


← →
ZZ ©   (2002-07-21 18:06) [1]

GetcursorPos SetCursorPos


← →
Anatoly Podgoretsky ©   (2002-07-21 18:21) [2]

И не застрянь в одной позиции :-)


← →
Nils ©   (2002-07-21 18:23) [3]

To ZZ
Это понятно! Наверное даже по OnMouseMove проверять
но связка GetCursorPos / SetCursorPos глючит
Я заморочился с условиями когда нужно делать SetCursorPos а когда нет


← →
Acidy ©   (2002-07-22 09:39) [4]

Берёшь сначала начальные коодинаты курсора (GetCursorPos), затем в OnMouseMove проверяешь, увеличились они или уменьшились по сравнению с начальными ... ну а дальше SetCursorPos в нужное место ...


← →
Proton ©   (2002-07-22 18:21) [5]

может имеет способ спрятать кусрсор cr:=crnone;
а по форме перемещать картинку с изображением курсора
image1.tramsparet := true;
with image1.picture.bitmap do
begin
width := 40;
height := 40;
drawicon(canvas.handel,screen.cursors[crdefault]) ;
end;
и потом по ним ориентироваться.
если не видимый курсор ближе к какой то оперделенной точке то перемещаем картинку
что бы не мигал можно поставить doublebuffered := true;


← →
Proton ©   (2002-07-22 18:21) [6]

может имеет способ спрятать кусрсор cr:=crnone;
а по форме перемещать картинку с изображением курсора
image1.tranparet := true;
with image1.picture.bitmap do
begin
width := 40;
height := 40;
drawicon(canvas.handel,screen.cursors[crdefault]) ;
end;
и потом по ним ориентироваться.
если не видимый курсор ближе к какой то оперделенной точке то перемещаем картинку
что бы не мигал можно поставить doublebuffered := true;


← →
Proton ©   (2002-07-22 18:22) [7]

ooopps :)



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

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



Память: 0.46 MB
Время: 0.01 c
14-35862
andrei dmitriev
2002-08-16 12:03
2002.09.12
Проблемы с созданием инсталяшки, при использовании BDE или ADO...


1-35748
delphiwhat
2002-08-30 16:20
2002.09.12
ComboBox+Table+DB? ПРОБЛЕМА


1-35807
demisen
2002-08-30 11:32
2002.09.12
Main Form


1-35664
Nebuchadnezzar
2002-08-30 15:25
2002.09.12
TActionManager


1-35708
jcrush
2002-09-02 11:38
2002.09.12
МАСТЕРА !!! в RichEdit1 нужно найти и подсчитать сколько слов




   Наверх