patshi

Hi, I recently run in a bug with _WinAPI_StretchBlt. If I scale an image over a specific size (SourceImage: 1860x77524) to a destination size of 1860x58143 pixels the function fails with an error (error: true, extended: 0). Below this size (for example as source size 1860x66114) works. I dont know where exactly the threshold of error is, but the lower resolution works and the higher not. It seems to be connected to the function _WinAPI_SetStretchBltMode($hCompDC, $STRETCH_HALFTONE). If I create the WinAPI buffer without the better antialiasing $STRETCH_HALFTONE, the _WinAPI_StretchBlt function does not fail. I used beta v3.3.15.4 What could cause this? Any help appreciated. Thanks, Patrick.

Thanks guys!!! Thats exacly what I needed! Greets, Patrick.

Hi, I have following problem. I want to mirror an image (bitmap) and display it via _WinAPI_BitBlt because the image needs to be shown really fast. The first script works fine, showing the mirroring graphic just fine via GDI+, but the second script does not work the way I pulled it together. My primary question is: how to mirror an image (like with _GDIPlus_ImageRotateFlip) but with Win_API commands properly? This is the working version via GDI+ : #include <GDIPlus.au3> #include <winapi.au3> #include <windowsconstants.au3> Opt("GuiOnEventMode", 1) If Not FileExists(@ScriptDir&"\smiley.png") Then InetGet("http://msp5.photobucket.com/albums/y196/dannydude182/smiley-300x300.png", @ScriptDir&"\smiley.png") _GDIPlus_Startup() $image = _GDIPlus_ImageLoadFromFile(@ScriptDir&"\smiley.png") $w = _GDIPlus_ImageGetWidth($image) $h = _GDIPlus_ImageGetHeight($image) $hwnd = GUICreate("Test", $w, $h) Guisetbkcolor(0) GUISetState() GUISetOnEvent(-3, "close") $graphics = _GDIPlus_GraphicsCreateFromHWND($hwnd) $bitmap = _GDIPlus_BitmapCreateFromGraphics($w, $h, $graphics) $backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap) _GDIPlus_ImageRotateFlip($image, 6) ; <<<<<==== needed function ; ### Draw via GDIPlus _GDIPlus_GraphicsDrawImageRect($backbuffer, $image, 0, 0, $w, $h) _GDIPlus_GraphicsDrawImageRect($graphics, $bitmap , 0, 0, $w, $h) While 1 Sleep(20) WEnd Func close() _GDIPlus_ImageDispose($image) _GDIPlus_GraphicsDispose($backbuffer) _GDIPlus_GraphicsDispose($graphics) _GDIPlus_Shutdown() Exit EndFunc ;==>close This is the non-working WinAPI-GDI+-Mix version: #include <GDIPlus.au3> #include <winapi.au3> #include <windowsconstants.au3> Opt("GuiOnEventMode", 1) If Not FileExists(@ScriptDir&"\smiley.png") Then InetGet("http://msp5.photobucket.com/albums/y196/dannydude182/smiley-300x300.png", @ScriptDir&"\smiley.png") _GDIPlus_Startup() $image = _GDIPlus_ImageLoadFromFile(@ScriptDir&"\smiley.png") $w = _GDIPlus_ImageGetWidth($image) $h = _GDIPlus_ImageGetHeight($image) $hwnd = GUICreate("Test", $w, $h) Guisetbkcolor(0) ;_WinAPI_SetLayeredWindowAttributes($hwnd,0,255) GUISetState() GUISetOnEvent(-3, "close") $graphics = _GDIPlus_GraphicsCreateFromHWND($hwnd) $bitmap = _GDIPlus_BitmapCreateFromGraphics($w, $h, $graphics) $backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap) _GDIPlus_ImageRotateFlip($image, 6) ; <<<<==== needed function ; ### Draw via WinAPI $hGUI_DC = _WinAPI_GetDC($hwnd) $hGfxDC = _WinAPI_CreateCompatibleDC($hGUI_DC) _WinAPI_SetStretchBltMode($hGUI_DC, $STRETCH_HALFTONE) Local $hDCbufferPtr, $hDCbufferHBmp $hDCbuffer = CreateBmp32($w, $h, $hDCbufferPtr, $hDCbufferHBmp) _WinAPI_BitBlt($hDCbuffer, 0, 0, $w, $h, $image, 0, 0, $SRCCOPY) ; draw image _WinAPI_BitBlt($hGUI_DC, 0, 0, $w, $h, $hDCbuffer, 0, 0, $SRCCOPY) ; show buffer on Canvas While 1 Sleep(20) WEnd Func close() _GDIPlus_ImageDispose($image) _GDIPlus_GraphicsDispose($backbuffer) _GDIPlus_GraphicsDispose($graphics) _GDIPlus_Shutdown() Exit EndFunc ;==>close Func CreateBmp32($iWidth, $iHeight, ByRef $ptr, ByRef $hbmp) $hcdc = _WinAPI_CreateCompatibleDC(0) _WinAPI_SetStretchBltMode($hcdc, $STRETCH_HALFTONE) $tBMI = DllStructCreate($tagBITMAPINFO) DllStructSetData($tBMI, 1, DllStructGetSize($tBMI) - 4) DllStructSetData($tBMI, 2, $iWidth) DllStructSetData($tBMI, 3, -$iHeight) DllStructSetData($tBMI, 4, 1) DllStructSetData($tBMI, 5, 32) $adib = DllCall('gdi32.dll', 'ptr', 'CreateDIBSection', 'hwnd', 0, 'ptr', DllStructGetPtr($tBMI), 'uint', $DIB_RGB_COLORS, 'ptr*', 0, 'ptr', 0, 'uint', 0) $hbmp = $adib[0] $ptr = $adib[4] _WinAPI_SelectObject($hcdc, $hbmp) Return $hcdc EndFunc Any help appreciated! Thanks, Patrick.

