Image processing 如何使用AUTOIT更改capscreen的图像属性
我是autoit新手,不知道在将图像保存到硬盘之前/之后如何更改屏幕盖的亮度和对比度?我在网上找到了这个函数(WinAPI_CreateColorAdjustment),但不知道如何将它与screencap集成 我的代码是:Image processing 如何使用AUTOIT更改capscreen的图像属性,image-processing,autoit,Image Processing,Autoit,我是autoit新手,不知道在将图像保存到硬盘之前/之后如何更改屏幕盖的亮度和对比度?我在网上找到了这个函数(WinAPI_CreateColorAdjustment),但不知道如何将它与screencap集成 我的代码是: #include <ScreenCapture.au3> #include <GUIConstantsEx.au3> $POSITION1=GUICtrlRead(1619) $POSITION2=GUICtrlRead(210) $POSITIO
#include <ScreenCapture.au3>
#include <GUIConstantsEx.au3>
$POSITION1=GUICtrlRead(1619)
$POSITION2=GUICtrlRead(210)
$POSITION3=GUICtrlRead(1900)
$POSITION4=GUICtrlRead(300)
_ScreenCapture_Capture(@ScriptDir & "\screencap.png",$POSITION1,$POSITION2,$POSITION3,$POSITION4)
#包括
#包括
$POSITION1=GUICtrlRead(1619)
$POSITION2=GUICtrlRead(210)
$POSITION3=GUICtrlRead(1900)
$POSITION4=GUICtrlRead(300)
_屏幕捕获\u捕获(@ScriptDir&“\screencap.png”、$POSITION1、$POSITION2、$POSITION3、$POSITION4)
非常感谢。以下是\u WinAPI\u CreateColorAdjustment函数的示例:
#include <APIGdiConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GDIPlus.au3>
#include <GUIComboBox.au3>
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WinAPIGdi.au3>
#include <WinAPIShPath.au3>
#include <WindowsConstants.au3>
Opt('GUICloseOnESC', 0)
Opt('TrayAutoPause', 0)
Global $g_aDefault[11] = [10000, 10000, 10000, 0, 10000, 0, 0, 0, 0, 0, 0]
Global $g_aAdjust = $g_aDefault
_GDIPlus_Startup()
Local $hObj, $hSrc, $W, $H, $sData
While 1
$sData = FileOpenDialog('Load Image', @ScriptDir & '\Extras', 'Image Files (*.bmp;*.dib;*.gif;*.jpg;*.tif)|All Files (*.*)', 1 + 2)
If @error Then Exit
$hObj = _GDIPlus_ImageLoadFromFile($sData)
If $hObj Then
$hSrc = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hObj)
$W = _GDIPlus_ImageGetWidth($hObj)
$H = _GDIPlus_ImageGetHeight($hObj)
_GDIPlus_ImageDispose($hObj)
If $hSrc Then
ExitLoop
EndIf
EndIf
MsgBox(BitOR($MB_ICONERROR, $MB_SYSTEMMODAL), 'Error', 'Unable to load image.')
WEnd
Local $hForm = GUICreate(_WinAPI_PathStripPath($sData), $W, $H)
GUICtrlCreatePic('', 0, 0, $W, $H)
GUICtrlSetState(-1, $GUI_DISABLE)
Local $hPic = GUICtrlGetHandle(-1)
Global $g_hTool = GUICreate('Adjustments', 303, 484, -1, -1, BitOR($WS_CAPTION, $WS_POPUP), 0, $hForm)
GUICtrlCreateGraphic(0, 0, 303, 436)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlCreateGraphic(0, 436, 303, 1)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetBkColor(-1, 0xDFDFDF)
Global $g_aidSlider[9][6] = [[0, 0, 'Red', 25, 650, 100], [0, 0, 'Green', 25, 650, 100], [0, 0, 'Blue', 25, 650, 100], [0, 0, 'Black', 0, 400, 10], [0, 0, 'White', 600, 1000, 10], [0, 0, 'Contrast', -100, 100, 1], [0, 0, 'Brightness', -100, 100, 1], [0, 0, 'Colorfulness', -100, 100, 1], [0, 0, 'Tint', -100, 100, 1]]
For $i = 0 To 8
GUICtrlCreateLabel($g_aidSlider[$i][2] & ':', 10, 21 + $i * 31, 60, 14, $SS_RIGHT)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$g_aidSlider[$i][2] = GUICtrlCreateInput('', 243, 18 + $i * 31, 49, 19, BitOR($ES_CENTER, $ES_READONLY))
GUICtrlSetFont(-1, 9.3, 400, 0, 'Arial')
GUICtrlSetBkColor(-1, 0xFFFFFF)
$g_aidSlider[$i][0] = GUICtrlCreateSlider(71, 19 + $i * 31, 170, 20, BitOR($TBS_BOTH, $TBS_NOTICKS))
GUICtrlSetLimit(-1, $g_aidSlider[$i][4], $g_aidSlider[$i][3])
$g_aidSlider[$i][1] = GUICtrlGetHandle(-1)
GUICtrlSetBkColor(-1, 0xFFFFFF)
Next
GUICtrlCreateLabel('Illuminant:', 10, 310, 60, 14, $SS_RIGHT)
GUICtrlSetBkColor(-1, 0xFFFFFF)
Global $g_idCombo = GUICtrlCreateCombo('', 77, 306, 158, 160, $CBS_DROPDOWNLIST)
Local $aLight = StringSplit('Default|Tungsten lamp|Noon sunlight|NTSC daylight|Normal print|Bond paper print|Standard daylight|Northern daylight|Cool white lamp', '|')
For $i = 1 To $aLight[0]
_GUICtrlComboBox_AddString(-1, $aLight[$i])
Next
GUICtrlCreateLabel('Filters:', 10, 347, 60, 14, $SS_RIGHT)
GUICtrlSetBkColor(-1, 0xFFFFFF)
Global $g_aidCheck[3]
$g_aidCheck[0] = GUICtrlCreateCheckbox('Negative (invert colors)', 77, 343, 131, 21)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$g_aidCheck[1] = GUICtrlCreateCheckbox('Logarithmic', 77, 368, 76, 21)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$g_aidCheck[2] = GUICtrlCreateCheckbox('Preview', 11, 401, 60, 21)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUICtrlSetState(-1, $GUI_CHECKED)
Local $aidButton[2]
$aidButton[0] = GUICtrlCreateButton('Reset', 136, 448, 75, 25)
$aidButton[1] = GUICtrlCreateButton('Save...', 218, 448, 75, 25)
_Reset()
GUICtrlSetState($g_aidSlider[0][0], $GUI_FOCUS)
GUIRegisterMsg($WM_HSCROLL, 'WM_HSCROLL')
GUISetState(@SW_SHOW, $hForm)
GUISetState(@SW_SHOW, $g_hTool)
While 1
Switch GUIGetMsg()
Case 0
ContinueLoop
Case $GUI_EVENT_CLOSE
Exit
Case $aidButton[0]
_Reset()
Case $aidButton[1]
GUISetState(@SW_DISABLE, $hForm)
$sData = FileSaveDialog('Save Image', @WorkingDir, 'Image Files (*.bmp;*.dib;*.gif;*.jpg;*.tif)|All Files (*.*)', 2 + 16, @ScriptDir & '\MyImage.jpg', $g_hTool)
GUICtrlSetState($aidButton[1], $GUI_FOCUS)
GUISetState(@SW_ENABLE, $hForm)
If Not $sData Then
ContinueLoop
EndIf
$hObj = _GDIPlus_BitmapCreateFromHBITMAP(_SendMessage($hPic, $STM_GETIMAGE))
If $hObj Then
If _GDIPlus_ImageSaveToFile($hObj, $sData) Then
$sData = 0
EndIf
_GDIPlus_ImageDispose($hObj)
EndIf
If $sData Then
MsgBox(BitOR($MB_ICONERROR, $MB_SYSTEMMODAL), 'Error', 'Unable to save image.')
EndIf
Case $g_aidCheck[0]
If GUICtrlRead($g_aidCheck[0]) = $GUI_CHECKED Then
$g_aAdjust[9] = BitOR($g_aAdjust[9], $CA_NEGATIVE)
Else
$g_aAdjust[9] = BitAND($g_aAdjust[9], BitNOT($CA_NEGATIVE))
EndIf
_Update()
Case $g_aidCheck[1]
If GUICtrlRead($g_aidCheck[1]) = $GUI_CHECKED Then
$g_aAdjust[9] = BitOR($g_aAdjust[9], $CA_LOG_FILTER)
Else
$g_aAdjust[9] = BitAND($g_aAdjust[9], BitNOT($CA_LOG_FILTER))
EndIf
_Update()
Case $g_aidCheck[2]
If GUICtrlRead($g_aidCheck[2]) = $GUI_CHECKED Then
_SetBitmapAdjust($hPic, $hSrc, $g_aAdjust)
Else
_SetBitmapAdjust($hPic, $hSrc)
EndIf
Case $g_idCombo
$sData = _GUICtrlComboBox_GetCurSel($g_idCombo)
If $g_aAdjust[10] <> $sData Then
$g_aAdjust[10] = $sData
_Update()
EndIf
EndSwitch
WEnd
Func _Reset()
$g_aAdjust = $g_aDefault
For $i = 0 To 8
GUICtrlSetData($g_aidSlider[$i][0], $g_aAdjust[$i] / $g_aidSlider[$i][5])
GUICtrlSetData($g_aidSlider[$i][2], $g_aAdjust[$i])
Next
_GUICtrlComboBox_SetCurSel($g_idCombo, $g_aAdjust[10])
If BitAND($g_aAdjust[9], $CA_LOG_FILTER) Then
GUICtrlSetState($g_aidCheck[1], $GUI_CHECKED)
Else
GUICtrlSetState($g_aidCheck[1], $GUI_UNCHECKED)
EndIf
If BitAND($g_aAdjust[9], $CA_NEGATIVE) Then
GUICtrlSetState($g_aidCheck[0], $GUI_CHECKED)
Else
GUICtrlSetState($g_aidCheck[0], $GUI_UNCHECKED)
EndIf
_Update()
EndFunc ;==>_Reset
Func _SetBitmapAdjust($hWnd, $hBitmap, $aAdjust = 0)
If Not IsHWnd($hWnd) Then
$hWnd = GUICtrlGetHandle($hWnd)
If Not $hWnd Then
Return 0
EndIf
EndIf
Local $tAdjust = 0
If IsArray($aAdjust) Then
$tAdjust = _WinAPI_CreateColorAdjustment($aAdjust[9], $aAdjust[10], $aAdjust[0], $aAdjust[1], $aAdjust[2], $aAdjust[3], $aAdjust[4], $aAdjust[5], $aAdjust[6], $aAdjust[7], $aAdjust[8])
EndIf
$hBitmap = _WinAPI_AdjustBitmap($hBitmap, -1, -1, $HALFTONE, $tAdjust)
If @error Then
Return 0
EndIf
Local $hPrev = _SendMessage($hWnd, $STM_SETIMAGE, $IMAGE_BITMAP, $hBitmap)
If $hPrev Then
_WinAPI_DeleteObject($hPrev)
EndIf
$hPrev = _SendMessage($hWnd, $STM_GETIMAGE)
If $hPrev <> $hBitmap Then
_WinAPI_DeleteObject($hBitmap)
EndIf
Return 1
EndFunc ;==>_SetBitmapAdjust
Func _Update()
If GUICtrlRead($g_aidCheck[2]) = $GUI_CHECKED Then
_SetBitmapAdjust($hPic, $hSrc, $g_aAdjust)
EndIf
EndFunc ;==>_Update
Func WM_HSCROLL($hWnd, $iMsg, $wParam, $lParam)
#forceref $iMsg, $wParam
Switch $hWnd
Case $g_hTool
For $i = 0 To 8
If $g_aidSlider[$i][1] = $lParam Then
$g_aAdjust[$i] = $g_aidSlider[$i][5] * GUICtrlRead($g_aidSlider[$i][0])
GUICtrlSetData($g_aidSlider[$i][2], $g_aAdjust[$i])
_Update()
ExitLoop
EndIf
Next
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_HSCROLL
#包括
#包括
#包括
#包括
#包括
#包括
#包括
#包括
#包括
#包括
#包括
#包括
Opt('GUICloseOnESC',0)
Opt('trayautopaise',0)
全局$g_aDefault[11]=[10000,10000,10000,0,10000,0,0,0,0,0,0]
全局$g_aAdjust=$g_aDefault
_GDIPlus_启动()
本地$hObj、$hSrc、$W、$H、$sData
而1
$sData=FileOpenDialog('Load Image',@ScriptDir&'\Extras',图像文件(*.bmp;*.dib;*.gif;*.jpg;*.tif)|所有文件(*.*),1+2)
如果@error,则退出
$hObj=\u GDIPlus\u ImageLoadFromFile($sData)
如果是$hObj那么
$hSrc=_GDIPlus_BitmapCreateHBITMAPFromBitmap($hObj)
$W=\u GDIPlus\u ImageGetWidth($hObj)
$H=\u GDIPlus\u ImageGetHeight($hObj)
_GDIPlus_ImageDispose($hObj)
如果是$hSrc,那么
ExitLoop
恩迪夫
恩迪夫
MsgBox(比特($MB\U ICONROR,$MB\U SYSTEMMODAL),“错误”,“无法加载图像”。)
温德
本地$hForm=GUICreate(_WinAPI_PathStripPath($sData),$W,$H)
GUICtrlCreatePic(“”,0,0,$W,$H)
GUICtrlSetState(-1,$GUIU禁用)
本地$hPic=GUICTRLGETHADLE(-1)
全局$g_hTool=GUICreate('Adjustments',303484,-1,-1,比特($WS_CAPTION,$WS_POPUP),0,$hForm)
GUICtrlCreateGraphic(0,030436)
GUICtrlSetState(-1,$GUIU禁用)
GUICTRLESTBKColor(-1,0xFFFFFF)
GUICtrlCreateGraphic(04363031)
GUICtrlSetState(-1,$GUIU禁用)
GUICTRLESTBKCOLOR(-1,0xDFDFDF)
全球$g_aidSlider[9][6]=[0,0,'Red',25650,100],[0,0,'Green',25650,100],[0,0,'Blue',25650,100],[0,0,'Black',0400,10],[0,0,'White',600,1000,10],[0,100,1],[0,0,'Brightness',-100,100,1],[0,0,'colourness',-100,100,1],[0,0,0,'Tint',-100,100,100,1]]
对于$i=0到8
GUICtrlCreateLabel($g_-aidSlider[$i][2]&':',10,21+$i*31,60,14,$SS_-RIGHT)
GUICTRLESTBKColor(-1,0xFFFFFF)
$g_aidsslider[$i][2]=GUICtrlCreateInput(''''243,18+$i*31,49,19,比特($ES_CENTER,$ES_READONLY))
GUICtrlSetFont(-1,9.34000,0,'Arial')
GUICTRLESTBKColor(-1,0xFFFFFF)
$g_aidslaider[$i][0]=GUICtrlCreateSlider(71,19+$i*31170,20,比特($TBS_两者,$TBS_通知))
GUICtrlSetLimit(-1,$g_-aidSlider[$i][4],$g_-aidSlider[$i][3])
$g_aidslaider[$i][1]=GUICtrlGetHandle(-1)
GUICTRLESTBKColor(-1,0xFFFFFF)
下一个
GUICtrlCreateLabel('光源:',10,310,60,14,$SS_右)
GUICTRLESTBKColor(-1,0xFFFFFF)
全局$g_idCombo=GUICtrlCreateCombo(“”、77、306、158、160、$CBS_DROPDOWNLIST)
本地$aLight=StringSplit('默认值|钨灯|正午阳光| NTSC日光|普通打印|邦德纸打印|标准日光|北方日光|冷白灯','|')
对于$i=1到$aLight[0]
_GUICtrlComboBox\u AddString(-1,$aLight[$i])
下一个
GUICtrlCreateLabel('Filters:',10347,60,14,$SS_RIGHT)
GUICTRLESTBKColor(-1,0xFFFFFF)
全球$g_aidCheck[3]
$g_aidCheck[0]=GUICtrlCreateCheckbox(“负(反转颜色)”,77343121)
GUICTRLESTBKColor(-1,0xFFFFFF)
$g_aidCheck[1]=GUICtrlCreateCheckbox('对数',77368,76,21)
GUICTRLESTBKColor(-1,0xFFFFFF)
$g_aidCheck[2]=GUICtrlCreateCheckbox('Preview',11,401,60,21)
GUICTRLESTBKColor(-1,0xFFFFFF)
GUICtrlSetState(-1,$GUIU已选中)
本地$AID按钮[2]
$aidButton[0]=GUICtrlCreateButton('Reset',136,448,75,25)
$aidButton[1]=GUICtrlCreateButton('Save…',218448,75,25)
_重置()
GUICtrlSetState($g_aidSlider[0][0],$GUIU FOCUS)
GUIRegisterMsg($WM\u HSCROLL,'WM\u HSCROLL'))
GuiseState(@SW_SHOW,$hForm)
GuiseState(@SW_SHOW,$g_hTool)
而1
开关GUIGetMsg()
案例0
连续作业
案例$GUI\u事件\u结束
出口
案例$aidButton[0]
_重置()
案例$aidButton[1]
GUISetState(@SW_DISABLE,$hForm)
$sData=FileSaveDialog('Save Image',@WorkingDir',图像文件(*.bmp;*.dib;*.gif;*.jpg;*.tif)|所有文件(*.*),2+16,@ScriptDir&'\MyImage.jpg',$g\u hTool)
GUICtrlSetState($aidButton[1],$GUI_FOCUS)
GUISetState(@SW_ENABLE,$hForm)
如果不是$sData,那么
连续作业
恩迪夫
$hObj=\u GDIPlus\u BitmapCreateFromHBITMAP(\u SendMessage($hPic,$STM\u GETIMAGE))
如果是$hObj那么
如果_GDIPlus_ImageSaveToFile($hObj,$sData),那么
$sData=0
恩迪夫
_GDIPlus_ImageDispose($hObj)
恩迪夫
如果是$sData那么
MsgBox(比特($MB\U ICONROR,$MB\U SYSTEMMODAL),“错误”,“无法保存图像”。)
恩迪夫
案例$g_aidCheck[0]
如果GUICtrlRead($g_aidCheck[0])=$GUI_选中,则
$g_aAdjust[9]=比特($g_aAdjust[9],$CA_负数)
其他的
$g_aAdjust[9]=比特和($g_aAdjust[9],比特不($CA_负))
恩迪夫
_更新()
案例$g_aidCheck[1]
如果GUICtrlRead($g_aidCheck[1])=$GUI_CHECKED,则
$g_aAdjust[9]=比特($g_aAdjust[9],$CA_LOG_过滤器)
其他的
$g_aAdjust[9]=比特和($g_aAdjust[9],比特不($CA_LOG_FILTER))
恩迪夫
_更新()
案例$g_aidCheck[2]
如果GUICtrlRead($g_aidCheck[2])=$GUI_CHECKED,则
_SetBitmapAdjust($hPic、$hSrc、$g_aAdjust)
其他的
_SetBitmapAdjust($hPi)