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

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

← →
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 вся ветка

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



Память: 0.46 MB
Время: 0.013 c