1

Windows API を使用してシステム トレイにカスタム アイコンを取得する方法を説明するチュートリアルをいくつか見つけました。

これらはすべて Visual Basic 用であり、VBA にうまくスケーリングしていないようです。

私はこの短いチュートリアルに従っています: http://atchoo.org/vb/systray.php

基本的に、hIcon 値 (「長い」変数) を設定する必要がありますが、機能しません。LoadPicture() 関数を使用しようとしましたが、エラーは発生しませんが、新しいアイコンの追加にも失敗します。

Me.Icon を提供することも、Form_Load に設定することもできません。

誰もこれについて経験がありますか？

4

1 に答える 1

3

loadpicture を使用することは正しいアプローチでしたが、直接ではありませんでした。最初に新しい変数を定義し、それをロードする必要がありました。

このような：

Dim myPicture As IPictureDisp
strPath = "F:\Databank\Icons\stone.ico"
Set myPicture = LoadPicture(strPath)

そして、途中のどこかで、問題なく hIcon を設定できました。

.hIcon = myPicture

トレイアイコンを変更すると (たとえば、バルーンチップを追加するなど)、アイコン情報も再度提供する必要があります。

于 2010-03-08T15:27:06.280 に答える