b8bboi

This is great. Thanks for sharing.

I'm not exactly following you. You're trying to make a tool that works exactly like the Fill tool in Photoshop right? Then all pixels must be "connected" to each other either directly or through other pixels of the same shade. The primary logic is still the same as your recursive function. The only difference is you use an array to hold the coordinates of the pixels instead of local variables within a recursive function. From a programming stand point, every recursive function can be simulated using a stack. (That's how they're actually implemented in the first place.)

This is not fast but it'll work. You can use an array. Start with one pixel. Then keep adding adjacent pixels to the array provided that they are not already in the array itself (this checking part makes it slow). Do it until you can't add adjacent pixels any more due to all of them being already in the array. To make it faster, you can use a 2 dimensional array the size of the screen to mark whether a pixel has already been added or not.

Just tried the second one. Worked fine for me.

Here's a sample. #include <GUIConstants.au3> $WS_EX_NOACTIVATE = 0x08000000 Opt("GUIOnEventMode", 1) ; Change to OnEvent mode $x = GUICreate("Test OSK", 100, 100, 100, 100, $WS_POPUP, BITOR($WS_EX_NOACTIVATE, $WS_EX_TOPMOST)) $Button_2 = GUICtrlCreateButton ( "Button Test", 0, -1) GUICtrlSetOnEvent ($Button_2, "OSButtonPressed") GUISetState(@SW_SHOWNOACTIVATE) WinSetOnTop($x, "", 1) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect Wend Func OSButtonPressed() Send("A") EndFunc

I've found the solution. $WS_EX_NOACTIVATE.

In a ListView, AutoIt seems to only display icons at 16x16 max, no matter what the size of the actual icon is. I've attached a screenshot to illustrate. (The actual size is 32x32). Is there a way to make it bigger? Thanks.

The problem might be with the font weight. Try explicitly setting it to 600 in both _GetTextLabelWidth and GuiCtrlSetFont.

I wrote this UDF myself. It might help. Func _GetTextLabelWidth($s_WinText, $s_TextFont, $i_FontSize, $i_FontWeight = -1) Local Const $DEFAULT_CHARSET = 0 ; ANSI character set Local Const $OUT_CHARACTER_PRECIS = 2 Local Const $CLIP_DEFAULT_PRECIS = 0 Local Const $PROOF_QUALITY = 2 Local Const $FIXED_PITCH = 1 Local Const $RGN_XOR = 3 Local Const $LOGPIXELSY = 90 $h_WinTitle = "Get Label Width" If $i_FontWeight = "" Or $i_FontWeight = -1 Then $i_FontWeight = 600 ; default Font weight Local $h_GUI = GUICreate($h_WinTitle, 10, 10, -100, -100, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW) Local $hDC = DllCall("user32.dll", "int", "GetDC", "hwnd", $h_GUI) Local $intDeviceCap = DllCall("gdi32.dll", "long", "GetDeviceCaps", "int", $hDC[0], "long", $LOGPIXELSY) $intDeviceCap = $intDeviceCap[0] Local $intFontHeight = DllCall("kernel32.dll", "long", "MulDiv", "long", $i_FontSize, "long", $intDeviceCap, "long", 72) $intFontHeight = -$intFontHeight[0] Local $hMyFont = DllCall("gdi32.dll", "hwnd", "CreateFont", "int", $intFontHeight, _ "int", 0, "int", 0, "int", 0, "int", $i_FontWeight, "int", 0, _ "int", 0, "int", 0, "int", $DEFAULT_CHARSET, _ "int", $OUT_CHARACTER_PRECIS, "int", $CLIP_DEFAULT_PRECIS, _ "int", $PROOF_QUALITY, "int", $FIXED_PITCH, "str", $s_TextFont) DllCall("gdi32.dll", "hwnd", "SelectObject", "int", $hDC[0], "hwnd", $hMyFont[0]) Local $res = DllStructCreate("int;int") Local $ret = DllCall("gdi32.dll", "int", "GetTextExtentPoint32", "int", $hDC[0], "str", $s_WinText, "long", StringLen($s_WinText), "ptr", DllStructGetPtr($res)) Local $intLabelWidth = DllStructGetData($res,1) GUIDelete($h_GUI) Return $intLabelWidth EndFunc

Zedna, thanks for the tips but GetFocus/SetFocus, et al won't work because by the time my OSK button is clicked, the focus already shifts over to Autoit. So, if I do a GetFocus now, it would just return a handle to my Autoit GUI. I hope you can see the dilemma.

As the title said, I'm trying to create an on-screen keyboard for my touchscreen software. The easy part is to catch button click events and send keys to other apps. The hard part is how I can prevent the autoit buttons from grabbing the cursor focus away from the other app when they're clicked on. If you open Windows' osk.exe, you'll see exactly what I mean. Thanks for any input.

