Что нового

Ошибка при определении высоты и ширины изображения

Mr. Anderson

Новичок
Сообщения
122
Репутация
4
Код:
$sLFile		= $sFoled&'\'&$aPics[0][0]
	$hImage		= _GDIPlus_BitmapCreateFromFile($sLFile)
	$iLPic_W	= _GDIPlus_ImageGetWidth($hImage)
	$iLPic_H	= _GDIPlus_ImageGetHeight($hImage)
	ConsoleWrite($sLFile&', 0, 0, '&$iLPic_W&', '&$iLPic_H&@CRLF)

Вывод в консоли:
Код:
J:\Pictures\Картинки\Природа\11156.jpg, 0, 0, -1, -1

Вопрос: где я портачу и как все таки определить высоту и ширину?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Mr. Anderson
У меня так работает:
Код:
#include <GDIPlus.au3>

_GDIPlus_Startup()
$sLFile = @MyDocumentsDir & '\Скриншоты\sshot-1.jpg'
$hBitmap = _GDIPlus_BitmapCreateFromFile($sLFile)
$iLPic_W = _GDIPlus_ImageGetWidth($hBitmap)
$iLPic_H = _GDIPlus_ImageGetHeight($hBitmap)
_GDIPlus_Shutdown()
ConsoleWrite($sLFile & ', 0, 0, ' & $iLPic_W & ', ' & $iLPic_H & @CRLF)
 
Автор
M

Mr. Anderson

Новичок
Сообщения
122
Репутация
4
Хех, теперь и правда определяет размер =) Спасибо
Но теперь как то не создается GUICtrlCreatePic

Код:
Func ViewPic(ByRef $aPics, ByRef $iNumPic)
	$sLFile		= $sFoled&'\'&$aPics[$iNumPic][0]
	$hImage		= _GDIPlus_BitmapCreateFromFile($sLFile)
	$iLPic_W	= _GDIPlus_ImageGetWidth($hImage)
	$iLPic_H	= _GDIPlus_ImageGetHeight($hImage)
	ConsoleWrite($sLFile&', 0, 0, '&$iLPic_W&', '&$iLPic_H&@CRLF)
	GUICtrlCreatePic($sLFile, 0, 0, $iLPic_W, $iLPic_H)
	_GDIPlus_BitmapDispose($hImage)
EndFunc

$hGUI = GUICreate('Explorer', 900, 900)
GUISetState()
_GDIPlus_Startup()

	ViewPic($aPics, 5)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE

_GDIPlus_ShutDown ()
GUIDelete()


Окно есть, а картинки нет.... :blink:
 
Верх