UDF SkinGlass UDF tạo Skin GUI trong suốt trong AutoIT

SkinGlass CHỈ HOẠT ĐỘNG TRÊN WINDOW VISTA ~> WINDOW MỚI NHẤT BÂY GIỜ
Chức năng bấm vào Icon trên GUI thì hiện lên list thì đó là mặc định của tất cả GUI. Nếu bỏ nó đi thì GUI ko dc hoàn chỉnh.
Theo tui nghĩ thì ko nên tắt cái đó đi dc đâu.
============= Hưỡng dẫn xài UDF SkinGlass này =============
Đầu tiên: Các bạn nên Copy 3 File thư viện: SkinGlass.au3 | GIFAnimation.au3 | ImageSkin.au3
zô Thư mục chứa thư viện của AutoIT. mặc định là: C:\Program Files\AutoIt3\Include
Oke. đã hoàn tất công việc đầu tiên.
Tiếp theo: Các bạn cứ tạo GUI bằng koda như bình thường. Sau khi tạo xong GUI thì các bạn thêm dòng này: #include "SkinGlass.au3" zô file Code của bạn. -> hàm giúp tạo GUI Glass là:
_GUICreate($Title_GUI, $Width, $Height, $X, $Y, $PathImage_Bk, $Set_Title, $AeroGlass)
trong đó thì các bạn cũng bít các tham số: $Title_GUI, $Width, $Height, $X, $Y rùi nên tui chỉ nói đến:
$PathImage_Bk: là file hình ảnh mà bạn sẽ làm ảnh nền. Các bạn nên chọn hình có màu tối tối một chút. Vì hình màu sáng wá thì các chữ trong GUI sẽ rất khó nhìn.
$Set_Title:Mặc định là 1. là chức năng của GUI. gúp cho việc thay đổi tiêu đề GUI nhanh gọn hơn chỉ với 1 Click phải chuột. khi đó sẽ xuất hiện 1 Input để các bạn nhập tiêu đề mới cho GUI vào đó -> xong nhấn Enter. Nếu $Set_Title <> 1 thì chức năng đó được vô hiệu hóa (Không xài dc).
$AeroGlass: Mặc định là 1. Là chức năng trong suốt nền bên trong GUI, có thể nhìn thấy ảnh nền mà bạn đã khai báo ở trên. Nếu $AeroGlass <> 1 thì nền GUI bên trong sẽ như 1 GUI bình thường, và chỉ Trong Suốt các viền cửa sổ thui.
Các bạn muốn Các Control trong suốt thì các bạn đặt nền Control là màu đen: Hàm như sau: GUICtrlSetBkColor(-1, 0) và các bạn cần thay đổi màu chữ của Control đó thành màu khác: GUICtrlSetColor(-1, $Color) $Color thì các bạn tự chọn. Màu gì cũng dc, trừ màu đen.
Như zậy đã xong, bạn sẽ có 1 Skin GUI Glass.
Còn 1 Func nữa: Gúp các bạn có thể cập nhật được thời gian máy được sử dụng: _Read_Time_On($ControlID)
trong đó thì $ControlID là Control mà nó sẽ hiện thị thời gian xài máy. Nếu bạn muốn nó cập nhật thời gian liên tục thì làm như sau. Ví dụ cho SkinGlass và đọc thời gian lun.

Mã (AutoIt):

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <SkinGlass.au3>
#include <Timers.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = _GUICreate("Form1", 330, 88, 192, 124, "Bk.gif", 0, 1)
$Input1 = GUICtrlCreateInput("", 96, 32, 121, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY))
GUICtrlSetFont(-1, 9, 400, 0, "Tahoma")
GUICtrlSetBkColor(-1, 0) ; set màu nền đen cho control
GUICtrlSetColor(-1, 0xFFFFFF) ; set màu trắng cho control
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_Timer_SetTimer($Form1, 1000, "_Update_Time") ; Hàm Cập nhật thời gian. giúp cập nhật thời gian xài máy liên tục mà không bị nháy control
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd

Func _Update_Time($hWnd, $iMsg, $iIDTimer, $iTime)
        #forceref $hWnd, $iMsg, $iIDTimer, $iTime
        _Read_Time_On($Input1)
EndFunc
]

Nếu cần thì các bạn có thể thêm: _SkinGUI() vào dưới hàm While 1 , Ý nghĩa của hàm này là Cập nhật lại kích cỡ GUI và các Cạnh, Góc của GUI
Còn vài chức năng nhỏ ở trên GUI nữa, Khi các bạn click trái chuột vào Icon Góc trái phía trên sẽ hiện ra 1 list chức năng. Các bạn tự tìm hiểu cũng được





Nguồn: thongvsgame - Diễn đàn hocautoit.com

 

hạn chế của udf này là , không thể ẩn GUI

 

không có hàm gui delete ak

 

Hàm GuiDelete đã có sẵn trong AutoIT rồi mà bạn?!

 

nhưng sài guidelete với cái udf này nó báo lỗi đó bạn

 

dùng cái này với hàm guidelete thì nó delete gui này k mở gui kia lên @@