TEdit

[roman]

En Delphi 7 el Edit tiene el evento OnContextPopup en el cual ajustas el parámetro Handled a true y con eso evitas que aparezca.

Tengo la impresión de que versiones anteriores de Delphi no tienen este evento. Si es así se puede crear un descendiente de TEdit que inhabilite el mensaje WM_CONTEXTMENU:

type
  TrmEdit = class(TEdit)
    procedure WM_CONTEXTMENU(var Msg: TMessage); message WM_CONTEXTMENU;
  end;

...

procedure TrmEdit.WM_CONTEXTMENU(var Msg: TMessage); message WM_CONTEXTMENU;
begin
  { no hacer nada }
end;

// Saludos