这是我早期自己编写的一段代码,注释不是很详细,只是对必要部分做了简短说明。现在把所有的源码发布出来,对希望对这方面编程感兴趣的朋友提供可参考的资料。

源码下载地址:http://www.sky-walker.com.cn/yefan/SourceCode/YFAutoWin.rar

这是在工具条上出现控件图标:包括多个,最主要的是YFWin,其它几个主要是配合该窗体界面风格做的几个常用控件。

使用很简单,在一个无边框的窗体上,直接加入YFwin控件,它会自动根据窗体的大小自动调整自己的大小。

界面如下:

功能:
1、窗体可以置最前/一般  

2、缩小后图标可以到托盘

有兴趣的朋友可以对界面重新进行设计。

比较有亮点的代码

Private Sub UserControl_Resize()  UserControl.Extender.Align = 1
收藏 打印