i have checkboxes and each checkbox that checked, i put in array.
now, im stuck on how to loop the checked array and store in in one variable. what i can do now, is only write the result into a text file.
below is the code:
#include <GUIConstantsEx.au3> ;~ #include <MsgBoxConstants.au3> #include <ButtonConstants.au3> #include <Array.au3> Global $Count = 3 Global $CheckBoxP[$Count] Global $step[$Count] global $array1 Global $ExitResult $hGUI = GUICreate("Summary Steps", 500, 400) GUISetFont(12, 400, "Tahoma") GUICtrlCreateLabel( "Please Select the Summary Steps for Script Check", 70, 20) GUISetFont(10, 400, "Tahoma") Global $array_Pstep = ["fix2","fix1","fix3"] global $step = ["2","3","4"] $Spacing = 50 For $i = 0 To UBound($array_Pstep) - 1 $CheckBoxP[$i] = GUICtrlCreateCheckbox($array_Pstep[$i], 80, $Spacing + (20 * $i), 65, 17) Next $submit = GUICtrlCreateButton("Submit",180, 280, 80, 30) $exit = GUICtrlCreateButton("Exit",180, 320, 80, 30) GUISetState() While 1 $Msg = GUIGetMsg() Select case $Msg=$submit For $i = 0 To $Count - 1 If GUICtrlRead($CheckBoxP[$i]) = $GUI_CHECKED Then _ArrayAdd($array1, $step[$i]) EndIf Next Global $logfilerray = @WorkingDir & "\checkedlist.txt" FileDelete ($logfilerray) Global $readlogfile = FileOpen($logfilerray,1) for $a = 1 to UBound($array1) - 1 ;~ $var=$array1[$a] FileWriteLine($readlogfile,$array1[$a]) Next FileClose($readlogfile) Exit case $Msg=$exit $ExitResult = MsgBox(1,"Summary Step", "Continue to Exit ?") if $ExitResult = 1 Then ;ok Exit EndIf Exit EndSelect WEnd
How do you perform a nested loop function with a multidimensional array from 2 lists.
for i in list1
(open file) extract variable
while open for i in list 2
(open file2) extract variable
var1 + var2 = (search term)
The list sizes will more than likely consist of different lengths.
What is the best approach to accomplishing this method?
I am working on a function that I am just getting lost on. The goal is a multiple nested loop.
Here are the steps:
Contents of file1.txt::
[topic] var1=Name var2=OtherName var3=SomeotheName Contents of file2.txt::
[subTopic] top=sub1 top2=sub2 top3=sub3 The Shell I am working from::
#include <file.au3> $file = "c:\yourfile.txt" FileOpen($file, 0) For $i = 1 to _FileCountLines($file) $line = FileReadLine($file, $i) msgbox(0,'','the line ' & $i & ' is ' & $line) Next FileClose($file) Understanding however that the "msgbox" needs to then become a variable. in example the following::
$file = "c:\yourfile.txt" FileOpen($file, 0) While true( prog.exe is running && "WinName" is open) do For $i = 1 to _FileCountLines($file) $line = FileReadLine($file, $i) ;Open File to log "current location of file 1" FileWriteLine ("filename", $i & ' is ' & $line) var = $line Next $file2 = "c:\yourfile.txt" FileOpen($file, 0) For $i = 1 to _FileCountLines($file) $line = FileReadLine($file, $i) ; OpenFile to log "Current location of file 2" FileWriteLine ("filename", $i & ' is ' & $line) Next FileClose($file2) FileClose($file) The goal in written form is the following ::
While in "OpenWindow"
read from file 1 starting at line 1 until end of file.
file 1 is a list of names to be searched.
With $line selected, add this element to the element in file 2.
The search of a variables in list 1 and list 2 differ on the amount of posts that day. (This is not a web based platform, it is a game) I need to search 2 names and take a screenshot of the out put. The sizes of the names list depend on the activity of names at the time of search.
This loop continues until all the names from both lists have been searched. Mostly in the format of::
Item + Vendor ( Capture screen, scroll) -- Not sure how to detect if I need to scroll)
Thank you for your help and support!
Is there a way to loop back to the beginning and keep the already entered data in the GUI Input boxes? I can GUIDelete and start a new GUI but all the typed data has to be redone. Here is a sample.
#Include <GuiConstants.au3> Dim $msg,$okbutton,$cancelbutton,$objOU,$intAccValue,$strGroup1,$strGroup2 Dim $strFirstName,$strLastName,$strUserName,$strUserName2,$strPassword,$strDescription,$strContainer Dim $Combo,$Duration Do $Form1 = GuiCreate("", 300, 300) GUISetBkColor(0xA6CAF0) GuiCtrlCreateLabel("First Name:", 50, 10) $strFirstName = GuiCtrlCreateInput("", 50, 25, 200, 20) GUICtrlSetState ( $okbutton, $GUI_FOCUS ) GuiSetState() $okbutton = GUICtrlCreateButton ("OK",75,240,50,20) $cancelbutton = GUICtrlCreateButton ("Cancel",175,240,50,20) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton Exit Case $msg = $okbutton $strFirstName = GUICtrlRead($strFirstName) ExitLoop EndSelect Wend $len = StringLen($strFirstName) If $len > "20" then MsgBox(0, "ERROR Name to long", $strFirstName & " can't be over 20 characters." & @CRLF & "Total: " & $len) ;Exit GUIDelete($Form1) EndIf Until $len < "20" MsgBox(0, "Done", "")