?
快捷搜索:  as  test  1111  test aNd 8=8  test++aNd+8=8  as++aNd+8=8  as aNd 8=8

金冠手機娛樂網址:在“狀態區”中建立圖標

?

Win95中如“音量”、“日期”、“屏幕”等可以在Win95的狀態欄(Tray)上建立快捷圖標。假如鼠

標停頓在圖標上,會顯示出響應的對象提示(ToolTip),當用戶在圖標上單擊(或雙擊)鼠標左鍵時,軟

件會實現響應的功能,單擊右鍵時會實現其簡捷的功能。

Tray也稱作SysTray、TrayIcon、NotifyIcon、Status Area等,它是Win95/NT的義務條上一個特殊區

域,許多軟件運行時在Tray中加入自己的圖標,這個區域的另一個特殊之處在于你可以從資本治理器內

拖文件然后放在這個區域。恰是因為這些特點,Tray編程在Win95/NT中有特殊的職位地方。

Tray編程對照特殊,主要包括三個主要方面:圖標、對象提示和消息。它屬于Shell編程的一部分,

主如果使用Shell API中的Shell_NotifyIcon函數完成的。Shell_NotifyIcon函數是這樣聲明的:

Type NOTIFYICONDATA

cbSize As Long布局所占的字節數

hwnd As Long吸收TRAY托盤圖標消息的窗口句柄

uID As Long由利用法度榜樣定義的圖標識別符

uFlags As Long標志

uCallbackMessage As Long由利用法度榜樣定義的消息

hIcon As LongTRAY圖標句柄

szTip As String * 64對象提示字符串

End Type

Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias " Shell_NotifyIconA" (ByVal dwMessage As Long,

lpData As NOTIFYICONDATA) As Long

這個布局中的uFlags很緊張,它有三種取值:NIF_ICON、NIF_MESSAGE和NIF_TIP,分腕表示

hIcon、uCallbackMessage和szTip參數有效,用來改動圖標、消息和對象提示。這三個取值可以同時使

用(三個參數相或),也可以零丁應用。為了實現對用戶鼠標操作的相應,必要在法度榜樣中處置懲罰

uCallbackMessage所定義的消息,該消息的長參數lParam包孕Win32所定義的鼠標消息,假如有多個圖

標,短參數wParam表示圖標識別符。

在vb光盤中\TOOLS\UNSUPPRT\SYSTRAY目錄下有SYSTRAY的工程,經編譯后天生

SYSTRAY.OCX控件。

現在我們利用SYSTRAY.OCX控件進行Tray編程。

首先建立一個“工程”,依次:“工程”——“部件”(或者在“對象箱”上單擊鼠標右鍵選擇“部

件”),再復選SYSTEM TRAY CONTROL CSYSTRAY,CSYSTRAY控件即呈現在“對象箱”中。

SYSTRAY.OCX控件擁有MouseDblClick、MouseDown、MouseMove、MouseUp四個事故,相應先

后為MouseMove、MouseDown、MouseUp、MouseDblClick。下面編程很清楚地闡明他們的相應光陰次

序。

Private Sub cSysTray1_MouseDblClick(Button As Integer, Id As Long)

MsgBox "Hei!You have DblClick the mous金冠手機娛樂網址e!"

End Sub

Private Sub cSysTray1_MouseDown(Button As Integer, Id As Long)

If Button = 2 Then

MsgBox "Hei!Y金冠手機娛樂網址ou have clicked me in right button!"

End If

End Sub

Private Sub cSysTray1_MouseMove(Id As Long)

Msg金冠手機娛樂網址Box "Hello!I am here!"

End金冠手機娛樂網址 Sub

Private Sub cSysTray1_MouseUp(Button As Integer, Id As Long)

MsgBox "Hei!You clicked me just now!"

End Sub

Private Sub Form_Load()

cSysTray1.TrayTip = "Hello! I am the King of the world!"

cSysTray1.InTray = True

cSysTray1.TrayIcon = "c:\fittings\FACE.ico"

End Sub

SYSTRAY控件還擁有InTray、Name、TrayIcon、TrayTip、Parent、Index、Object、Tag屬性。InTray

設置是否在Win95的狀態欄Tray上建立一個快捷圖標;Name設置SYSTRAY控件的名稱;TrayIcon設

置在Tray上所建立快捷圖標的外不雅;TrayTip設置假如鼠標停頓在圖標上所顯示的對象提示(ToolTip)內

容;Tag儲存法度榜樣所必要的附加數據。

經由過程實踐發明,在應用VB開拓利用法度榜樣時,機動應用API 函數,會更大年夜地發揮VB 的感化,金冠手機娛樂網址使開

發的軟件更專業,功能更強大年夜。本文僅僅是先容了一下API函數在Win95中的應用措施,以作拋磚引玉

之用。真正的利用API 函數,還必要更詳盡的資料和讀者更大年夜的努力。

上述法度榜樣在中文Windows 98和 VB5.0中文企業版下調試經由過程。

免責聲明:以上內容源自網絡,版權歸原作者所有,如有侵犯您的原創版權請告知,我們將盡快刪除相關內容。

您可能還會對下面的文章感興趣:

快三平台开户