Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click
Dim dlg As OpenFileDialog = New OpenFileDialog()
dlg.Filter = "画像ファイル(*.bmp;*.dib;*.jpg;*.jpeg;*.png;*.raw)|*.bmp;*.dib;*.jpg;*.jpeg;*.png;*.raw"
dlg.Filter += "|すべてのファイル (*.*)|*.*"
dlg.Multiselect = False
If dlg.ShowDialog(Me) = DialogResult.OK Then
Try
'' 画像ファイルの読み込み.
FVIL.File.Function.LoadImageFile(dlg.FileName, m_image, FVIL.PixelMode.Unpacking);
'' 画像ビューの表示更新.
CFviImageView1.FitImageSize()
CFviImageView1.Refresh()
Catch ex As FVIL.CFviException
End Try
End If
End Sub