65.9K
CodeProject 正在变化。 阅读更多。
Home

Windows 7 功能控件

Dotnetifier
starIconstarIconstarIconstarIcon
emptyStarIcon
starIcon

4.97/5 (16投票s)

2012年2月20日

CPOL

2分钟阅读

viewsIcon

30697

downloadIcon

2392

Windows 7 新功能控件。

在下载这些文件之前，阅读这篇文章可能会有所帮助。

引言

我非常喜欢 Windows 7 新特性文章，但我不喜欢我不得不手动输入所有 ToolbarThumbnailButtons 的代码。所以我决定自己创建这些控件。 结果很成功：我创建了一个

  • 扩展 Aero 组件
  • Jumplist 组件
  • 叠加图标组件
  • 任务栏进度条组件
  • 缩略图工具栏组件

切勿在同一个窗体中使用相同 Windows 7 特性控件的多个实例！

使用代码

如果你已经将组件添加到窗体并设置了属性，则必须调用

    Private Sub TestForm_Shown(sender As System.Object, e As System.EventArgs) Handles MyBase.Shown
        ExtendAeroComponent1.SetAero(Me) '(+2 overloads)
        JumplistButtons1.SetJumplist() 'OR JumplistButtons1.AddJumplistLink(<Path>, <Title>, <Icon>)
        OverlayIcon1.SetIconOverlay(Me) '(+2 overloads)
        TaskbarProgressBar1.SetTaskbarProgressBar(Me) '(+1 overload)
        ThumbNailToolbar1.SetThumbnailToolbarButtons(Me)
    End Sub

如你所见，你需要在 MyBase.Shown 事件中调用一个子程序。

扩展 Aero

ExtendAero.png

你可以在设计模式或代码中设置 Aero 属性，但始终必须调用 ExtendAero1.SetAero 来设置 Aero 玻璃效果。

你也可以调用 ExtendAero1.SetAero(Me, True) 或 ExtendAero1.SetAero(Me, 50, 50, 50, 50) 将所有 Aero 扩展设置为 50。

Jumplists

Jumplists.png

Jumplists。 我相信你对这些有所了解。 甚至 Visual Studio 2010 也使用它们！那么如何使用这个控件？

如果你设置了属性（图像属性对我来说有点困难，所以如果有什么建议…），你必须调用 JumplistButtons1.SetJumplist()。 这将设置 jumplist 中的所有内容。 确保如果你添加了三个 JumplistLinks，你也添加了三个 PathList 和 Images！

你也可以调用：JumplistButtons1.AddJumplistLink(<Path>, <Title>, <Icon>)

Windows 会记住程序下次运行时使用的 jumplist。 要清除 jumplist，请调用 JumplistButtons1.ClearJumplist()

叠加图标

也许你还不了解这些，但在这里我会向你展示

Overlap.png

你可以看到一个悬停时显示的小启动标志。 这也适用于其他图标。

像往常一样，你必须调用 OverlayIcon1.SetIconOverlay(Me) 或 OverlayIcon1.SetIconOverlay(Me, <IconLocation>) 或 OverlayIcon1.SetIconOverlay(Me, <Icon>)

任务栏进度条

我相信你之前在资源管理器中的文件复制/移动/等操作中见过这个。

Progressbar.png

要使用它，你可以使用 TaskbarProgressBar1.SetTaskbarProgressBar(Me) 或 TaskbarProgressBar1.SetTaskbarProgressBar(Me, <CurrentValue>, <CurrentMaximum>, <ProgressState>)

缩略图工具栏

ThumbNailTB.png

你可以使用最多七个 ThumbnailToolbarButtons。

如果你已经设置了所有属性，则必须调用 ThumbNailToolbar1.SetThumbnailToolbarButtons(Me)。

要使用这些按钮的其中一个事件，请使用以下代码

     Dim WithEvents TTB1 As Microsoft.WindowsAPICodePack.Taskbar.ThumbnailToolbarButton
    Private Sub TestForm_Shown(sender As System.Object, e As System.EventArgs) Handles MyBase.Shown
        ThumbNailToolbar1.SetThumbnailToolbarButtons(Me)
        TTB1 = ThumbNailToolbar1.TTB1
    End Sub

    Private Sub TTB1_Click() Handles TTB1.Click
        MessageBox.Show("Hello world")
    End Sub

参考文献

如果你在项目中使用了任何控件，请在 DLL 压缩包中的 DLL 文件中添加引用

  • Microsoft.WindowsAPICodePack.dll
  • Microsoft.WindowsAPICodePack.Shell.dll
并导入
  • Imports Microsoft.WindowsAPICodePack.Shell
  • Imports Microsoft.WindowsAPICodePack.Taskbar
  • (这两个不是必需的，但可以节省大量时间。)

记住：

切勿在同一个窗体中使用相同 Windows 7 特性控件的多个实例！

© . All rights reserved.