Autoit源码—图像的编辑（官方）.docVIP

Autoit源码—图像的编辑官方#include GUIConstants.au3 #include GDIPlus.au3 #include Misc.au3 #Include GuiMenu.au3 Global $Picture, $Recentcount = 1, $Recent[2], $Edit = 0, $Place, $ImageWidth, $ImageHeight, $Resize = 0, $Sharpen = 0 Global $Output = @WindowsDir \Autoit.jpg FileInstall(ImageMagickObject.dll, @SystemDir \ImageMagickObject.dll, 0) RunWait(@ComSpec /c regsvr32 /s ImageMagickObject.dll, @SystemDir, @SW_HIDE) $GUI = GUICreate(Image Editor, 300, 300, 300, 200, $WS_OVERLAPPEDWINDOW) $FileMenu = GUICtrlCreateMenu(File) $FileMenuOpen = GUICtrlCreateMenuItem(Open..., $FileMenu) $FileMenuSave = GUICtrlCreateMenuItem(Save, $FileMenu) GUICtrlSetState(-1, $GUI_DISABLE) $FileMenuSaveAs = GUICtrlCreateMenuItem(Save As..., $FileMenu) GUICtrlSetState(-1, $GUI_DISABLE) $FileMenuRecentFiles = GUICtrlCreateMenu(Recent Files, $FileMenu) GUICtrlSetState(-1, $GUI_DISABLE) $FileMenuSeparator1 = GUICtrlCreateMenuItem(, $FileMenu) $FileMenuRenameFile = GUICtrlCreateMenuItem(Rename File..., $FileMenu) GUICtrlSetState(-1, $GUI_DISABLE) $FileMenuDeleteFile = GUICtrlCreateMenuItem(Delete File..., $FileMenu) GUICtrlSetState(-1, $GUI_DISABLE) $FileMenuSeparator2 = GUICtrlCreateMenuItem(, $FileMenu) $FileMenuExit = GUICtrlCreateMenuItem(Exit, $FileMenu) $EditMenu = GUICtrlCreateMenu(Edit) GUICtrlSetState(-1, $GUI_DISABLE) $EditMenuBlur = GUICtrlCreateMenuItem(Blur..., $EditMenu) $EditMenuCrop = GUICtrlCreateMenuItem(Crop Selection..., $EditMenu) $EditMenuResizeImage = GUICtrlCreateMenuItem(Resize Image..., $EditMenu) $EditMenuSharpen = GUICtrlCreateMenuItem(Sharpen..., $EditMenu) _GDIPlus_Startup() $oMyError = ObjEvent(AutoIt.Error, MyErrFunc) $oImg = ObjCreate(ImageMagickObject.MagickImage.1) GUISetState() Global $Client = _WinGetClientPos(1) While 1 $msg = GUIGetMsg() Switch $msg Case $FileMenuOpen $Image = FileOpenDialog(Choose file..., @DesktopCommonDir, JPG (*.jpg)) If Not @error Then For $i = 1 To $Recentcount