Another Little modification to menuak.ahk

[Contro]

I would like to assign a light color definable to each launch option...

 

This is the initial code. Produces options in grey. Perhaps is needed a third option to select background color :
1. Button Title
2. Program to run
3. Color for background selection....

  

Code: Autohotkey [Select]

1. #NoEnv
2. IniRead, numRows, launcher.ini, General, numRows, 0
3. IniRead, numCols, launcher.ini, General, numCols, 0
4. if !numRows
5.   InputBox, numRows, , Enter number of rows   , , 200, 120, , , , , 5
6. if !numCols
7.   InputBox, numCols, , Enter number of columns, , 200, 120, , , , , 2
8. IniWrite, %numRows%, launcher.ini, General, numRows
9. IniWrite, %numCols%, launcher.ini, General, numCols
10.  
11. Loop % numRows*numCols
12. {
13.   IniRead, Title%A_Index%, launcher.ini, Titles, Title%A_Index%, %A_Index%
14.   IniRead, Path%A_Index%, launcher.ini, Paths, Path%A_Index%,
15. }
16.  
17. Gui, Add, Button, w150 r1.5 gRun vButt1, %Title1%
18. Gui, Add, Button, w40 hp xp+150 gEdit vEdit1, Edit
19. Edit1:=1
20. Butt1:=1
21.  
22. Loop % numRows*numCols-1
23. {
24.   Index:=A_Index+1
25.   Title:=Title%Index%
26.   ys:=!Mod(Index-1, numRows) ? "ys" : "xp-150 yp+35"
27.   Gui, Add, Button, w150 hp %ys% gRun vButt%Index%, %Title%
28.   Gui, Add, Button, w40 hp xp+150 gEdit vEdit%Index%, Edit
29.   Edit%Index%:=Index
30.   Butt%Index%:=Index
31. }
32.  
33. Gui, Show, , Menu expedientes
34.  
35. Gui 2:+owner
36. Gui 2:Add, Text, right, Button title:
37. Gui 2:Add, Text, right, Program to run:
38. Gui 2:Add, Edit, w300 ys vSelTitle
39. Gui 2:Add, Edit, w300 vSelPath
40. Gui 2:Add, Button, w25 gFileSelect vFileSelect r0.9 xp+300 yp, ....
41. Gui 2:Add, Button, w100 gSelOk r1.5 xp-250 yp+35 default, OK
42.  
43. return
44.  
45. Run:
46.   tpp:= % "Path" %A_GuiControl%
47.   Run % %tpp%
48. return
49.  
50. Edit:
51.   Gui +Disabled
52.   cIndex:=%A_GuiControl%
53.   GuiControl, 2:, SelTitle, % Title%cIndex%
54.   GuiControl, 2:, SelPath, % Path%cIndex%
55.   FileSelect:=cIndex
56.   Gui 2:Show, , Select options for button ?%cIndex%
57. return
58.  
59. FileSelect:
60.  Gui +OwnDialogs
61.   FileSelectFile, Path%cIndex%, 3, %A_ProgramFiles%, Select program to run with button ?%cIndex%, Programs(*.exe;*.lnk;*.bat)
62.   GuiControl, 2:, SelPath, % Path%cIndex%
63. return
64.  
65. GuiClose:
66. ExitApp
67.  
68. 2GuiClose:
69.  Gui 1:-Disabled
70.   Gui 2:Cancel
71. return
72.  
73. SelOk:
74.  Gui 1:-Disabled
75.   Gui 2:Submit
76.   Path%cIndex%:=SelPath
77.   Title%cIndex%:=SelTitle
78.   GuiControl, 1:, Butt%cIndex%, % Title%cIndex%
79.   IniWrite, % Title%cIndex%, launcher.ini, Titles, Title%cIndex%
80.   IniWrite, % Path%cIndex%, launcher.ini, Paths, Path%cIndex%
81. return