как получить размер файла-картинки?

[DimaZ]

Подскажите плиз!!
как получить размер изображения файла в пикселах (bmp, gif, jpg) чтоб потом программно устанавливать Image.height и Image.width.

[RayShade]

Прочитать заголовок В нем вся необходимая инфа.

[GoGosha]

Подскажите плиз!!
как получить размер изображения файла в пикселах (bmp, gif, jpg) чтоб потом программно устанавливать Image.height и Image.width.

Или можно так:

Dim a As IPictureDisp

Set a = Нужная картинка или LoadPicture
Image.Height = a.Height
Image.Width = a.Width

[alibek]

Можно и без лишних деклараций

Код: Выделить всё

With LoadPicture(...)
  Image1.Width = .Width
  Image1.Height = .Height
End With

[Cyrax]

вобще-то Image сам под размеры картинки растягивается (если только его свойство Stretch = False)
а у PictureBox'а есль свойство AutoSize