Tạo Input (Đối tượng cho phép nhập dữ liệu vào)
GUICtrlCreateInput ( "text", left, top [, width [, height [, style = -1 [, exStyle = -1]]]] )
-> Ví dụ: $Input1 = GUICtrlCreateInput("1", 200, 16, 137, 21)
Đọc dữ liệu từ Input
GUICtrlRead ( controlID [, advanced = 0] )
-> Ví dụ: Local $sothu1 = GUICtrlRead($Input1)
Tạo Label
GUICtrlCreateLabel ( "text", left, top [, width [, height [, style = -1 [, exStyle = -1]]]] )
-> Ví dụ: $Label1 = GUICtrlCreateLabel("Nhập số thứ nhất", 24, 16, 86, 17)
Ghi dữ liệu lên Label
GUICtrlSetData ( controlID, data [, default] )
-> Ví dụ: GUICtrlSetData($Label4,$sothu1+$sothu2)
Tạo Button
GUICtrlCreateButton ( "text", left, top [, width [, height [, style = -1 [, exStyle = -1]]]] )
-> Ví dụ: $Button1 = GUICtrlCreateButton("Tính", 200, 128, 137, 25)
Thực thi "function" khi click vào Button
GUICtrlSetOnEvent ( controlID, "function" )
-> Ví dụ: GUICtrlSetOnEvent(-1,"PhepCong")
Tạo ComboBox
GUICtrlCreateCombo ( "text", left, top [, width [, height [,
style = -1 [, exStyle = -1]]]] )
-> Ví dụ: $Combo1 = GUICtrlCreateCombo("", 24, 85, 100, 30) GUICtrlSetData(-1, "Cong|Tru|Nhan|Chia","Cong")
Ngoài ra còn có thể tùy chỉnh font chữ, màu,... trên các đội tượng:
GUICtrlSetFont ( controlID, size [, weight [, attribute [, fontname [, quality]]]] )
GUICtrlSetColor ( controlID, textcolor )
GUICtrlSetCursor ( controlID, cursorID )
GUICtrlSetTip ( controlID, tiptext [, "title" [, icon [, options]]] )
GUICtrlSetStyle ( controlID, style [, exStyle] )
VD1: Tạo 2 Input nhập hai số bất kỳ và tính phép tính số thứ nhất cộng số thứ 2, Hiển thị kết quả
- Đầu tiên tạo giao diện (GUI) gồm:
Label: nhập số thứ nhất, nhập số thứ 2, kết quả; Input: Số thứ nhất và số thứ hai; Button: Tính
Sử dụng Koda để thiết kế form:
Hoặc viết code:
$Form1 = GUICreate("Form1", 407, 205, 477, 133)
GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
$Label1 = GUICtrlCreateLabel("Nhập số thứ nhất", 24, 16, 86, 17)
$Label2 = GUICtrlCreateLabel("Nhập số thứ hai", 24, 48, 77, 17)
$Label3 = GUICtrlCreateLabel("Số thứ nhất + Số thứ hai", 24, 80, 115, 17)
$Input1 = GUICtrlCreateInput("1", 200, 16, 137, 21)
$Input2 = GUICtrlCreateInput("2", 200, 48, 137, 21)
$Label4 = GUICtrlCreateLabel("", 200, 80, 132, 20)
$Button1 = GUICtrlCreateButton("Tính", 200, 128, 137, 25)
GUICtrlSetOnEvent(-1,"PhepCong")
GUISetState(@SW_SHOW)
- Tương tác với GUI:
Ở đây có tương tác tắt Form ($GUI_EVENT_CLOSE) và Button chạy Func PhepCong Tính kết quả
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
PhepCong()
EndSwitch
WEnd
Để Tính kết quả ta cần lấy dữ liệu từ Input1 và Input2, tính tổng và truyền dữ liệu vào Label4
Tất cả các quá trình này sẽ được thực hiện trong Func PhepCong:
Hàm đọc dữ liệu từ Input:
Local $sothu1 = GUICtrlRead($Input1)
Local $sothu1 = GUICtrlRead($Input2)
Hàm truyền dữ liệu vào Label:
GUICtrlSetData($Label4,$sothu1+$sothu2)
Tải Code tham khảo tại đây
VD2: Tương tự ví dụ 1 nhưng tại Label 3 thay thành Combobox gồm các phép Cộng, Trừ, Nhân, Chia cho phép lựa chọn phép tính để tính
Tải Code tham khảo tại đây
Harrah's Lake Tahoe Casino & Hotel - Mapyro
ReplyDelete› 파주 출장안마 harrahs-lake-tahoe › harrahs-lake-tahoe Find Harrah's 고양 출장마사지 Lake Tahoe Casino & Hotel in Stateline, Nevada, 대구광역 출장샵 United 안동 출장안마 States. Find reviews and discounts 의정부 출장샵 for AAA/AARP members, seniors,