Отключить реакцию на события мыши |
Previous Top Next |
Code: |
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean); begin Handled := (msg.wParam = vk_lButton) or (msg.wParam = vk_rButton) or (msg.wParam = vk_mButton); end;
|
©Drkb::01594
DelphiWorld 6.0