1. Trang chủ
  2. » Công Nghệ Thông Tin

AutoIT Help part 56 doc

5 165 0
Tài liệu đã được kiểm tra trùng lặp

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 5
Dung lượng 70,92 KB

Các công cụ chuyển đổi và chỉnh sửa cho tài liệu này

Nội dung

MsgBox16, "Error", "Error while retrieving infos about item" Else MsgBox64, "TreeView Demo", "Current item selected is: " & $text EndIf EndIf Case $msg = $statebutton $item = GUICtr

Trang 1

@LF & "OS:" & @TAB & @OSVersion & @LF & "SP:" & @TAB &

@OSServicePack, 120, 30, 200, 80)

GUICtrlSetState(-1, $GUI_HIDE) ; Hides the "compinfo"-text during

initialization

GUICtrlCreateLabel("", 0, 170, 350, 2, $SS_SUNKEN)

$togglebutton = GUICtrlCreateButton("&Toggle", 35, 185, 70, 20)

$infobutton = GUICtrlCreateButton("&Info", 105, 185, 70, 20)

$statebutton = GUICtrlCreateButton("Col./Exp.", 175, 185, 70, 20)

$cancelbutton = GUICtrlCreateButton("&Cancel", 245, 185, 70, 20)

GUICtrlSetState($generalitem, BitOR($GUI_EXPAND,

$GUI_DEFBUTTON)) ; Expand the "General"-item and paint in bold

GUICtrlSetState($displayitem, BitOR($GUI_EXPAND,

$GUI_DEFBUTTON)) ; Expand the "Display"-item and paint in bold

GUISetState()

While 1

$msg = GUIGetMsg()

Select

Case $msg = $cancelbutton Or $msg = $GUI_EVENT_CLOSE

ExitLoop

Case $msg = $togglebutton ; Toggle the bold painting

If BitAND(GUICtrlRead($generalitem), $GUI_DEFBUTTON) Then GUICtrlSetState($generalitem, 0)

GUICtrlSetState($displayitem, 0)

Else

GUICtrlSetState($generalitem, $GUI_DEFBUTTON)

GUICtrlSetState($displayitem, $GUI_DEFBUTTON)

EndIf

Case $msg = $infobutton

$item = GUICtrlRead($treeview) ; Get the controlID of the current selected treeview item

If $item = 0 Then

MsgBox(64, "TreeView Demo", "No item currently selected") Else

$text = GUICtrlRead($item, 1) ; Get the text of the treeview item

If $text == "" Then

Trang 2

MsgBox(16, "Error", "Error while retrieving infos about item") Else

MsgBox(64, "TreeView Demo", "Current item selected is: " &

$text)

EndIf

EndIf

Case $msg = $statebutton

$item = GUICtrlRead($treeview)

If $item > 0 Then

$hItem = GUICtrlGetHandle($item)

DllCall("user32.dll", "int", "SendMessage", "hwnd",

GUICtrlGetHandle($treeview), "int", $TVM_EXPAND, "int", $TVE_TOGGLE,

"hwnd", $hItem)

EndIf

; The following items will hide the other labels (1st and 2nd parameter) and then show the 'own' labels (3rd and 4th parameter)

Case $msg = $generalitem

GUIChangeItems($aboutlabel, $compinfo, $startlabel, $startlabel)

Case $msg = $aboutitem

GUICtrlSetState($compinfo, $GUI_HIDE)

GUIChangeItems($startlabel, $startlabel, $aboutlabel, $aboutlabel)

Case $msg = $compitem

GUIChangeItems($startlabel, $aboutlabel, $compinfo, $compinfo) EndSelect

WEnd

GUIDelete()

EndFunc ;==>Example

Func GUIChangeItems($hidestart, $hideend, $showstart, $showend)

Local $idx

For $idx = $hidestart To $hideend

GUICtrlSetState($idx, $GUI_HIDE)

Next

For $idx = $showstart To $showend

Trang 3

GUICtrlSetState($idx, $GUI_SHOW)

Next

EndFunc ;==>GUIChangeItems

Function Reference

GUICtrlCreateUpdown

tạo một UpDown control cho GUI

GUICtrlCreateUpdown ( inputcontrolID [,style] )

Parameters

inputcontrolID controlID của input muốn updown add vào

style

kiểu, xem GUI Control Styles Appendix

default (-1) : $UDS_ALIGNRIGHT

forced style : $UDS_SETBUDDYINT and $UDS_ALIGNRIGHT

if no align defined

Return Value

Success: trả lại ControlID

Failure: Returns 0

Remarks

khai báo thư viện #include <UpDownConstants.au3> để dùng các hằng của

updown

Trang 4

giá trị to nhất và nhỏ nhất đc đặt bởi GUICtrlSetLimit

mặc định của window: giá trị của input sẽ tăng lên 1 khi click vào nút lên mặc định kích thuwocs của updown control ~ kích thước của input

Related

GUICtrlCreateInput, GUICtrlSetData, GUICtrlSetLimit

Example

#include <GUIConstantsEx.au3>

#include <WindowsConstants.au3>

Opt('MustDeclareVars', 1)

Example()

Func Example()

Local $title, $input, $updown, $msg

$title = "My GUI UpDown"

GUICreate($title, -1, -1, -1, -1, $WS_SIZEBOX)

$input = GUICtrlCreateInput("2", 10, 10, 50, 20)

$updown = GUICtrlCreateUpdown($input)

; Attempt to resize input control

GUICtrlSetPos($input, 10, 10, 100, 40)

GUISetState()

; Run the GUI until the dialog is closed

While 1

$msg = GUIGetMsg()

If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Trang 5

WEnd

MsgBox(0, "Updown", GUICtrlRead($input))

EndFunc ;==>Example

Function Reference

GUICtrlDelete

xóa một control

GUICtrlDelete ( controlID )

Parameters

controlID controlid

Return Value

Success: Returns 1

Failure: Returns 0

Remarks

!

Related

GUICreate, GUICtrlCreate , GUICtrlCreateContextMenu

Example

Ngày đăng: 02/07/2014, 17:21

TÀI LIỆU CÙNG NGƯỜI DÙNG

TÀI LIỆU LIÊN QUAN