home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 January / PCWELT_1_2006.ISO / pcwsoft / autoit-v3-setup.exe / Examples / SampleControls.au3 < prev    next >
Encoding:
Text File  |  2005-01-30  |  3.4 KB  |  121 lines
  1. ; AutoIt 3.0.103 example
  2. ; 17 Jan 2005 - CyberSlug
  3. ; This script shows manual positioning of all controls;
  4. ;   there are much better methods of positioning...
  5. #include <GuiConstants.au3>
  6.  
  7. ; GUI
  8. GuiCreate("Sample GUI", 400, 400)
  9. GuiSetIcon(@SystemDir & "\mspaint.exe", 0)
  10.  
  11.  
  12. ; MENU 
  13. GuiCtrlCreateMenu("Menu&One")
  14. GuiCtrlCreateMenu("Menu&Two")
  15. GuiCtrlCreateMenu("MenuTh&ree")
  16. GuiCtrlCreateMenu("Menu&Four")
  17.  
  18. ; CONTEXT MENU
  19. $contextMenu = GuiCtrlCreateContextMenu()
  20. GuiCtrlCreateMenuItem("Context Menu", $contextMenu)
  21. GuiCtrlCreateMenuItem("", $contextMenu) ;separator
  22. GuiCtrlCreateMenuItem("&Properties", $contextMenu)
  23.  
  24. ; PIC
  25. GuiCtrlCreatePic("logo4.gif",0,0, 163,68)
  26. GuiCtrlCreateLabel("Sample pic", 75, 1, 53, 15)
  27.  
  28. ; AVI
  29. GuiCtrlCreateAvi("sampleAVI.avi",0, 180, 10, 32, 32, $ACS_AUTOPLAY)
  30. GuiCtrlCreateLabel("Sample avi", 170, 50)
  31.  
  32.  
  33. ; TAB
  34. GuiCtrlCreateTab(240, 0, 150, 70)
  35. GuiCtrlCreateTabItem("One")
  36. GuiCtrlCreateLabel("Sample Tab with tabItems", 250, 40)
  37. GuiCtrlCreateTabItem("Two")
  38. GuiCtrlCreateTabItem("Three")
  39. GuiCtrlCreateTabItem("")
  40.  
  41. ; COMBO
  42. GuiCtrlCreatecombo("Sample Combo", 250, 80, 120, 100)
  43.  
  44. ; PROGRESS
  45. GuiCtrlCreateProgress(60, 80, 150, 20)
  46. GuiCtrlSetData(-1, 60)
  47. GuiCtrlCreateLabel("Progress:", 5, 82)
  48.  
  49. ; EDIT
  50. GuiCtrlCreateEdit(@CRLF & "  Sample Edit Control", 10, 110, 150, 70)
  51.  
  52. ; LIST
  53. GuiCtrlCreateList("", 5, 190, 100, 90)
  54. GuiCtrlSetData(-1, "a.Sample|b.List|c.Control|d.Here", "b.List")
  55.  
  56. ; ICON
  57. GuiCtrlCreateIcon("shell32.dll", 1, 175, 120)
  58. GuiCtrlCreateLabel("Icon", 180, 160, 50, 20)
  59.  
  60. ; LIST VIEW
  61. $listView = GuiCtrlCreateListView("Sample|ListView|", 110, 190, 110, 80)
  62. GuiCtrlCreateListViewItem("A|One", $listView)
  63. GuiCtrlCreateListViewItem("B|Two", $listView)
  64. GuiCtrlCreateListViewItem("C|Three", $listView)
  65.  
  66. ; GROUP WITH RADIO BUTTONS
  67. GuiCtrlCreateGroup("Sample Group", 230, 120)
  68. GuiCtrlCreateRadio("Radio One", 250, 140, 80)
  69. GuiCtrlSetState(-1, $GUI_CHECKED)
  70. GuiCtrlCreateRadio("Radio Two", 250, 165, 80)
  71. GUICtrlCreateGroup ("",-99,-99,1,1)  ;close group
  72.  
  73. ; UPDOWN
  74. GuiCtrlCreateLabel("UpDown", 350, 115)
  75. GuiCtrlCreateInput("42", 350, 130, 40, 20)
  76. GuiCtrlCreateUpDown(-1)
  77.  
  78. ; LABEL
  79. GuiCtrlCreateLabel("Green" & @CRLF & "Label", 350, 165, 40, 40)
  80. GuiCtrlSetBkColor(-1, 0x00FF00)
  81.  
  82. ; SLIDER
  83. GuiCtrlCreateLabel("Slider:", 235, 215)
  84. GuiCtrlCreateSlider(270, 210, 120, 30)
  85. GuiCtrlSetData(-1, 30)
  86.  
  87. ; INPUT
  88. GuiCtrlCreateInput("Sample Input Box", 235, 255, 130, 20)
  89.  
  90. ; DATE
  91. GuiCtrlCreateDate("", 5, 280, 200, 20)
  92. GuiCtrlCreateLabel("(Date control expands into a calendar)", 10, 305, 200, 20)
  93.  
  94. ; BUTTON
  95. GuiCtrlCreateButton("Sample Button", 10, 330, 100, 30)
  96.  
  97. ; CHECKBOX
  98. GuiCtrlCreateCheckbox("Checkbox", 130, 335, 80, 20)
  99. GuiCtrlSetState(-1, $GUI_CHECKED)
  100.  
  101. ; TREEVIEW ONE
  102. $treeOne = GuiCtrlCreateTreeView(210, 290, 80, 80)
  103. $treeItem = GuiCtrlCreateTreeViewItem("TreeView", $treeOne)
  104. GuiCtrlCreateTreeViewItem("Item1", $treeItem)
  105. GuiCtrlCreateTreeViewItem("Item2", $treeItem)
  106. GuiCtrlCreateTreeViewItem("Foo", -1)
  107. GuiCtrlSetState($treeItem, $GUI_EXPAND)
  108.  
  109. ; TREEVIEW TWO
  110. $treeTwo = GuiCtrlCreateTreeView(295, 290, 103, 80, $TVS_CHECKBOXES)
  111. GuiCtrlCreateTreeViewItem("TreeView", $treeTwo)
  112. GuiCtrlCreateTreeViewItem("With", $treeTwo)
  113. GuiCtrlCreateTreeViewItem("tvs_checkboxes", $treeTwo)
  114. GuiCtrlSetState(-1, $GUI_CHECKED)
  115. GuiCtrlCreateTreeViewItem("Style", $treeTwo)
  116.  
  117.  
  118. ; GUI MESSAGE LOOP
  119. GuiSetState()
  120. While GuiGetMsg() <> $GUI_EVENT_CLOSE
  121. WEnd