vb6 - Visual basic 6中的无效图片

Question

我正在vb 6中开发一个项目。问题是当我加载图标（扩展名.ico）时它给出“无效图片”。我在所有论坛上搜索了它，但仍然躺在那里。任何帮助将不胜感激。

Image1.picture = loadpicture(app.path & "\Abc.ico")

但是当将文件从 ico 格式转换为 jpg 时：

image1.picture = loadpicture(app.path & "\Abc.jpg")

它被加载到 Image1。

我还将图标文件从 32 位转换为 24 位，但仍然无法正常工作。

score 4 · Accepted Answer

您的图标可能是 32 位图标 - 只需将其更改为 24 位，以便在 VB6 中得到支持。您可以使用 IcoFX 之类的程序来更改位深度。

score 1 · Accepted Answer

您必须使用实际将其保存为 .ICO 的生成器来创建您的图标文件。您不能尝试获取 jpg 或 png 并将其重新保存为 .ico 文件。

score 1 · Accepted Answer

在 VB6 中，图标 (*.ICO) 只能用于在适用的情况下设置为图标。您可以将 *.ico 文件用于应用程序的主窗口。

但是 image1.picture 不能使用 loadpicture 方法加载图标。

score 0 · Accepted Answer

加载几乎任何格式的图片的最佳方式我建议您使用 FreeImage ( http://freeimage.sourceforge.net/ )。

您需要将 FreeImage.dll 复制到 Windows\System32 文件夹，然后将它们的 bas 模块包含到您的 VB6 项目中。完成此操作后，您可以将图标简单地加载到图像中：

Image1.Picture = LoadPictureEx(App.Path & "\Abc.ico")

score 0 · Accepted Answer

一旦我在 C: 驱动器有零字节空闲时收到此错误。清理一些空间后，错误消失了。

5 回答 5