raca Posted March 16, 2007 Share Posted March 16, 2007 Hi! I have this code: Func RemoveDesktopSite() Do Sleep(500) $f = ControlCommand("Program Manager","","Internet Explorer_Server2","IsVisible","") Until $f==1 BlockInput(1) Send("#d") $mpos = MouseGetPos() MouseMove(@DesktopWidth-5,5) Sleep(500) ;~ MsgBox(0,"Humm","humm",1) $a = ControlGetPos ( "Program Manager","","DeskMover1" ) MsgBox(0,"Humm",$a[0] & " " & $a[1] & " " & $a[2] & " " & $a[3],1) If $a[0]<>-1 And $a[1]<>-1 Then MouseClick("left") Else MsgBox(48,"NoCica","Erro ao fechar janela de Active Desktop." & @CRLF & "Não sei porquê :D",2) EndIf MouseMove($mpos[0], $mpos[1]) Send("#d") BlockInput(0) EndFunc RemoveDesktopSite() If the first msgbox is in comment the program just terminates without reason. I think this is a bug. I'm using autoit v3.2.2.0 How can workaround this? Cheers Link to comment Share on other sites More sharing options...
MrCreatoR Posted March 16, 2007 Share Posted March 16, 2007 If the first msgbox is in comment the program just terminates without reasonAnd what error is shown? i run it and everything is ok (i am has remove some lines ). Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
raca Posted March 16, 2007 Author Share Posted March 16, 2007 (edited) And what error is shown? i run it and everything is ok (i am has remove some lines ). The program just terminates without any message on the line: $a = ControlGetPos ( "Program Manager","","DeskMover1" ) :\ Adding some information: The OS is Microsoft Windows XP Professional 5.1.2600 Service Pack 2 Compilação 2600 and i'm a simple user on the system (not a admin). I ruuned the code with SciTE. Edited March 16, 2007 by raca Link to comment Share on other sites More sharing options...
raca Posted March 16, 2007 Author Share Posted March 16, 2007 With the controlgetpos() after the send("#d") controlgetpos returns a error, @error=1 Link to comment Share on other sites More sharing options...
xcal Posted March 16, 2007 Share Posted March 16, 2007 (edited) Might want to check if $a is an array before doing the next part, like If IsArray($a) Then...etc. Also, try just running it alone for a test, out of your script, like... $a = ControlGetPos("Program Manager","","DeskMover1") If IsArray($a) Then For $i = 0 to Ubound($a) - 1 MsgBox(0, '', $a[$i]) Next Else MsgBox(0, '', 'not an array') EndIf Edited March 16, 2007 by xcal How To Ask Questions The Smart Way Link to comment Share on other sites More sharing options...
raca Posted March 16, 2007 Author Share Posted March 16, 2007 Tks, but i just want to get the info from ControlGetPos("Program Manager","","DeskMover1") that don't work if i use the the command send("#d") i don't see a good reason for that. I wanna trying to find a workaround, but no luck until now. 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