scaleimage

[derrod]

Hi, I made the following script to scale a picture and save it to a file but it doesn't work: 

#include <GDIPlus.au3>
#include <WindowsConstants.au3>

Hotkeyset ("{F2}","_scale")

While 1
   Sleep(100)
WEnd

Func _scale()
   $hImage = _GDIPlus_BitmapCreateFromFile ( @ScriptDir & "/Data/2.bmp" )
   $hScaleImage = _GDIPlus_ImageScale ( $hImage, 0.5, 0.5)
    _GDIPlus_ImageSaveToFile ( $hScaleImage,  @ScriptDir & "/Data/22.bmp" )
EndFunc

Please help,

regards

Derrod

Edited July 31, 2014 by derrod

[UEZ]

derrod,

dies ist ein englishsprachiges Forum. Also, wenn du in Deutsch schreiben möchtest, dann besuche einfach www.autoit.de. Ansonsten schreibe bitte in Englisch!

Back to englisch:

Please post your full code to see what's wrong.

Br,

UEZ

[derrod]

@UEZ: Danke habs geändert!

[UEZ]

Try this:

#include <GDIPlus.au3>
#include <WindowsConstants.au3>

_GDIPlus_Startup()
Hotkeyset ("{F2}","_scale")
Hotkeyset ("{ESC}","_Exit")

While 1
   Sleep(100)
WEnd

Func _scale()
   $hImage = _GDIPlus_BitmapCreateFromFile ( @ScriptDir & "/Data/2.bmp" )
   $hScaleImage = _GDIPlus_ImageScale ( $hImage, 0.5, 0.5)
    _GDIPlus_ImageSaveToFile ( $hScaleImage,  @ScriptDir & "/Data/22.bmp" )
EndFunc

Func _Exit()
    _GDIPlus_Shutdown()
    Exit
EndFunc

Br,

UEZ

[derrod]

Thank u very much! I forgot to start and shutdown the engine :/