画像の表示位置を指定する

広告

イメージの中で画像を表示する位置を設定します。

表示位置の設定には「PictureAlignment」プロパティを使います。

背景に表示するピクチャの位置を設定します。

引数:
  object  設定するオブジェクトを指定します。
  fmPictureAlignment  ピクチャをコントロールのどこに合わせて配置する
    かを指定します。

設定可能な値は次の通りです。

定数境界線の状態
fmPictureAlignmentTopLeft0左上端に合わせて配置します
fmPictureAlignmentTopRight1右上端に合わせて配置します
fmPictureAlignmentCenter2中央に配置します
fmPictureAlignmentBottomLeft3左下端に合わせて配置します
fmPictureAlignmentBottomRight4右下端に合わせて配置します

デフォルトの値は「fmPictureAlignmentCenter」でイメージの中央に画像を表示します。縦方向及び横方向を個別には設定できず、中央か四隅のどこかに合わせて配置するしかありません。

実際の使い方としては次のようになります。

sampleForm.flowerImage.PictureAlignment = fmPictureAlignmentCenter

サンプルプログラム

では簡単なサンプルで試してみましょう。

testImage4.bas

Sub テスト()
    Load sampleForm
    sampleForm.flowerImage.Picture = LoadPicture("c:¥tmp¥flower.jpg")
    sampleForm.flowerImage.PictureAlignment = fmPictureAlignmentBottomLeft
    sampleForm.flowerImage2.Picture = LoadPicture("c:¥tmp¥flower.jpg")
    sampleForm.flowerImage2.PictureAlignment = fmPictureAlignmentTopRight
    sampleForm.Show
End Sub

上記マクロを実行すると次のように表示されます。

イメージの表示位置を指定

プロパティウィンドウで値を指定する

「PictureAlignment」プロパティについてはプロパティウィンドウで指定が出来ますので、値が決まっている場合は設計の時点で設定をしておくことも可能です。プロパティウィンドウの「PictureAlignment」の箇所の右側にある下向き矢印をクリックして値を選択して下さい。

イメージの表示位置を指定

( Written by Tatsuo Ikura )

関連記事 (一部広告含む)