delphi - Delphi での宣言されていない識別子 (偽の) エラー

Question

にはDelphi -> Help -> Table Of Content -> Code Example -> Delphi -> ActnMgrBar、チュートリアル regd Action Manager Component があります。誰でもこのチュートリアルをヘルプから取得してチェックアウトできます。

説明 : このアプリケーションには、すでにフォームに TPopupActionBar コンポーネントが必要です。アプリケーションは、アクション マネージャー コンポーネントを作成し、そのプロパティの一部にイメージ リストを割り当てます。次に、ポップアップ アクション バーがカスタマイズされ、フォームの PopupMenu プロパティに割り当てられます。フォームを右クリックして、ポップアップ メニューを表示します。

procedure TForm1.FormCreate(Sender: TObject);
var
  Images: TImageList;
  Image: TBitmap;
  ActionManager: TActionManager;  
  Option1, Option2: TMenuItem;
begin
  // display an information message
  ShowMessage('Right click the form to display the customized popup menu');
  // create an image list
  Images := TImageList.Create(self);
  Images.Height := 32;
  Images.Width := 32;
  try
    Image := TBitmap.Create;
    Image.Height := 32;
    Image.Width := 32;
    Image.Canvas.Font.Name := 'Times New Roman';
    Image.Canvas.Font.Size := 22;
    Image.Canvas.TextOut((Image.Width - Image.Canvas.TextWidth('1')) div 2, 0, '1');
    Images.Add(Image, nil);
  finally
    Image.Free;
  end;
  // create an action manager and assign the image list to some of its properties
  ActionManager := TActionManager.Create(self);  
  ActionManager.DisabledImages := Images;  
  ActionManager.LargeDisabledImages  := Images;  
  ActionManager.LargeImages := Images;
  // add some items to the popup menu associated with the popup action bar
  Option1:= TMenuItem.Create(self);
  Option1.Caption := 'New';
  PopupActionBar1.Items.Add(Option1);
  Option2:= TMenuItem.Create(self);
  Option2.Caption := 'Save';
  PopupActionBar1.Items.Add(Option2);
  // let the popup action bar be the form's popup menu
  Form1.PopupMenu := PopupActionBar1;
end;

次のエラーが表示されます。

Undeclared Identifier : TActionManager

TAniIndicatorこのタイプの宣言されていない識別子エラーは、コンポーネントがソースで宣言されている Delphi で頻繁に発生します (以前は で同じタイプのエラーが発生しました)。上記の場合、手動TActionManagerでフォームを配置すると、コードが機能します。HP PC での Delphi のインストールまたは構成にエラーがあるに違いない、と誰かに言われました。