//------------------------------------------------------------------------------
//消息回调
procedure TfrmClient.ApplicationEventsMessage(var Msg: tagMSG; var Handled: Boolean);
begin
if ((Msg.Message = WM_RBUTTONDOWN) then
begin
if (Msg.hwnd=Web.handle) then
Handled:=True;
end;
end;