EmbeddedWB маніпуляції з контекстним меню (PopUpMenu).

Компонент дозволяє проводити різноманітні маніпуляції з контекстним меню.
Всі ці можливості реалізовані в властивостях.

Вступ

Даний опис проведений на основі компонента версії EmbeddedWB_D5-D2009_Version_14.67.8.
Так що в залежності від релізів все мною написане може не мати актуальності.

Опис

Заборинити появу контекстного меню можна двома способами.
Перший - це в Інспекторі об'єкта (Object Inspector) у властивостях EmbeddedWB виставити відповідні значення в таких випадаючих списках як DisabledPopUpMenus (заборонені контекстні меню) і DisabledPopUpMenuItems (заборонені елементи контекстного меню).
DisabledPopUpMenus і DisabledPopUpMenuItems це множини з булевими складниками. Кожний елемент множини може приймати два значення true (заборонити елемент) або false (дозволити елемент).

Другий спосіб - це прописати відповідні властивості в коді. В ньому я опишу який елемент множини за що відповідає.

unit MainWindow;

interface

uses
............................
type
............................

private
    { Private declarations }
   procedure setewbparam;
  public
    { Public declarations }
  end;

var
............................

implementation

{$R *.dfm}

procedure TForm1.setewbparam;
begin
Form1.EWB1.DisabledPopupMenuItems:=[rcsBack,        //навігація вперед
            rcsForward,  //навігація назад
                                    rcsSavePageBkg, //зберегти фон як 
                                    rcsSetAsBkg, //встановити фоновим рисунком
                                    rcsCopyBkg,  //копіювати фон
                                    rcsSetAsDeskT, //зберегти як елемент робочого столу
                                    rcsSelectAll, //виділити все
                                    rcsPaste,  //вставити
                                    rcsCreateSC, //створити ярлик
                                    rcsAddToFav, //додоти до Вибраного
                                    rcsEncoding, //кодування (Windows, UTF-8 і т.д.)
                                    rcsRefresh,  //оновити
                                    rcsViewSource, //перегляд html коду
                                    rcsProperties,      //властивості
                                    rcsPrint,  //друк
                                    rcsOpenNWindow, //відкрити в новому вікні
                                    rcsOpenLink  //відкрити посилання (лінк)
                                   ];
Form1.EWB1.DisabledPopupMenus:=[rcmDefault,
                                rcmImage, //відключає контекстне меню на картинаках
                                rcmControl, //відключає контекстне меню на різноманітних 
                                           //контролах (кнопка, edit ...)
                                rcmTable, //відключає контекстне меню на таблицях
                                rcmSelText, //відключає контекстне меню на вибраному тексті
                                rcmAnchor, //відключає контекстне меню на
                                          //якорях                                 
                                rcmUnKnown,   //відключає невідомі контекстні меню
                                rcmImageArt, //відключає контекстне меню на ImageArt
                                rcmImgDynSrc, //відключає контекстне меню на динамічних малюнках
                                rcmDebug, //відключає контекстне меню в режимі відладки (Debug mode)
                                rcmAll //відключає всі контекстні меню
];
end;
.......................
end.

Отже щоб відключити контекстне меню повністю треба написати таку стрічку коду

EWB1.DisabledPopupMenus:=[rcmAll];

Після цього можна, наприклад, додати своє контестне меню використавши з палітри компонентів PopUpMenu.

Офіційний сайт розробників.