0

TRzGroup の助けを借りてサイドバー画像を作成しています。既に Print Now というキャプションを持つ TRzGroup を作成し、それに Print という名前のアイテムを追加しました。下の図に示すように、メニュー項目の左側に小さなプリンター アイコン イメージを追加する予定です。それはどのように行うことができますか?

object RzGroup2: TRzGroup
      Items = <
        item
          Caption = 'Print'
          ImageIndex = 4
          OnClick = RzGroup2Items0Click
        end>
      Opened = True
      OpenedHeight = 47
      DividerVisible = False
      SmallImages = ImageList1
      Special = True
      Caption = 'Print Now'
      ParentColor = False
    end

このコードはコードのどこかから抽出されていますが、SmallImage 属性は ImageList1 に割り当てられています。画像メニュー用だと思います。オブジェクト インスペクタで SmallImages プロパティがあることを確認しましたが、ImageList1 を作成して SmallImages に割り当てる方法がわかりません。

ここに画像の説明を入力

4

1 に答える 1