Cùng học lập trình Visual Basic

Dùng ActiveX (.OCX) để đưa chương trình vào System Tray

Bắt đầu với ZTray control

()) Đặc điểm

- Chỉ cần tạo một đối tượng duy nhất , nó sẽ hoá phép cho chương trình của bạn bay vào System Tray.

- Biểu tượng (Icon) của chương trình trong System Tray phải là file biểu tượng (*.ico).

- Icon này phải được đặt trong một ImageList, kích thước không thành vấn đề.

- Nếu bạn không chỉ định Icon, nó sẽ tự động lấy Icon mặc định của nó (là quả địa cầu, trông xấu tệ).

- & còn nhiều thứ nữa ....

()) Một số thuộc tính & sự kiện

Ngoài những thuộc tính, sự kiện bình thường của một đối tượng trong môi trường VB. ZTray còn có các
thuộc tính đặc sau.

* ImageList Property

Thuộc tính này để bạn có thể gán cho nó một ImageList. Trong ImageList này chứa (các) Icon mà nó
dùng làm biểu tượng chương trình trong System Tray. Chỉ có thể thay đổi lúc Design, lúc chương trình
đang chạy bạn không thay đổi được thuộc tính này đâu.

Cú pháp: ZTray.ImageList [=value]



Biểu tượng tự động cập nhật khi thuộc tính này có sự thay đổi.

* TipText Property

Dùng để gán hoặc truy xuất đến ToolTip của đối tượng, ToolTip này sẽ tự động xuất hiện khi bạn rê
mouse đến trên biểu tượng trong System Tray.

Cú pháp: ZTray.TipText [=value]

[value] Là một String. Độ dài tối đa là 64 ký tự, nếu bạn cố tình cho một string quá dài, nó tự động cắt
bớt.

- Sẽ có tác dụng ngay lập tức nếu thay đổi.

* Click Event

Xẩy ra khi người dùng click nút (trái hay phải) chuột vào Icon trong System Tray.

Cú pháp: Private Sub ZTray_Click (Button as integer)

[Button] cho biết nút nào được nhấn.

1 là Left Mouse Button

2 là Right Mouse Button

* DblClick Property

Xẩy ra khi người dùng Double click vào Icon trong System Tray (cả trái lẫn phải đều được công nhận một

đó

Vì ZTray đòi hỏi có một ImageList nên bạn phải click chọn thêm "Microsoft Windows Common Controls
6.0".

Click OK bạn sẽ thấy ZTray Control xuất hiện trên hộp ToolBox của VB.3. Thiết kế:

Trên Form1, bạn tạo một ImageList tên là ImageList1 & một ZTray tên là ZTray1. Và tạo các menu có tên
tương ứng như sau:

Caption Name Checked
PopUp

mnuPopUp
Set ToolTips

mnuTips
Show In Tray mnuShow True
About

mnuAbout
Exit

mnuExit

Click phải chuột lên ImageList1 vừa tạo khi nãy, chọn Properties, chọn tiếp thẻ Images, dùng nút Insert
Picture để thêm vào một số Image (nhớ là phải dùng Icon file). Đại loại như sau, vậy là ta có 7 hình (tứ 1