## Код:
```
PROCEDURE (v: View) HandleCtrlMsg* (f: Views.Frame; VAR msg: Controllers.Message; VAR focus: Views.View);
BEGIN
  WITH msg: Controllers.PollOpsMsg DO
    msg.type := 'MyViews.View'; (* Здесь должно быть имя типа для контекстного меню. *)
    msg.valid := {}
  ELSE
  END
END HandleCtrlMsg;
```
