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 に割り当てる方法がわかりません。