実行モジュールのストックアイコンを描画する
ここでは自モジュールのストックアイコンを取り出して描画します。
サンプルを実行すると下記のようにアイコンが描画されます。
■必要なコンポーネント
■使用するAPI関数
■ソースは下記のようになります。
■ストックアイコンを描画する処理 | |
procedure TForm1.Button1Click(Sender:
TObject); end; |