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

Вниз

Изменение курсора на границе панели   Найти похожие ветки 

 
Дельфин   (2005-08-11 20:49) [0]

Когда я обычным методом присваиваю панели собственный курсор, то курсор меняется внутри панели, а на границе остаётся как обычный Windows-курсор.
Как мне сделать так, чтобы курсор менялся на границе на мой собственный?


 
Petr V. Abramov ©   (2005-08-11 20:58) [1]

Обрабатывать WM_SETCURSOR?


 
Дельфин   (2005-08-11 21:07) [2]

Не очень хорошо представляю как это работает. Не можете ли объяснить поподробней?


 
Kolan ©   (2005-08-11 21:14) [3]

Windows SDK Help + WM_SETCURSOR - там подробнее есть.


 
Ученик   (2005-08-11 21:22) [4]

>Дельфин   (11.08.05 20:49)  

Возможно, не понял что нужно


procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
 Y: Integer);
begin
 if (X < 3) or ((Panel1.Width - X) < 3) then
   Panel1.Cursor := crSizeWE
 else if (Y < 3) or ((Panel1.Height - Y) < 3) then
   Panel1.Cursor := crSizeNS
 else
   Panel1.Cursor := crDefault
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.048 c
14-1123759018
by
2005-08-11 15:16
2005.09.04
В каком из украинских банком сейчас выгоднее держать депозит?


9-1115410889
Qwertyk
2005-05-07 00:21
2005.09.04
Карты


1-1124036570
_Odi_
2005-08-14 20:22
2005.09.04
аналог ACDSee.Подскажите


14-1123743417
Makhanev A.S.
2005-08-11 10:56
2005.09.04
Code Insight и тормоза


1-1123661183
Andry
2005-08-10 12:06
2005.09.04
Размер шрифта