LoadPicture(Pictureなど)


VBの Pictureコントロール, Imageコントロールで画像を読み込むには, LoadPictureメソッドを使っていました。 Delphiの TImageコンポーネントでは, Pictureプロパティ(TPicture型)の 「LoadFromFile」メソッドを使用します。 内容を消去する場合は Pictureプロパティに nilを代入します。対応フォーマットはビットマップ、アイコン、メタファイルです。

■ TImageに画像をロードする例
  procedure TForm1.Button1Click(Sender: TObject);
  begin
    {ファイルを開くダイアログを表示}
    if  (OpenPictureDialog1.Execute)  then  begin
      {選ばれた画像を読み込む}
      Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
    end;
  end;

  procedure TForm1.Button2Click(Sender: TObject);
  begin
    {画像を消去}
    Image1.Picture  :=  nil;
  end;