baamr Posted August 23, 2012 Share Posted August 23, 2012 Hi Everyone, I`m a newbie to scripting, but i try to find a simple solution for a simple question. I want a inputbox to exit on a variable string followed by a CR. Not by cliking on exit. Please give some hints.I have search but could not find it so far. Thanks for a very interesting proggy and forum! cheers, baamr Link to comment Share on other sites More sharing options...
jdelaney Posted August 23, 2012 Share Posted August 23, 2012 (edited) throwing you a fish this time: expandcollapse popup#include <GuiEdit.au3> #include <WinAPI.au3> ; used for Lo/Hi word #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> Global $hEdit _Example1() Func _Example1() Local $hGUI ; Create GUI $hGUI = GUICreate("Edit Create", 400, 300) $hEdit = GUICtrlCreateEdit("", 2, 2, 394, 150) $hEdit2 = GUICtrlCreateEdit("", 2, 155, 394, 150) GUISetState() $hCurrentEditText = "" ; Loop until user exits While 1 $msg = GUIGetMsg() $hEditString = GuiCtrlRead ( $hEdit ) If $hCurrentEditText <> $hEditString Then If StringRegExp ( $hEditString, "[rn]+", 0 ) Then $hEditString = StringRegExpReplace ( $hEditString, "[rn]+","" ) GUICtrlSetData ( $hEdit, $hEditString ) ControlFocus ( $hGUI, "", $hEdit2 ) EndIf $hCurrentEditText = $hEditString ConsoleWrite ( $hEditString ) EndIf Switch $msg Case $GUI_EVENT_CLOSE Exit Case $hEdit Case $hEdit2 Case $hGUI EndSwitch WEnd EndFunc ;==>_Example1 Edited August 23, 2012 by jdelaney IEbyXPATH-Grab IE DOM objects by XPATH IEscriptRecord-Makings of an IE script recorder ExcelFromXML-Create Excel docs without excel installed GetAllWindowControls-Output all control data on a given window. Link to comment Share on other sites More sharing options...
PhoenixXL Posted August 24, 2012 Share Posted August 24, 2012 (edited) I want a inputbox to exit on a variable string followed by a CR.U could check if the string ends with the CR before calling the InputBox and then exit if required Example $VarString='Hie There' _ExitOnCR($VarString) ConsoleWrite($VarString&@CR) $VarString='Hello'&@CRLF ;Note that this will get typed Since its having @LF as the Last Char _ExitOnCR($VarString) ConsoleWrite($VarString&@CR) $VarString='Nice Meeting You'&@CR; This will make the script End with the Exit Code -1 and the String will not be printed _ExitOnCR($VarString) ConsoleWrite($VarString&@CR) Func _ExitOnCR($sString) If StringRight($sString,1)=Chr(13) Then Exit -1 EndFunc Edited August 24, 2012 by PhoenixXL My code: PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners. MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression. Link to comment Share on other sites More sharing options...
Moderators Melba23 Posted August 24, 2012 Moderators Share Posted August 24, 2012 baamr, Welcome to the AutoIt forum. I use an Accelerator key to do this: #include <GUIConstantsEx.au3> $hGUI = GUICreate("Test", 500, 500) $cInput = GUICtrlCreateInput("", 10, 10, 200, 20) $cDummy = GUICtrlCreateDummy() GUISetState() Local $aAccelKeys[1][2] = [["{ENTER}", $cDummy]] GUISetAccelerators($aAccelKeys) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cDummy MsgBox(0, "Input Content", GUICtrlRead($cInput)) GUICtrlSetData($cInput, "") EndSwitch WEnd Please ask if you have any questions - but try the Help file first. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area 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