OK, I found something strange: When there ist a GUICtrlSetState($eNote, $GUI_FOCUS) before the _GUICtrlEdit_SetSel(.... this effect happens - even with $ES_NOHIDESEL defined. There's something fishy with that focus stuff.

funkey: i tried if with the below combinations (because I have them in a script like that) and again, does not work - only with prior focus set to the edit. BitOR($ES_WANTRETURN, $WS_VSCROLL, $ES_AUTOVSCROLL, $ES_NOHIDESEL, $ES_READONLY) BitOR($ES_WANTRETURN, $WS_VSCROLL, $ES_AUTOVSCROLL, $ES_NOHIDESEL)

Ok, somehow, magically this works now also with v3.3.15.3 🤩 Thanks all. The final Script: #include <GUIConstantsEx.au3> #include <GuiEdit.au3> #include <WindowsConstants.au3> Example() Func Example() Local $hGUI = GUICreate(@AutoItVersion, 400, 300) Local $idEdit = GUICtrlCreateEdit("", 2, 2+20, 394, 268-20) Local $but = GUICtrlCreateButton("ok", 2, 2, 60, 20) GUISetState(@SW_SHOW) _GUICtrlEdit_SetText($idEdit, "Hsdf asdf ksdfhg jsdfghjsdf gdsd") While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $but ControlFocus($hGUI, "", $idEdit) _GUICtrlEdit_SetSel($idEdit, 5, 15) EndSwitch WEnd EndFunc ;==>Example

Tested it right now with a clean install on a Win10 machine. Same result. Works with v3.3.15.1-BETA but not with v3.3.15.3-BETA, so still not solved. Is there anything I could look up what this could cause? EDIT: i also tried to focus the editbox first, but no luck. #Include <GuiEdit.au3> #Include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Dim $gGUI = GUICreate(@AutoItVersion, 640, 200) Dim $but = GUICtrlCreateButton("Select Text", 5, 5, 60, 20) Dim $edit = GUICtrlCreateEdit("", 0, 30, 640, 120) GUISetState() _GUICtrlEdit_AppendText($edit, "df sdfg sdfg fdg s dfg sdfg") Sleep(3000) While 1 $guiM = GUIGetMsg() Switch $guiM Case $GUI_EVENT_CLOSE Exit Case $but GUICtrlSetState($edit, $GUI_FOCUS) _GUICtrlEdit_SetSel($edit, 5, 10) EndSwitch WEnd

Windows 7 and Windows 10. I try a clean install of AutoIt. Maybe the files of stable/beta versions got mixed up. I report the outcome soon.

This works with v3.3.15.1 but unfortunately not with v3.3.15.3

#Include <GuiEdit.au3> #Include <GUIConstantsEx.au3> $gGUI = GUICreate("Test") $but = GUICtrlCreateButton("Select Text", 0, 0, 60, 20) $edit = GUICtrlCreateEdit("Some Text Is Here", 0, 30, 640, 200) GUISetState() While 1 $guiM = GUIGetMsg() Switch $guiM Case $GUI_EVENT_CLOSE Exit Case $but _GUICtrlEdit_SetSel($edit, 5, 6) EndSwitch WEnd This is the example. Works with v3.3.15.1 but not with v3.3.15.2 and v3.3.15.3 Thanks for any help on this.

The function just does not select the text in the edit box. The main purpose of the function. The editbox just blinks very briefly as it would select all text and then deselects it again.

Sadly the UDF function _GUICtrlEdit_SetSel() does not work in Beta v3.3.15.3. It was still working in Beta v3.3.15.1 It seems to be not the UDF, but the compiler produces this bug. Any chance to get a quick fix of this function to work again? Thanks, Patrick.