在 Delphi 中显示某些 JPG 文件时出现问题

2023-11-25

我尝试使用 TImage 组件在 Delphi 中打开一些 JPEG 文件。我还添加了 Jpeg 单元。我可以打开大部分 jpg 文件,没有问题。

但是当我尝试打开一些 JPG 时,程序只是抛出异常。

我还尝试在设计模式下加载该图像,但存在一些问题。在设计模式下,例外情况是:

模块“vcljpeg70.bpl”中地址 402672A1 处发生访问冲突。写入地址08E84000

为什么我无法打开该 JPG?它们没有被损坏。我在一些工具(如 savantools EXIF 查看器)中检查了它们。

这是其中一张图片的 URL:http://xs842.xs.to/xs842/09340/backpic435.jpg

非常感谢

附: 我的Delphi版本是7。Borland Delphi 7


您遇到此问题的原因可能是文件类型所致。 Delphi 在显示使用 CMYK(而不是默认 RGB 编码)编码的 JPEG 图像时存在问题。 CMYK 是一种通常用于印刷设计的格式,尝试并始终将图像编码为 RGB 格式,以避免 Delphi 出现此问题。

补丁Delphi jpeg.dcu

Bye.

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

在 Delphi 中显示某些 JPG 文件时出现问题 的相关文章

  • 从单个应用程序中的多个线程调用 dll 函数是否安全?

    我正在 Delphi 2009 中编写一个服务器应用程序 它实现了多种类型的身份验证 每种身份验证方法都存储在单独的 dll 中 第一次使用身份验证方法时 会加载适当的 dll 仅当应用程序关闭时 DLL 才会被释放 在服务器线程 连接 之
  • 能否从 Vista Shell 获取 48x48 或 64x64 图标?

    如果 Vista Shell 中存在 48x48 或 64x64 图标 如何使用 SHGetFileInfo 获取在 TImage 中显示图标的句柄 我想从图像列表中选择一个代表文件夹路径的图标 并在 Timage 中显示 48x48 或
  • 为应用程序启用主题

    我有一个旧的应用程序 在Win XP中的delphi 7中启动 现在我正在使用delphi 2009 win Vista 如果我开始一个新项目 所有按钮都有一个圆形边缘 但在我的旧应用程序中 所有按钮都有 方形 形状的外观 有什么设置我错过
  • 如何允许表单接受文件删除而不处理 Windows 消息?

    在 Delphi XE 中 我可以允许我的表单接受文件 拖放 但不必处理裸窗口消息吗 您不需要处理消息来实现这一点 你只需要实施IDropTarget并打电话RegisterDragDrop RevokeDragDrop 这真的非常非常简单
  • 获取字符、整数和日期字段的字段 oldValue 和 newValue

    我试图只保留表更改的历史记录 所以我想获取一个字段在更改为oldValue之前的值 然后获取它更改为newValue的值 两个值都应转换为字符串 因此 这是该表的一个示例 PartNumber Description 12345 Test
  • Delphi 的免费加密库 [关闭]

    Closed 此问题正在寻求书籍 工具 软件库等的推荐 不满足堆栈溢出指南 help closed questions 目前不接受答案 我正在为 Delphi 2010 寻找一个免费且最新的加密库 该库实现 RSA 和 AES Rijnda
  • Delphi如何使用其他窗体中的类型?

    抱歉 这是一个非常新手的问题 我正在对这个庞大的应用程序进行维护 它有5种不同的形式 我们将全局变量放在一个单元 uGlobal 中 但我似乎无法从数据单元 uData 访问它 我有这个 Unit uGlobal type TmyType
  • 我需要避免尝试更新连接到 TSQLQuery 的 Delphi TClientDataset 中的非物理字段

    概要 我的代码正在尝试更新 Delphi XE 中的非物理字段TClientDataset 连接到TSQLQuery以其SQL属性集 作为运行时的结果创建Open命令 我有一个TClientDataset连接到一个TDatasetProvi
  • DICOM 和 DICOM 叠加问题

    我有一个 DICOM 图像 我正在使用 C 读取该图像并将其转换为 16 位位图 位图已创建 但图像具有 DICOM 覆盖 我想在创建最终的 dicom 位图时将叠加层刻录到位图中 我无法做到这一点 有什么帮助吗 一种方法是创建覆盖数据的位
  • 在TImageViewer中,如何获取用户点击图片的位置?

    在TImageViewer控件中 用户可以缩放或平移图片 我的问题是 当用户点击图片时 如何获取用户在图片上的点击位置 尤其是用户可以对图片进行放大 缩小或平移之后 如何获取对应的图片点击位置呢 As shown below How to
  • Delphi:写入后代类中私有祖先的字段

    我需要修复第三方组件 该组件的类具有私有变量 该变量由其后代主动使用 TThirdPartyComponentBase class private FSomeVar Integer public end TThirdPartyCompone
  • 如何释放 TInterfacedObject 中的 TObject 成员

    我知道接口对象是引用计数的 因此不需要手动释放它 但如果它有一个 TObject 继承成员 我是否应该在析构函数中手动释放该成员 考虑以下代码 program Project2 APPTYPE CONSOLE R res uses Syst
  • 如何使用 Gmail 的 SMTP 和 Indy 10 发送电子邮件?

    我正在使用 Delphi 2009 和 svn 中最新的 Indy 10 通过 SMTP 发送电子邮件 但它不适用于 Gmail Google Apps 托管域 当我尝试发送电子邮件时 我收到 必须首先发出 STARTTLS 命令 我尝试用
  • 如何在Delphi中将对象方法作为参数传递,然后调用它?

    我担心这可能是一个有点愚蠢的问题 但这让我很难过 我正在寻找将对象的方法传递到过程中的最简单的方法 以便过程可以调用对象的方法 例如 超时后 或者可能在不同的线程中 所以基本上我想 捕获对对象方法的引用 将该引用传递给过程 使用该引用 从过
  • H2161 重复资源[一个VCL项目可以有2个类名相同但命名空间不同的表单吗?]

    我尝试在 2 个不同的命名空间中创建具有相同类名的 2 个表单 FirstNameSpace ExampleFormName TExampleFormName SecondNameSpace ExampleFormName TExample
  • 使用 PutBlock 并将字节数组全部设置为零的 EIPHTTPProtocolExceptionPeer 异常

    使用 Delphi XE2 Update 3 我在将零字节块上传到 Azure 时遇到问题 当我说零字节时 我指的是每个元素设置为零的字节数组 不是零长度 例如 var ConInfo TAzureConnectionInfo RespIn
  • 如何在表单上绘制半透明图像?

    我想在 Delphi 窗体上绘制半透明图像 但由于某种原因它不起作用 Here is the original PNG border is semi transparent 我将图像加载到TImage object Image1 Trans
  • Delphi - Indy - 保存 GMail 草稿

    我一直在 Delphi 下使用 Indy 通过 gmail 帐户发送消息 使用 TIdSMTP 和 TIdMessage 组件 这绝对没问题 但是 我的客户请求将消息保存到 DRAFTS 文件夹 以便他在实际发送消息之前对 以编程方式创建的
  • Delphi 的内存分析工具?

    我建立了一个项目并运行它 然后在 Process Explorer 中查看它 结果发现它在启动时使用的 RAM 比我想象的要多 5 倍 现在 如果我的程序运行得太慢 我会将其连接到分析器并让它告诉我什么正在使用我的所有周期 有没有类似的工具
  • 如何在拥有句柄时检查给定进程是否正在运行

    我在用ShellExecuteEx启动应用程序 成功开始阅读后TShellExecuteInfo hProcess获取已启动进程的句柄 我想定期检查我的应用程序启动的进程是否仍在运行 两个或多个同名进程可以同时运行 我想确保我的应用程序正在

