Will66 Posted January 22, 2007 Posted January 22, 2007 (edited) Hi, is there an equivelent to - Response.BinaryWrite BinData for autoit? Im attempting to utilise CxImageATL.dll has some nice image functions.I can save the thumb to file, I believe its possible to display image without neccasary to save it first.http://www.codeproject.com/asp/thumbtools2...13725&fr=51expandcollapse popup#include <GUIConstants.au3> $Form1 = GUICreate("AForm1", 633, 454, 193, 115,$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPCHILDREN ) $Height=200 $Width=200 $objCxImage = ObjCreate("CxImageATL.CxImage") $objCxImage.Load("C:\WINDOWS\Web\Wallpaper\Autumn.jpg",2) $objCxImage.IncreaseBpp(24) $widthOrig = $objCxImage.GetWidth() $heightOrig = $objCxImage.GetHeight() ;msgbox(0,"",$widthOrig & ", " & $heightOrig) $fx = $widthOrig/$Width $fy = $heightOrig/$Height;subsample factors ; must fit in thumbnail size If $fx>$fy Then $f=$fx Else $f=$fy; Max(fx,fy) EndIf If $f<1 Then $f=1 $widthTh = Int($widthOrig/$f) $heightTh = Int($heightOrig/$f) Else $widthTh = $Width $heightTh = $Height EndIf msgbox(0,"",$widthTh & ", " & $heightTh) $objCxImage.Resample($widthTh,$heightTh,2) ;$objCxImage.Save("C:\Program Files\AutoIt3\Thumbnails\Purple flower3.jpg", 2) $BinData = $objCxImage.ImageForASP(2,85) $Obj1_ctrl = GUICtrlCreateObj($BinData,120, 32,$widthTh,$heightTh);<---- GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Edited January 22, 2007 by Will66
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now