Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];

Вниз

Прочитайте вопрос!!!   Найти похожие ветки 

 
Art   (2001-12-08 09:01) [0]

Чтобы ограничить плоскоть движения курсора границами формы делаю так:

var
aRect: TRect;
begin
GetWindowRect(Handle, aRect);
ClipCursor(@aRect);

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


 
MBo   (2001-12-08 10:23) [1]

ну в Destroy сделай так же, только

arect:=rect(0,0,GetSystemMetrics(SM_CXFULLSCREEN),GetSystemMetrics(SM_CYFULLSCREEN));
ClipCursor(@aRect);

это высота без трея, полную навскидку не помню - поищи


 
troits   (2001-12-08 11:01) [2]

Господа, ну один взгляд в Help и ClipCursor(nil) пишется сам собой!!!


 
PVR   (2001-12-08 11:02) [3]

Предыдущий ответчик абсолютно прав хочу сделать только маленькое дополнение.В доках у Била настоятельно рекомендуется при использовании ClipCursor делать активизацию окна. Странно потому как когда курсор ктото ограничивает окно обычно активно но Бил есть Бил


 
Olgerd   (2001-12-09 02:35) [4]

Так лучше и делать, а то когда нажимаешь Ctrl-Alt-Del, а потом Escape ClipCursor"а как не бывало.



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

Форум: "WinAPI";
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.005 c
1-8817
DJ X
2002-01-19 15:52
2002.02.04
Web браузер


1-8876
NLO
2002-01-15 06:35
2002.02.04
Загрузить иконку зарегистрированного расширения в ImageList


1-8862
Eraser
2002-01-21 12:34
2002.02.04
Процедура Delay


1-8956
Pimin
2002-01-18 23:32
2002.02.04
Транслитерация


1-8886
Dmitriy_R
2002-01-15 13:51
2002.02.04
Генерация случайного числа в диапазоне 30......90





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский