Will66 Posted January 22, 2007 Share 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 Link to comment Share on other sites More sharing options...
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