CODEWITHSUNDEEP
autohotkey
mik_ste
mik_ste

Reputation: 47

Setting a control name with concatenated text+variable for ControlSetText usage

TL;DR I created a new variable (destinationControl) by concatenating a string, a separate string variable, and then another string. I tried using the variable destinationControl with ControlSetText, but its not working. Can anyone tell me why?

Long Explanation: I'm attempting to send some data from an excel spreadsheet into another application using AHK ControlSetText. My issue comes in when I need the script to detect which one of two possible programs is the active one (the detection part is working) and then based on the name of the program, set the destination control name is slightly different. 

prog_A_segment := "abc"
prog_B_segment := "def"

;determine which program is open
IfInString, OpenProgram, ProgA
{
    ctrlSegment := prog_A_segment
}
else
    ctrlSegment := prog_B_segment

;set control variable
destinationControl := "WindowsForms10.EDIT.app.0." . ctrlSegment . "_r13_ad11"

;activate program
WinActivate, % OpenProgram
WinWaitActive, % OpenProgram,,3

;open vendor form
Sleep 300
Send ^o
Sleep 200
Send Vendors
sleep 200
Send {ENTER}
Sleep 2000

;This does not work:
;pass information to vendor form control
ControlSetText, %destinationControl%, %myNumber%, %OpenProgram%

I know I could just slightly more manually set them based on the open program but i have about 25 controls in total and the only difference is that center segment so I thought this would be a little more elegant and cleaner.

When I use the above method it doesn't appear AHK can find the control. I'm assuming it has something to do with how I combined a string and a variable. Is there some way to make this approach work without doing this instead:

IfInString, OpenProgram, ProgA
{
    destinationControl1 := "WindowsForms10.EDIT.app.0.abc_r13_ad11"
    ....
    destinationControl25 := "WindowsForms10.EDIT.app.0.abc_d52_ad11"
}
else
    destinationControl1 := "WindowsForms10.EDIT.app.0.def_r13_ad11"
    ....
    destinationControl25 := "WindowsForms10.EDIT.app.0.def_d52_ad11"

Upvotes: 0

Views: 365

Answers (1)

johnlee
johnlee

Reputation: 392

I agree with Josh Brobst that your first piece of code would work with the missing quote added.

Well, here's what you want to try anyways:

ctrlSegment := InStr(OpenProgram, ProgA) ? "abc" : "def"

Loop Parse, % "r13, ... ,d52", CSV
    ControlSetText % "WindowsForms10.EDIT.app.0." ctrlSegment "_" A_LoopField "_ad11"
        , % myNumber, % OpenProgram

Upvotes: 1

Related Questions