随机推荐

  • 如何验证 string.Format 方法的格式

    string Format 具有以下方法签名 string Format format params 我想每次都传递自定义格式 string custFormat Hi 0 n I only care about numbers here
  • 如何使用 Require.js 实现 TinyMCE?

    我目前正在将 TinyMCE 源作为依赖项传递 然后调用 tinyMCE init 但它没有初始化 TinyMCE 当我console log TinyMCE时 它返回一个TinyMCE对象 代码示例如下 define jQuery Und
  • 我有一个国家代码列表和一个语言代码列表。如何从国家/地区代码映射到语言代码?

    当用户访问该网站时 我可以获得他们的国家 地区代码 我想用它来设置默认语言 如果需要 他们可以稍后修改 只是根据他们所在的国家 地区对他们可能会说的语言进行一般猜测 是否存在从国家 地区代码到语言代码的明确映射 我找不到 我知道并非特定国家
  • 如何在MySQL数据库中存储.text文件?

    我可以将数据文件 例如txt文件 存储到MySql服务器吗 如果可以的话 如何保存它们 您可以使用LOAD DATA INFILE读取文件的内容并将其以结构化格式存储在数据库的表中 这比在客户端上读取和解析文件然后使用多个 INSERT 语
  • 如何使用选择器设置文本大小?

    我使用选择器 但不知道如何设置文本大小 也许我做错了什么 帮助 箭头 xml
  • Doxygen 在记录 PHP 时出现奇怪的问题 if

    当我尝试记录我的项目时 我遇到了一个奇怪的问题 我有以下代码 Set default action for called controller If no action is called default index will be set
  • REST JAX-RS javax.ws.rs.ProcessingException:

    每当我的 REST 客户端代码使用以下代码调用 REST 服务时 我都会遇到以下异常 Code public void putWatcher Watcher watcher System out println In REST Client
  • JRE系统库缺少tools.jar

    我正在使用 Ubuntu 12 04 LTS 在我的 Eclipse 项目中 我需要使用 com sun tools attach 包 但是 我的 JRE 系统库不包括包含该包的tools jar 文件 我尝试为 Java 6 和 7 安装
  • 如何将 IEnumerable 转换为 ObservableCollection?

    如何转换IEnumerable to ObservableCollection 根据MSDN var myObservableCollection new ObservableCollection
  • 使用 iText 7 获取 PDF 文件的创建日期

    我必须创建一个工具 将其创建日期添加到几个 pdf 文件名中 我想使用内部存储在 pdf 中的创建日期 为此我下载了 iText Community Edition 现在 我的代码是这样开始的 VB Module Module1 Sub M
  • Android 操作系统和 postgreSQL

    我们正在进行一个 Android 项目 但需要连接到我们在其他项目中使用的 postgreSQL 服务器 关于这个起点有什么建议吗 有什么东西 有偿或无偿 可以让我们实现这一目标吗 我意识到这是一个非常普遍的问题 尽管我们在编写桌面客户端
  • Primefaces 依赖 selectOneMenu 和 required="true"

    在我的应用程序中 我有三个下拉菜单 p selectOneMenu 说A B C 其中两个是相关的 说B和C 通过更改B的值 我动态地将值加载到C 还有一个文本框 当 on change 事件从这三个下拉列表中触发时 文本框的值由 ajax
  • 让 Xcode 忽略第 3 方项目中的 LLVM 构建警告

    我的 Xcode 工作区中有一个第三方项目 它是我的主项目的依赖项 并且我希望 Xcode 忽略来自该第三方项目的所有构建警告 最好我想忽略项目中 Vendor 组的所有构建警告 因为那是我放置所有第三方代码的地方 可能的 是的 这是可能的
  • mysqli 在 PHP 7.4 中支持 caching_sha2_password 吗?

    当我尝试从 PHP 7 3 升级到 PHP 7 4 时 收到以下错误 执行 caching sha2 auth 109 时出现意外的服务器响应 据我所知 这表明 PHP 7 4 MySQLi 正在尝试使用caching sha2 passw
  • typedef 和变量名

    忽略为什么我想这样做 只是想了解这里发生的事情 此代码编译 include
  • 使用backbone.js获取集合(所有模型)的总和

    我只是在学习骨干 我有以下内容 window ServerList Backbone Collection extend model Server cpuTotal function if this length return 0 NOT
  • 为什么任务对象不使用传递给它的参数?

    我在用着Task并行处理多个请求并向每个任务传递不同的参数 但似乎所有任务都采用一个最终参数并使用该参数执行该方法 下面是示例代码 我期望输出为 0 1 2 3 4 5 6 99 但我得到 100 100 100 10 可能在调用 prin
  • Angular2 和 webpack - i18n 插件与 ng2-translate

    我想使用 angular2 构建一个 Web 应用程序并将其与 webpack 捆绑在一起 提供多种语言的最佳方式是什么 i18n 插件 https github com webpack i18n webpack plugin or ng2
  • 为什么我的过滤器版本与 Swifts 的性能如此不同?

    作为练习 我重写了一些 Swift 的高阶函数 其中一个是 filter 我决定测量我的版本 filter反对斯威夫特使用乐器 我对结果感到相当困惑 这是我的过滤器版本 我承认这可能是不正确的 extension Array func my
  • 在 Delphi 中显示某些 JPG 文件时出现问题

    我尝试使用 TImage 组件在 Delphi 中打开一些 JPEG 文件 我还添加了 Jpeg 单元 我可以打开大部分 jpg 文件 没有问题 但是当我尝试打开一些 JPG 时 程序只是抛出异常 我还尝试在设计模式下加载该图像 但存在一些