GIỚI THIỆU VỀ AUTOIT-Lập Trình Trên AutoIT part 22 ppsx

$guiPos = WinGetPos($gui) Do $msg = GUIGetMsg() Until $msg = $GUI_EVENT_CLOSE EndFunc ;==>Example2 Func main() $guiPos = WinGetPos($gui) WinMove($gui, "", $guiPos[0] + 10, $guiPos[1] + 10) EndFunc ;==>main Func left() $picPos = WinGetPos($pic) WinMove($pic, "", $picPos[0] - 10, $picPos[1]) EndFunc ;==>left Func right() $picPos = WinGetPos($pic) WinMove($pic, "", $picPos[0] + 10, $picPos[1]) EndFunc ;==>right Func down() $picPos = WinGetPos($pic) WinMove($pic, "", $picPos[0], $picPos[1] + 10) EndFunc ;==>down Func up() $picPos = WinGetPos($pic) WinMove($pic, "", $picPos[0], $picPos[1] - 10) EndFunc ;==>up ; example 3 PNG work araund by Zedna #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <GDIPlus.au3> #Include <WinAPI.au3> Global $hGUI, $hImage, $hGraphic, $hImage1 ; Create GUI $hGUI = GUICreate("Show PNG", 350, 301) ; Load PNG image _GDIPlus_StartUp() $hImage = _GDIPlus_ImageLoadFromFile("E:\WINDOWS\system32\oobe\images\tha nks8.png") $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI) GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT") GUISetState() ; Loop until user exits do until GUIGetMsg() = $GUI_EVENT_CLOSE ; Clean up resources _GDIPlus_GraphicsDispose($hGraphic) _GDIPlus_ImageDispose($hImage) _GDIPlus_ShutDown() ; Draw PNG image Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam) _WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_UPDATENOW) _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0) _WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_VALIDATE) Return $GUI_RUNDEFMSG EndFunc GUICtrlCreateButton Tạo một nút bấm cho GUI GUICtrlCreateButton ( "text", left, top [, width [, height [, style [, exStyle]]]] ) Các tham số Text Văn bản sẽ hiện trên nút bấm left Khoảng cách canh từ lề trái của GUI (tọa độ x). Nếu sử dụng -1, thì lề trái được tính theo GUICoordMode. Top Khoảng cách canh từ lề trên của GUI (tọa độ y). Nếu sử dụng -1, thì l ề trái được tính theo GUICoordMode. width [tùy chọn] độ rộng của control. Mặc định là độ rộng đã dùng trước đó height [tùy chọn] chiều cao của control. Mặc định là chiều cao đã dùng trước đó. style [Tùy chọn] Định nghĩa style cho control. Xem GUI Control Styles Appendix. default ( -1) : none. style bắt buộc : $WS_TABSTOP exStyle [tùy chọn] Định nghĩa style mở rộng. Xem Extended Style Table. Giá trị trả về Th. Công : Trả về ID của control Button vừa tạo Hỏng : Trả về 0 Chú ý  Để thay đổi thông tin của button, sử dụng GUICtrlSet  Một nút bấm có thể hiển thị kèm theo một icon hoặc ảnh bằng cách sử dụng style $BS_ICON hoặc $BS_BITMAP . Gọi GUICtrlSetImage để chỉ định ảnh mà bạn muốn dùng.  Để kết hợp style mở rộng và các style khác, gọi BitOr($GUI_SS_DEFAULT_BUTTON, newstyle, ).  Các giá trị bên trên muốn dùng được, cần gọi đến thư viện #include <ButtonConstants.au3>  Đưa về kích thước mặc định : $GUI_DOCKSIZE Ví dụ #include<GUIConstantsEx.au3> Opt('MustDeclareVars',1) Example() Func Example() Local$Button_1,$Button_2,$msg GUICreate("My GUI Button"); will create a dialog box that when displayed is centered Opt("GUICoordMode",2) $Button_1=GUICtrlCreateButton("Run Notepad",10,30,100) $Button_2=GUICtrlCreateButton("Button Test",0,-1) GUISetState() ; will display an dialog box with 2 button ; Run the GUI until the dialog is closed While1 $msg=GUIGetMsg() Select Case$msg=$GUI_EVENT_CLOSE ExitLoop Case$msg=$Button_1 Run('Notepad.exe') ; Will Run/Open Notepad Case$msg=$Button_2 MsgBox(0,'Testing','Button 2 was pressed') ; Will demonstrate Button 2 being pressed EndSelect WEnd EndFunc ;==>Example GUICtrlCreateInput Input chính là một textbox cho phép người dùng nhập văn bản vào . Văn bản đó có thể được phân loại, kiểm tra xem có phù hợp với định dạng hay không. Định dạng đó có thể là , chỉ cho phép nhập số không được nhập ký tự chẳng hạn. Hình thức input mà bạn thường gặp nhất là ở các hộp thoại đăng nhập, yêu cầu user và password. GUICtrlCreateInput ( "text", left, top [, width [, height [, style [, exStyle]]]] ) Các tham số text The text of the control. left Khoảng cách canh từ lề trái của GUI (tọa độ x). Nếu sử dụng -1, thì lề trái được tính theo GUICoordMode. Top Khoảng cách canh từ lề trên của GUI (tọa độ y). Nếu sử dụng -1, thì l ề trái được tính theo GUICoordMode. width [tùy chọn] độ rộng của control. Mặc định là độ rộng đã dùng trước đó height [tùy chọn] chiều cao của control. Mặc định là chiều cao đã dùng trước đó. style [tùy ch ọn] Định nghĩa style cho input. Xem GUI Control Styles Appendix. default ( -1) : $ES_LEFT, $ES_AUTOHSCROLL style bắt buộc : $WS_TABSTOP only if no $ES_READONLY. $ES_MULTILINE is always reset. exStyle [tùy ch ọn] định nghĩa style mở rộng. Xem Extended Style Table . Giá trị trả về Th. Công : Trả về ID của control Input vừa tạo . nghĩa style mở rộng. Xem Extended Style Table. Giá trị trả về Th. Công : Trả về ID của control Button vừa tạo Hỏng : Trả về 0 Chú ý  Để thay đổi thông tin của button, sử dụng GUICtrlSet. Text Văn bản sẽ hiện trên nút bấm left Khoảng cách canh từ lề trái của GUI (tọa độ x). Nếu sử dụng -1, thì lề trái được tính theo GUICoordMode. Top Khoảng cách canh từ lề trên của GUI (tọa độ. BitOr($GUI_SS_DEFAULT_BUTTON, newstyle, ).  Các giá trị bên trên muốn dùng được, cần gọi đến thư viện #include <ButtonConstants.au3>  Đưa về kích thước mặc định : $GUI_DOCKSIZE Ví dụ #include<GUIConstantsEx.au3>