Empécher la sélection du texte des pages dans un WebBrowser

Est-il possible d'empécher la sélection ddu text des page ?

merci

Je crois que tu fais cela dans ta page HTML directement avec du javaScript

merci j'ai finalement trouver

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
procedure TForm2.MessageLoop(var Msg: TMsg; var Handled: Boolean);
// Application.OnMessage := MessageLoop;
begin
  if msg.hwnd = WebBrowser1.Handle then
    begin
      if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONUP)or (Msg.Message = WM_MOUSEMOVE)	then
        begin
          handled:=True;
        end
    end
  else
    begin
      if (Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONUP)or (Msg.Message = WM_MOUSEMOVE)then
        begin
          Handled := true;
      end;
    end;
end;

:D