【VB6】MiniGdiPlusForVB6

马云爱逛京东

一个自制的GDIP模块。基于VistaSwx的源码制作。

用法：在启动窗体中，写入这些代码。

1. Private Sub Form_Load()
   
2.     InitializeGDIPlus
   
3. End Sub
   
4. 
   
5. Private Sub Form_Unload(Cancel As Integer)
   
6.     TerminateGDIPlus
   
7. End Sub
   

复制代码

并使容器的自动重绘属性为真。

以下是源码地址。
https://github.com/shaigu31135/MiniGdiPlusForVB6

马云爱逛京东

1、绘制简单的单行文本


2、绘制自左到右的渐变色单行文本


3、绘制以百分比计算的遮罩单行文本


4、绘制图片到容器（从图片路径）

系统消息

你这样每次调用绘图方法都重新加载图片和创建画笔、画刷、字体等资源，效率很低啊，画的内容一多界面直接卡死。

Golden Blonde

你截图里的字体怎么看起来怪怪的？似乎不像WINDOWS。

usr

点赞，支持开源，支持原创。

usr

Golden Blonde 发表于 2022-11-22 16:06
你截图里的字体怎么看起来怪怪的？似乎不像WINDOWS。

可能他设置过窗体显示字体了。

Golden Blonde

你的编辑器和标题栏用的是什么字体？

imr2013

字体好漂亮

xiawan

楼主辛苦了~~~

马云爱逛京东

Golden Blonde 发表于 2022-11-23 11:22
你的编辑器和标题栏用的是什么字体？

等距更纱黑体 fixed sc semibold
标题栏是更纱黑体 ui sc

liu496324

有人用过没，好用么