'使用Gdiplus.tlb，将其放到system32中，然后添加对其的引用
'手动设置Form的AutoRedraw＝True，ScaleMode=Pixels
Option Explicit
Dim lngGraphics As Long
Dim lngImageHandle As Long
Dim lngTextureBrush As Long
Dim gpP As GpStatus
Dim lngPen1 As Long
Dim lngToken As Long
Dim GpInput As GdiplusStartupInput
Private Sub Command1_Click()
Dim intP As Integer
gpP = GdipCreateFromHDC(Me.hDC, lngGraphics) '创建绘图区域设备场景
gpP = GdipLoadImageFromFile(App.Path & "\启动.png", lngImageHandle) '读取图片到内存
gpP = GdipDrawImage(lngGraphics, lngImageHandle, 0, 0) '等大小绘制
gpP = GdipDrawImageRect(lngGraphics, lngImageHandle, 200, 0, 300, 300) '在指定的区域内绘制（放大或缩小）
gpP = GdipDrawImageRectRectI(lngGraphics, lngImageHandle, 550, 0, 400, 400, 20, 20, 80, 80, UnitPixel) '在400*400的区域内显示图片部分区域
gpP = GdipCreateTexture(lngImageHandle, WrapModeTile, lngTextureBrush) '设置一定排列方式的刷子 平铺方式
gpP = GdipFillRectangle(lngGraphics, lngTextureBrush, 0, 300, 400, 300) '在指定区域内按指定的格式绘制图片
If lngGraphics <> 0 Then GdipDeleteGraphics lngGraphics
If lngImageHandle <> 0 Then GdipDisposeImage lngImageHandle
If lngTextureBrush <> 0 Then GdipDeleteBrush lngTextureBrush
Me.Refresh
End Sub
Private Sub Form_Load()
Dim bolP As Boolean
With Me
.Caption = "GDIPlus范例"
.Width = 960 * 15
.Height = 720 * 15
.Left = (Screen.Width - .Width) * 0.5
.Top = (Screen.Height - .Height) * 0.5
End With
GpInput.GdiplusVersion = 1
If lngToken = 0 Then bolP = (GdiplusStartup(lngToken, GpInput) = Ok)
End Sub
-
等级
本版专家分：298结帖率 83.33% -
展开阅读全文
-
等级
本版专家分：60187勋章
-
-
红花
2019年1月 VB大版内专家分月排行榜第一
2018年12月 VB大版内专家分月排行榜第一
2018年11月 VB大版内专家分月排行榜第一
2018年10月 VB大版内专家分月排行榜第一
2018年7月 VB大版内专家分月排行榜第一
2018年6月 VB大版内专家分月排行榜第一
2018年5月 VB大版内专家分月排行榜第一
2018年4月 VB大版内专家分月排行榜第一
2018年3月 VB大版内专家分月排行榜第一
2018年2月 VB大版内专家分月排行榜第一
2018年1月 VB大版内专家分月排行榜第一
2017年9月 VB大版内专家分月排行榜第一
2017年8月 VB大版内专家分月排行榜第一
2017年7月 VB大版内专家分月排行榜第一
2017年6月 VB大版内专家分月排行榜第一
2017年5月 VB大版内专家分月排行榜第一
2017年4月 VB大版内专家分月排行榜第一
2016年11月 VB大版内专家分月排行榜第一
2016年8月 VB大版内专家分月排行榜第一
2016年7月 VB大版内专家分月排行榜第一
2013年12月 VB大版内专家分月排行榜第一
2013年10月 VB大版内专家分月排行榜第一
2013年9月 VB大版内专家分月排行榜第一
2008年5月 VB大版内专家分月排行榜第一
-
-
黄花
2017年12月 VB大版内专家分月排行榜第二
2017年11月 VB大版内专家分月排行榜第二
2017年3月 VB大版内专家分月排行榜第二
2016年12月 VB大版内专家分月排行榜第二
2016年10月 VB大版内专家分月排行榜第二
2013年11月 VB大版内专家分月排行榜第二
-
-
蓝花
2019年5月 VB大版内专家分月排行榜第三
2016年3月 VB大版内专家分月排行榜第三
2012年9月 VB大版内专家分月排行榜第三
-
-
用GDI+绘图之后，Me.Image属性，就是“窗口内的图像”了吧？
把它保存下来不就行了？
- VB6.0用GDI+保存图片为JPG、TIFF、PNG、GIF、BMP等格式
PrivateTypeGUID Data1AsLong Data2AsInteger Data3AsInteger Data4(0To7)AsByte EndType PrivateTypeGdiplusStartupInput GdiplusVersionAsLong DebugEventCallb...
- VB6.0用GDI+保存图像为BMP\JPG\PNG\GIF格式终结版。
鉴于之前在http://blog.csdn.net/laviewpbt/article/details/756547发布的代码很匆忙，也存在不少错误，现发布比较完美版的解决方案。 Option Explicit Private Const UnitPixel ...
- VB无所不能之二：利用GDI+处理图像格式转换
VB无所不能之二：利用GDI+处理图像格式转换——作者：钟声 我今天想再续写一篇关于VB的有关文件格式转换的文章。 对于Windows编程来说，除了处理网络协议以外，处理几种类型的文件格式更加重要，这些文件格式的...
- GDI+ GdiPlus.lib GdiPlus.h GdiPlus.dll完整开发包
完整的GDI+开发包，放上来只是方便大家下载。包含GdiPlus.lib GdiPlus.h GdiPlus.dll三个文件。
- Gdiplus.tlb
Gdiplus.tlb GDI+开发静态链接库
- 解决 “计算机中丢失gdiplus.dll”
无法启动此程序，因为计算机中丢失 gdiplus.dll。尝试重新安装该程序以解决问题。 这类问题，网上都是千篇一律的答案。让你从网上下载这个dll，复制到system32或syswow64目录，然后执行“regsvr32 dll文件名” ...
- VB基于GDIPLUS.DLL 鼠标截图、抓屏程序.rar
VB基于GDIPLUS.DLL 鼠标截图、抓屏程序，最终把截图保存为JPG、TIFF、PNG、GIF、BMP格式，可以提前写保存为BMP的代码，因为并没有用GDI 。
- 调用gdiplus.dll 异常 (无法加载 DLL (gdiplus.dll))
问题描述:网站注册时的验证码显示不了,看错误信息 无法加载 DLL (gdiplus.dll)。 说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。 异常...
- GDIPlus.rar
GDIPlus.rar包括：GDIPlus所需的头文件，gdiplus.dll，GdiPlus.lib和如何加载GDIPlus的说明
- GdiPlus.h、GdiPlusPath.h、GdiPlusBrush.h、GdiPlus.lib、GdiPlusTypes.h文件下载.rar
GdiPlus.lib、GdiPlus.h、GdiPlusPath.h、GdiPlusBrush.h、GdiPlusMem.h、GdiPlusTypes.h等文件下载，VC GDI类库中的主要文件，运用GDI时有时候会很着急找不到这些文件， 在此可解你燃眉之急。
- docker之使用System.Drawing生成图片缺少Gdiplus.dll错误
1.在docker 上找到并运行需要System.Drawing的镜像 然后退出执行...进入镜像以方便安装gdiplus docker exec -ti container01 /bin/bash 执行更新环境 apt-get update 下载安装gdiplus apt-get in...
- 怎么动态链接Gdiplus.dll
#pragma comment(lib,"Gdiplus.lib") ``` 用静态链接,请问有人知道怎么动态链接Gdiplus.dll吗 如果想用最新版的Windows按钮样式可以加上这段代码 ```c++ #if defined _M_IX86 #pragma comment(linker,"/...
- PCB_问题记录_QT（1）引用gdiplus.h、Gdiplus.lib 报错
1>c:\program files (x86)\windows kits\8.1\include\um\GdiplusEnums.h(33): error C4430: 缺少类型说明符 - 假定为 int。注意: C++ 不支持默认 int (编译源文件 CommonFiles\RawImageEncoder.cpp) ...
- Win32工程引用gdiplus.h编译错误解决方案
很多时候我们在VC++中要用到GDI+来画一些东西，要用GDI+的东西，头文件，命名空间，类库这些东西是...#pragma comment(lib, "gdiplus.lib") 如果直接这样用的话，编译就可能会出现错误，有上百个错误，而且错误显示
- #include <gdiplus.h>
error LNK2019: unresolved external symbol _GdipCreateFromHDC@8 referenced in function "public: __thiscall Gdiplus::Graphics::Graphics(struct HDC__ *)" (??0Graphics@Gdiplus@@QAE@PAUHDC__@@@Z) ![图片...
- 使用MFC写程序时报错gdiplus.h中有几千条错误怎么回事？？
在mfc写坦克大战的时候，本来程序还好好的，但是添加了一个头文件之后include<gdiplus.h>就出现几千条错误错误，网上找了很多帖子都没找到原因； 这些错误不影响主程序运行，但是就是找不到哪里错了 那位大神能帮...
- 使用gdiplus.lib出现的一些问题解决办法（不断增加中。。。）
FAQ1： 使用gdiplus.lib出现下面的错误？ error C2065: ULONG_PTR : undeclared identifier error C2065: token : undeclared identifier error C2165: left-side modifie
- 绘制半透明矩形Gdiplus和GDI性能对比
Gdiplus实现: void GdipFillAlphaRect(CDC& pDC, CRect& rc, int r, int g, int b, int a) { Gdiplus::Graphics renderer(pDC.GetSafeHdc()); Gdiplus::Color color(a, r, g, b); Gdiplus::Rect ...
- 无法加载DLL "gdiplus.dll":拒绝访问
一、今天突然发现项目的图片验证码不显示了： 验证码图片无法显示 无法加载 DLL“gdiplus.dll”：拒绝访问。(异常来自HRESULT:0x80070005(E_ACCESSDENIED))。二、参考网页： ...
- 无法加载 DLL gdiplus.dll 的问题解决方法－asp.net
无法加载 DLL gdiplus.dll 的问题解决方法－asp.net 老问题了，结果过了几年都没有法子解决吗？ 服务器已经打了这个补丁，部署了一个.net系统，结果就提示：
- 用VB实现两幅图片半透明叠加
代码很简单，就不解释了，演示VB如何实现两幅图片半透明叠加的效果。Option ExplicitPrivate Declare Function CreateCompatibleDC Lib "gdi32" (ByVal hdc As Long) As LongPrivate Declare Function DeleteDC Lib ...
- #include <gdiplus.h>出错
参考文章:... xxx\GdiPlusImaging.h(67) : error C2501: “MIDL_INTERFACE” : 缺少存储类或类型说明符 xxx\GdiPlusImaging.h(67) : error C2440: “初始化” : 无法从“const char [37]”转换为“int”
- 解决windows xp中不能使用gdiplus.dll 1.1的问题（vs2010中如何添加manifest文件）
方法是在项目属性中添加新建项->常规->应用程序清单文件，之后自动生成app.manifest文件，...并将gdiplus.dll文件以及Microsoft.Windows.GdiPlus.Manifest和MSVaaa.DLL放到程序启动目录下 至于什么原理请见http://b
- 看看我最关心的动态库中到底有多少函数 - gdiplus.dll
为什么80%的码农都做不了架构师？>>> ...
- unable to load dll 'gdiplus.dll' in docker
已经在.csproj文件里添加了...在VS可以运行，但在docker中报unable to load dll 'gdiplus.dll'， 因为docker是linux环境，还需要安装一个库libgdiplus，在Dockerfile中添加一行： RUN apt-get install -y libgdiplus
- gdiplus.dll
gdiplus.dll DLL 文件： gdiplus 或者 gdiplus.dll DLL 名称： Microsoft GDI+ 描述： gdiplus.dll是GDI图形设备接口图形界面相关模块。 <br> 属于： Microsoft GDI+ 系统 DLL文件： 是...
- 64位的GDIPLUS库
WIN7 下面64位的GDIPLUS.LIB,GDIPLUS.DLL，MFC编程开发使用
- win32程序中如何使用GDIPlus
方法一： ...加上gdiplus.lib引用： #pragma comment(lib, "gdiplus.lib") 包含gdiplus头文件： #include 添加初始化代码： ULONG_PTR gdiplusToken; GdiplusStartupInput gdiplusStartupI
- 【.NET Core】在Docker中找不到gdiplus.dll
你在windows上使用图像组件没有任务问题，但部署到linux之后，将注意以下几点： 安装nuget包ZKWeb.System.Drawing 项目里还是引用System.DrawingCore，这点不用改 安装gdiplus插件，这个需要根据linux类型不同，...
- 在 VC6 中使用 GdiPlus（三）
Step2：安装 理论上讲，把下载回来的这些文件放在硬盘上的任意一个位置都是可以的，只要在 Step3 中进行相应正确的配置，都能够在 VC6 中把 GdiPlus 用起来。我采取的做法是：（1）头（GdiPlus*.h）文件安装目录：C...