You can hide the "spotlight" and do a mouse click on the area underneath. Try this. Double-click doesn't work. You'll have to modify the code to make it work. #include <GUIConstants.au3> Opt("GUICoordMode",1) Dim $x Dim $y Dim $WinInfo Dim $MouseInfo Global $size = 200 $MouseInfo = MouseGetPos() Global $Form1 = GUICreate("AForm1", $size, $size, $MouseInfo[0]-59, $MouseInfo[1]-50, $WS_POPUP, 0) Global $label = GUICtrlCreateLabel("", 0, 0, $size, $size) WinSetTrans($Form1,"",150) GUISetState() GuiRound($Form1,0,0,$size,$size);<----- thanks gaFrost While 1 $msg = GUIGetMsg(1) Select Case $msg[0] = $GUI_EVENT_MOUSEMOVE $WinInfo = WinGetPos($Form1) $MouseInfo = MouseGetPos() $x = ($WinInfo[2]/2) $y = ($WinInfo[3]/2) WinMove($Form1,"",$MouseInfo[0]-$x+1,$MouseInfo[1]-$y+1) Case $msg[0] = $label MouseClicked() Case $msg[0] = $GUI_EVENT_CLOSE Exit EndSelect WEnd Func MouseClicked() Local $mousepos = MouseGetPos() GUISetState(@SW_HIDE, $Form1) Sleep(100) MouseClick("", $mousepos[0], $mousepos[1], 1, 1) GUISetState(@SW_SHOW, $Form1) EndFunc ;=============================================================================== ; ; Function Name: GuiRoundHole() ; Description: Rounds the corners of a window ; Parameter(s): $h_win ; $i_x1 ; $i_y1 ; $i_x3 ; $i_y3 ; Requirement(s): AutoIt3 ; Return Value(s): ; Author(s): gaFrost ; ;=============================================================================== Func GuiRound($h_win, $i_x1, $i_y1, $i_x3, $i_y3) Local $halfx = Int(($i_x3 - $i_x1) / 2) Local $halfy = Int(($i_y3 - $i_y1) / 2) Local $holesize = 3 Local $outer_rgn = DllCall("gdi32.dll", "long", "CreateEllipticRgn", "long", $i_x1, "long", $i_y1, "long", $i_x3 , "long", $i_y3) If $outer_rgn[0] Then Local $ret3 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $outer_rgn[0], "int", 1) If $ret3[0] Then Return 1 Else Return 0 EndIf Else Return 0 EndIf EndFunc ;==>_GuiRoundHole

Here you go. Just change the size, location, etc. to your liking. Also, add some error checking just in case. #include <GUIConstants.au3> Opt("GUICoordMode",1) Dim $x Dim $y Dim $WinInfo Dim $MouseInfo Global $size = 200 $MouseInfo = MouseGetPos() $Form1 = GUICreate("AForm1", $size, $size, $MouseInfo[0]-59, $MouseInfo[1]-50, $WS_POPUP, 0) WinSetTrans($Form1,"",150) GUISetState() GuiRoundHole($Form1,0,0,$size,$size);<----- thanks gaFrost While 1 $msg = GUIGetMsg(1) Select Case $msg[0] = $GUI_EVENT_MOUSEMOVE $WinInfo = WinGetPos($Form1) $MouseInfo = MouseGetPos() $x = ($WinInfo[2]/2) $y = ($WinInfo[3]/2) WinMove($Form1,"",$MouseInfo[0]-$x+1,$MouseInfo[1]-$y+1) Case $msg[0] = $GUI_EVENT_CLOSE Exit EndSelect WEnd ;=============================================================================== ; ; Function Name: GuiRoundHole() ; Description: Rounds the corners of a window ; Parameter(s): $h_win ; $i_x1 ; $i_y1 ; $i_x3 ; $i_y3 ; Requirement(s): AutoIt3 ; Return Value(s): ; Author(s): gaFrost ; ;=============================================================================== Func GuiRoundHole($h_win, $i_x1, $i_y1, $i_x3, $i_y3) Local $halfx = Int(($i_x3 - $i_x1) / 2) Local $halfy = Int(($i_y3 - $i_y1) / 2) Local $holesize = 3 Local $outer_rgn = DllCall("gdi32.dll", "long", "CreateEllipticRgn", "long", $i_x1, "long", $i_y1, "long", $i_x3 , "long", $i_y3) Local $inner_rgn = DllCall("gdi32.dll", "long", "CreateEllipticRgn", "long", $i_x1+$halfx-$holesize, "long", $i_y1+$halfy-$holesize, "long", $i_x1+$halfx+$holesize, "long", $i_y1+$halfy+$holesize) If $outer_rgn[0] and $inner_rgn[0] Then Local $combined_rgn = DllCall("gdi32.dll", "long", "CreateEllipticRgn", "long", 0, "long", 0, "long", 0, "long", 0) DllCall("gdi32.dll", "long", "CombineRgn", "long", $combined_rgn[0], "long", $outer_rgn[0], "long", $inner_rgn[0], "int", 4) Local $ret3 = DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $h_win, "long", $combined_rgn[0], "int", 1) If $ret3[0] Then Return 1 Else Return 0 EndIf Else Return 0 EndIf EndFunc ;==>_GuiRoundHole

StdoutRead might work.

Not sure if this is what you're looking for but you can set the remote desktop GUI as a child of one of your GUIs and do whatever you want with it.