Changing the image resolution in powerbuilder

[Former Member]

Hi Everyone,

I am trying to change the image resolution (lower) i am using image magic for conversion. but i am unable to convert the file to lower resolution. please help with any code snippets.

Thank you.

[Former Member]

I would try using their OLE interface. Here is an example that converts a JPG to PNG.

OLEObject oMagick
String ls_origfile, ls_destfile
Integer li_rc
Any la_result

ls_origfile = "C:\PBSource\PB105\ImageMagick\Totoro.jpg"
ls_destfile = "C:\PBSource\PB105\ImageMagick\Totoro.png"

oMagick = Create OLEObject

li_rc = oMagick.ConnectToNewObject("ImageMagickObject.MagickImage")
If li_rc = 0 Then
   la_result = oMagick.Convert(ls_origfile, "-format", "png", ls_destfile)
   MessageBox("Convert", "Result: " + String(la_result))
Else
   MessageBox("ConnectToNewObject", "Failed: " + String(li_rc), StopSign!)
End If

oMagick.DisconnectObject()
Destroy oMagick