Auflösung wiedergeben

[autoit]

#include <GDIPlus.au3>
Local $hImage, $iWidth, $iHeight

[/autoit][autoit][/autoit][autoit]

$hImage = _GDIPlus_ImageLoadFromFile(@Scriptdir & "\test.jpg")
$iWidth = _GDIPlus_ImageGetWidth($hImage)
$iHeight = _GDIPlus_ImageGetHeight($hImage)

[/autoit][autoit][/autoit][autoit]

MsgBox(0,"",$iWidth & "x" & $iHeight)

[/autoit][autoit][/autoit][autoit]

_GDIPlus_ImageDispose($hImage)

[/autoit]

Nur schnell im Browser getippt - ungetestet.

[autoit]

$hImage = _GDIPlus_ImageLoadFromFile($sPath)
$iWidth = _GDIPlus_ImageGetWidth($hImage)
$iHeight = _GDIPlus_ImageGetHeight($hImage)

[/autoit]

/zu langsam

In dem script von Seubo fehlt der Befehl

[autoit]

_GDIPlus_Startup()

[/autoit]

an anfang und der Befehl

[autoit]

_GDIPlus_Shutdown()

[/autoit]

am Ende

[autoit]

#include <GDIPlus.au3>
_GDIPlus_Startup()
$Datei = FileOpenDialog("Bitte ein Bild aussuchen", "", "Bilder (*.jpg;*.png;*.bmp)")
If @error Then Exit
$Bild = _GDIPlus_ImageLoadFromFile($Datei)
$iX = _GDIPlus_ImageGetWidth($Bild)
$iY = _GDIPlus_ImageGetHeight($Bild)
_GDIPlus_ImageDispose($Bild)
_GDIPlus_ShutDown()
MsgBox(0, "Bild Auflösung", $Datei & " hat eine Auflösung von :" & @CRLF & @CRLF & $iX & " x " & $iY & " Pixel.")
Exit

[/autoit]

Gruß,
UEZ