Advertisement
Guest User

Untitled

a guest
Dec 11th, 2019
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.65 KB | None | 0 0
  1. #include <ButtonConstants.au3>
  2. #include <ComboConstants.au3>
  3. #include <EditConstants.au3>
  4. #include <GUIConstantsEx.au3>
  5. #include <StaticConstants.au3>
  6. #include <WindowsConstants.au3>
  7. #Region ### START Koda GUI section ### Form=
  8. $Form1 = GUICreate("PROSIT+ScriptGUI - Complete Sequence", 501, 601, 737, 173)
  9. $testTypeComboBox = GUICtrlCreateCombo("", 24, 40, 177, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
  10. GUICtrlSetData(-1, "SWDL test|Complete sequence test|Other test", "SWDL test")
  11. GUICtrlSetBkColor(-1, 0xF4F7FC)
  12. $comboBoxLabel = GUICtrlCreateLabel("Type of Test:", 24, 16, 67, 17)
  13. $prodIDLabel = GUICtrlCreateGroup("Product ID", 296, 16, 185, 105)
  14. $prodSeriesInput1 = GUICtrlCreateInput("", 392, 48, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_UPPERCASE))
  15. GUICtrlSetLimit(-1, 5)
  16. GUICtrlSetCursor (-1, 5)
  17. $prodNumInput1 = GUICtrlCreateInput("", 392, 80, 81, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))
  18. GUICtrlSetLimit(-1, 6)
  19. GUICtrlSetCursor (-1, 5)
  20. $prodSeriesLabel1 = GUICtrlCreateLabel("Product Series:", 304, 56, 76, 17)
  21. $prodNumLabel1 = GUICtrlCreateLabel("Product Number:", 304, 88, 84, 17)
  22. GUICtrlCreateGroup("", -99, -99, 1, 1)
  23. $closebutton = GUICtrlCreateButton("Close", 408, 560, 75, 25)
  24. $startbutton = GUICtrlCreateButton("Start Script", 232, 560, 163, 25)
  25. GUICtrlSetBkColor(-1, 0xFFFFFF)
  26. $Label8 = GUICtrlCreateLabel("Number of iterations:", 232, 536, 101, 17)
  27. $iterations = GUICtrlCreateInput("", 336, 528, 57, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))
  28. GUICtrlSetCursor (-1, 5)
  29. $helpbutton = GUICtrlCreateButton("Help", 8, 560, 43, 25)
  30. $Checkbox3 = GUICtrlCreateCheckbox("Specific operation mode", 232, 504, 137, 17)
  31. $Checkbox4 = GUICtrlCreateCheckbox("Product specific mode", 232, 480, 129, 17)
  32. $Icon1 = GUICtrlCreateIcon("C:\Users\a295693\Desktop\info_3525.ico", -1, 376, 480, 16, 16)
  33. GUICtrlSetCursor (-1, 4)
  34. $Icon3 = GUICtrlCreateIcon("C:\Users\a295693\Desktop\info_3525.ico", -1, 376, 504, 16, 16)
  35. GUICtrlSetCursor (-1, 4)
  36. $Group1 = GUICtrlCreateGroup("Select sequence", 24, 88, 257, 113)
  37. $sequenceNameLabel1 = GUICtrlCreateLabel("Sequence name 1:", 32, 120, 94, 17)
  38. $squenceNameInput1 = GUICtrlCreateInput("", 136, 112, 137, 21)
  39. GUICtrlSetCursor (-1, 5)
  40. $alternateSequenceCheckBox = GUICtrlCreateCheckbox("Alternate sequences", 56, 144, 145, 17)
  41. $squenceNameInput2 = GUICtrlCreateInput("", 136, 168, 137, 21)
  42. GUICtrlSetCursor (-1, 5)
  43. $sequenceLabel2 = GUICtrlCreateLabel("Sequence name 2:", 32, 176, 94, 17)
  44. GUICtrlCreateGroup("", -99, -99, 1, 1)
  45. GUISetState(@SW_SHOW)
  46. #EndRegion ### END Koda GUI section ###
  47.  
  48. While 1
  49. $nMsg = GUIGetMsg()
  50. Switch $nMsg
  51. Case $GUI_EVENT_CLOSE
  52. Exit
  53.  
  54. Case $Icon1
  55. Case $Icon3
  56. EndSwitch
  57. WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement