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

Вниз

Можно ли заблокировать правую кнопку мыши?   Найти похожие ветки 

 
maxim2   (2002-08-13 13:39) [0]

Привет!


 
Kaban   (2002-08-13 13:41) [1]

для этого нужно вскрыть ее корпус и подсунуть под кнопку что-нибудь плотное


 
maxim2   (2002-08-13 13:44) [2]

А если программно?


 
Kaban   (2002-08-13 13:45) [3]

а в чем проблема


 
maxim2   (2002-08-13 13:55) [4]

Нельзя чтобы пользователь щелкал правой кнопкой


 
Ученик   (2002-08-13 14:00) [5]

Попробуй

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if (Msg.message = wm_rbuttondown) or (Msg.message = wm_rbuttonup) or
(Msg.message = wm_rbuttondblclk) then
Handled := True
end;

Application.OnMessage := ApplicationEvents1Message


 
Kaban   (2002-08-13 14:02) [6]

messagebox(Handle, PChar("Не щелкай правой кнопкой мыши, а то диск отформатирую!!!"), PChar("Warning"),MB_OK+MB_IconWarning);


 
maxim2   (2002-08-13 14:04) [7]

А куда вставлять
Application.OnMessage := ApplicationEvents1Message



 
maxim2   (2002-08-13 14:05) [8]

Все спасибо разобрался.



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

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

Наверх





Память: 0.56 MB
Время: 0.034 c
4-69071
Tihas
2002-09-08 17:13
2002.10.21
Каким оброзом можно перерисовать, или обновить Caption Bar


14-68931
Mike B.
2002-09-26 12:01
2002.10.21
ICQ


1-68860
Пончик
2002-10-10 11:33
2002.10.21
FrontPage


1-68688
kingdom
2002-10-10 10:51
2002.10.21
Нужен редактор RES файлов!! Подскажите пожалуйста.


7-69038
Smok_er
2002-08-12 23:51
2002.10.21
Определение версии операционной системы и привилегий пользователя





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский