TrayIcon Icon property

Author

Message

Topic Search

Topic Options

MattM

Newbie

Joined: 13 May 2009
Location: United Kingdom
Status: Offline
Points: 3

Post Options

Post Reply

Quote MattM

Report Post

Thanks(0)

Quote

Topic: TrayIcon Icon property
Posted: 13 May 2009 at 5:01pm

Thanks Aaron,

I was not using the CreatePicture method.
This VBScript works fine.

TrayIcon1.Text = "Desyntime 2.0"
CaptionImageManager1.Icons.LoadIcon "C:\DesynTimeUpdated\DesynTime\256.ico", 1, 0
Set TrayIcon1.Icon = CaptionImageManager1.Icons.GetImage(1, 16).CreatePicture(xtpImageNormal)
TrayIcon1.MinimizeToTray AD.Field("WindowL<WindowHandle>")
TrayIcon1.ShowBalloonTip 2, "Desyntime is still running", "Click the icon to show the window again", 1

Matt

Aaron

Senior Member

Joined: 29 January 2008
Status: Offline
Points: 2192

Post Options

Post Reply

Quote Aaron

Report Post

Thanks(0)

Quote

Posted: 13 May 2009 at 4:06pm

Hi,

I tried the following options and they all work OK:

TrayIcon1.Icon = LoadPicture(App.Path & "\Icons\Delete.ico")
TrayIcon1.Icon = ImageManager.Icons.GetImage(1, 16).CreatePicture(xtpImageNormal)
TrayIcon1.Icon = Me.Icon
TrayIcon1.Icon = PictureBox.Picture

Hope this helps

Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....

MattM

Newbie

Joined: 13 May 2009
Location: United Kingdom
Status: Offline
Points: 3

Post Options

Post Reply

Quote MattM

Report Post

Thanks(0)

Quote

Posted: 13 May 2009 at 12:17pm

I am using the TrayIcon control with a development tool which uses VBScript to manipulate the properties on the panel.

Refering to the documentation for the TrayIcon control I see that the Icon property expects a "Picture" object. The code sample only demonstrates using the VB form's icon, but I want to set the icon as part of the application's configuration.

I have tried using the VBScript LoadPicture function but get a type mismatch error.

TrayIcon1.Icon = LoadPicture("C:\256.ico")

I also tried using the image manager control without success.
Set MyPicture = CaptionImageManager1.Icons.GetImage(1,16)

What type is the Icon property and how can I populate it on the fly from a file on disk?

thanks,

matt

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
MattM Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 13 May 2009 Location: United Kingdom Status: Offline Points: 3	Post Options Post Reply Quote MattM Report Post Thanks(0) Quote Reply Topic: TrayIcon Icon property Posted: 13 May 2009 at 5:01pm
	Thanks Aaron, I was not using the CreatePicture method. This VBScript works fine. TrayIcon1.Text = "Desyntime 2.0" CaptionImageManager1.Icons.LoadIcon "C:\DesynTimeUpdated\DesynTime\256.ico", 1, 0 Set TrayIcon1.Icon = CaptionImageManager1.Icons.GetImage(1, 16).CreatePicture(xtpImageNormal) TrayIcon1.MinimizeToTray AD.Field("WindowL<WindowHandle>") TrayIcon1.ShowBalloonTip 2, "Desyntime is still running", "Click the icon to show the window again", 1 Matt

Aaron Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 29 January 2008 Status: Offline Points: 2192	Post Options Post Reply Quote Aaron Report Post Thanks(0) Quote Reply Posted: 13 May 2009 at 4:06pm
	Hi, I tried the following options and they all work OK: TrayIcon1.Icon = LoadPicture(App.Path & "\Icons\Delete.ico") TrayIcon1.Icon = ImageManager.Icons.GetImage(1, 16).CreatePicture(xtpImageNormal) TrayIcon1.Icon = Me.Icon TrayIcon1.Icon = PictureBox.Picture Hope this helps
	Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option....

MattM Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 13 May 2009 Location: United Kingdom Status: Offline Points: 3	Post Options Post Reply Quote MattM Report Post Thanks(0) Quote Reply Posted: 13 May 2009 at 12:17pm
	I am using the TrayIcon control with a development tool which uses VBScript to manipulate the properties on the panel. Refering to the documentation for the TrayIcon control I see that the Icon property expects a "Picture" object. The code sample only demonstrates using the VB form's icon, but I want to set the icon as part of the application's configuration. I have tried using the VBScript LoadPicture function but get a type mismatch error. TrayIcon1.Icon = LoadPicture("C:\256.ico") I also tried using the image manager control without success. Set MyPicture = CaptionImageManager1.Icons.GetImage(1,16) What type is the Icon property and how can I populate it on the fly from a file on disk? thanks, matt