Размеры изображения в Input

[GUIMish]

Версия AutoIt: 3.3.8.1

Описание:
Здравствуйте, как сделать так, чтобы в окне нажимаешь на кнопку "Открыть" открываешь изображения, и потом в одном Input появлялась высота, а в другой ширина?

$Window = GUICreate("SizePicture", 190, 150, -1, -1, 532479, 0)

$nad = GUICtrlCreateGroup("Картинка:", 5, 5, 170, 40)
$Vib = GUICtrlCreateButton("...", 140, 20, 30, 20)
$url = GUICtrlCreateInput ("", 10, 20, 130, 20)
   GUICtrlSetState(-1, 256)

$Sh = GUICtrlCreateInput ("", 10, 60, 100, 20)
   GUICtrlCreateLabel ("Ширина", 120, 62, 100, 20)
$Vi = GUICtrlCreateInput ("", 10, 90, 100, 20)
   GUICtrlCreateLabel ("Высота", 120, 92, 100, 20)

GUISetState()
While 1
   Switch GUIGetMsg()
      Case -3
         ExitLoop
      Case $Vib
         $File = FileOpenDialog ("Открытие картинки", @MyDocumentsDir, "Картинки (*.jpg; *.bmp; *.gif)|JPG (*.jpg)|BMP (*.bmp)|GIF (*.gif)")
            GUICtrlSetData($url, $File)
   EndSwitch
WEnd

Заранее спасибо!

 

[madmasles]

GUIMish,

_GDIPlus_ImageGetWidth()
_GDIPlus_ImageGetHeight()

 

[GUIMish]

_GDIPlus_ImageGetWidth()
_GDIPlus_ImageGetHeight()

А как этим пользоваться?

 

[WSWR]

GUIMish

#include <GDIPlus.au3>

$Window = GUICreate("SizePicture", 190, 150, -1, -1, 532479, 0)

$nad = GUICtrlCreateGroup("Картинка:", 5, 5, 170, 40)
$Vib = GUICtrlCreateButton("...", 140, 20, 30, 20)
$url = GUICtrlCreateInput("", 10, 20, 130, 20)
GUICtrlSetState(-1, 256)

$Sh = GUICtrlCreateInput("", 10, 60, 100, 20)
GUICtrlCreateLabel("Ширина", 120, 62, 100, 20)
$Vi = GUICtrlCreateInput("", 10, 90, 100, 20)
GUICtrlCreateLabel("Высота", 120, 92, 100, 20)

GUISetState()

While 1
	Switch GUIGetMsg()
		Case -3
			ExitLoop
		Case $Vib
			$File = FileOpenDialog("Открытие картинки", @MyDocumentsDir, "Картинки (*.jpg; *.bmp; *.gif)|JPG (*.jpg)|BMP (*.bmp)|GIF (*.gif)")
			GUICtrlSetData($url, $File)
			_GDIPlus_Startup()
			$hBitmap = _GDIPlus_BitmapCreateFromFile($File)
			$Width = _GDIPlus_ImageGetWidth($hBitmap)
			$Height = _GDIPlus_ImageGetHeight($hBitmap)
			_GDIPlus_BitmapDispose($hBitmap)
			GUICtrlSetData($Sh, $Width)
			GUICtrlSetData($Vi, $Height)
			_GDIPlus_Shutdown()
	EndSwitch
WEnd

 

[GUIMish]

Огромное спасибо!