API LoadImage

ZOUYONG0929 2017-10-03 12:15:29
Private Declare Function LoadImage Lib "user32" Alias "LoadImageA" (ByVal hInst As Long, ByVal lpsz As String, ByVal dwImageType As Long, ByVal dwDesiredWidth As Long, ByVal dwDesiredHeight As Long, ByVal dwFlags As Long) As Long

Private Const LR_LOADFROMFILE = &H10
Private Const IMAGE_BITMAP = 0

Dim Tmp_ImageHandle as long
Tmp_ImageHandle = LoadImage(App.hInstance, vjpgPath, IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE)

'vjpgPath 是jpg图片路径,我给定没错,怎么返回的都是0 App.hInstance=0 返回也是0
...全文
4526 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
脆皮大雪糕 2017-10-03
  • 打赏
  • 举报
回复
如果你只是想打开一个jpg文件,VB里已经有自带的函数了 举个例子 Me.Picture = LoadPicture("B:\7.jpg") 当然loadpicture后面还有一系列的参数,看参数名很容易明白是干啥的
CODE:// 结构内存用0初使化 - 注意: 一些Windows函数要求这么做,不过我记不得哪些需要,哪些不需要了:) NOTIFYICONDATA niData; ZeroMemory(&niData,sizeof(NOTIFYICONDATA));// 得到Shell32的版本号,并依此设置结构成员cbSize的大小 - 注意:MSDN文档中关于这部分的说明有点模糊不清(见本文后面),所以我并不确定下面的代码是否完全正确 ULONGLONG ullVersion = GetDllVersion(_T("Shell32.dll")); if(ullVersion >= MAKEDLLVERULL(6,0,0,0)) niData.cbSize = sizeof(NOTIFYICONDATA); else if(ullVersion >= MAKEDLLVERULL(5,0,0,0)) niData.cbSize = NOTIFYICONDATA_V2_SIZE; else niData.cbSize = NOTIFYICONDATA_V1_SIZE;// 结构成员uID可以是任何UINT值,这个ID用来标志你的托盘图标,Shell_NotifyIcon函数后面将会用到这个值 niData.uID = MY_TRAY_ICON_ID;// 结构成员uFlags指出哪些结构成员是有效的。此处也可以设置提示窗口的样式,如冒泡提示:NIF_INFO niData.uFlags = NIF_ICON|NIF_MESSAGE|NIF_TIP;// 装载图标。 - 注意:调用完函数Shell_NotifyIcon后应销毁该图标。 niData.hIcon = (HICON)LoadImage( hInstance, MAKEINTRESOURCE(IDI_MY_ICON), IMAGE_ICON, GetSystemMetrics(SM_CXSMICON), GetSystemMetrics(SM_CYSMICON), LR_DEFAULTCOLOR);// 设置接收托盘事件消息的窗口句柄。 niData.hWnd = hWnd;// 设置发送消息值。- 注意:消息值的大小应该在WM_APP和0xBFFF之间 niData.uCallbackMessage = MY_TRAY_ICON_MESSAGE;

1,486

社区成员

发帖
与我相关
我的任务
社区描述
VB API
社区管理员
  • API
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