【问题标题】:Custom tray panel in VB.NETVB.NET 中的自定义托盘面板
【发布时间】:2018-01-08 03:19:27
【问题描述】:

我需要像 Windows Media Player 一样创建系统托盘“面板”。 (不仅仅是图标,而是带有按钮、图像等的完整表单)

这是wmp截图:

VB.NET & Win 10 可以吗?

感谢和抱歉我的英语.. :)

【问题讨论】:

  • 您的图片无效,但我想您正在寻找DeskBand。遗憾的是,在 .NET 中做起来并不容易,并且需要 P/Invoke 知识。
  • 谢谢!我用这个名字('DeskBand')找到了文档。 :)

标签: vb.net system-tray deskband


【解决方案1】:

您实际上可以做一种“托盘面板”,而且并不难。只需创建一个Form 对象并将其FormBorderStyle 属性设置为None,这将允许您创建自定义边框。然后,执行以下操作:

Public Class Form1
    Public Timer1 As New Timer
    Private Sub Form1_Load(sender as Object, e as Eventargs) Handles MyBase.Load
        Timer1.Interval = 1
    End Sub

     Private Sub Form1_MouseDown(sender as Object, e as MouseEventargs)
         Timer1.Start()
     End Sub

     Private Sub Form1_MouseUp(sender as Object, e as MouseEventargs)
         Timer1.Stop()
     End Sub

     Private Sub Timer1_Tick(sender as Object, e as Eventargs)
         Me.Location = New Point(Me.Cursor.Position.X - (Me.Cursor.Position.X - Me.Location.X), Me.Cursor.Position.Y - (Me.Cursor.Position.Y - Me.Location.Y))
     End Sub
End Class

一旦你完成了(我不确定它是否会直接工作,尝试一下,它应该),享受设计 GUI...;-)
希望这会有所帮助,顺便说一句,您的英语比您想象的要好!

【讨论】:

  • 嗯...我猜提问者的意思是将整个内容嵌入到任务栏上,就像...查看我在 Google 中找到的这张图片:images.techhive.com/images/idge/imported/article/ctw/2012/06/06/… 也许提问者要求的是类似的那...
  • 有可能,不过,我只是觉得我的回答可能对他有所帮助,如果没有,我深表歉意!
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2016-10-16
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2011-08-09
相关资源
最近更新 更多