TOpenDialog选择文件时异常卡死并退出程序的问题

已于 2022-04-06 01:45:32 修改
阅读量406 收藏
点赞数
分类专栏： Delphi 文章标签： Delphi TOpenDialog SHDocVw
于 2022-04-06 01:45:02 首次发布
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/yanjinrong/article/details/123980927
版权

Delphi10.4.2在WIN10中，TOpenDialog在选择文件时，如果文件无法识别的，或是识别错误的，点击文件、或预览缩略图，或是选中文件后点击鼠标右键，就会报指针错误，或是整个程序直接异常卡死，然后整个程序就会被强制中断退出。但是在IDE里又可以正常打开，只是编译后执行就死机。

最典型的情况是用手机、数码相机拍的高分辨率图片，然后通过Adobe PhotoShop CC修改过的图，无论存成什么格式，大概率都会引起这种错误，

Delphi的对话框是调用的WINDOWS API，猜测就是文件格式无法识别导致的内存出错，折腾了很久，最后发现只需要引用SHDocVw单元即可。

SHDocVw是IE内核，应该是Windows的文件打开对话框调用了IE来预览文件，浪费了很多脑细胞，总算是解决了。

测试环境：Win10 Delphi10.4.2，其他版本没测试过，不知道会不会有相同的问题（D7无问题）

YanJinrong
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
OpenDialog打开多个文件
11-08
1.QQ:513187410 2.保证无毒 3.简单,方便,实用 4.实例可以自行改用 5.如有非法,本人无法律责任,由改动代码人负责！ 6.需要更多本人作品,查找标签“朱建强” 7.请下载,杀毒后再使用！
若你想知道About窗口和TOpendialog是怎么制作出来的，看看这个Demo
11-03
说明：若你想知道About窗口和TOpendialog是怎么制作出来的，看看这个Demo. 核心技术：ShowModal,ModalResult,Execute: Boolean Google搜索：Delphi,组件制作,About,TOpendialog
用Delphi实现Word文件的预览
02-23
nit PreviewWord; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB, OleCtnrs,ComObj, Buttons, Mask, DBCtrls, ExtCtrls; type TForm1 = class(TForm) ADOConnection1: TADOConnection; ADOQuery1: TADOQuery; OpenDialog1: TOpenDialog; OleContainer2: TOleContainer; DBEdit1: TDBEdit; DataSource1: TDataSource; BitBtn1: TBitBtn; Button1: TButton; Panel1: TPanel; ScrollBox1: TScrollBox; OleContainer1: TOleContainer; ScrollBox2: TScrollBox; Splitter1: TSplitter; procedure Button1Click(Sender: TObject); procedure BitBtn1Click(Sender: TObject); procedure DBEdit1Change(Sender: TObject); procedure FormCreate(Sender: TObject); private procedure s_ole_clickck(Sender:TObject;Button:TMouseButton; Shift: TShiftState; X, Y: Integer); function create_S_Ole(nn:integer):ToleContainer; procedure delete_s_ole; { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} function get_th(i:integer):string; var s:string; begin s:='一 二 三 四 五 六 七 八 九 十 十一 十二 十三'; s:=s+' 十四 十五 十六 十七 十八 十九 二十 二十一二十二二十三二十四二十五二十六二十七二十八二十九三十 '; result:=(trim(copy(s,i*6+1,6))); end;
在文件打开对话框中预览图片
07-01
在文件打开对话框中预览图片 在文件打开对话框中预览图片 在文件打开对话框中预览图片
react-面试题
最新发布
qq_16546829的博客
03-13 591
（1）受控组件在使用表单来收集用户输入时，例如等元素都要绑定一个change事件，当表单的状态发生变化，就会触发onChange事件，更新组件的state。这种组件在React中被称为受控组件，在受控组件中，组件渲染出的状态与它的value或checked属性相对应，react通过这种方式消除了组件的局部状态，使整个状态可控。react官方推荐使用受控表单组件。可以通过初始state中设置表单的默认值。
Delphi在debug过程死机怎么办
pulledup的博客
04-07 788
Delphi在debug过程死机怎么办？！ 1、怎样的调试场景？ 1.1、大容量硬盘的某个路径下存在大量的文件，调用TOpenDialog文件选择框 1.2、由于代码bug造成大量后台线程运行过程中，本机文件流读写状态不正确造成“死锁”及线程永久挂起 2、“假死机”不能得到解决的“后果” 2.1、退出不了“调试器” 2.2、只能“冷启动”计算机，即硬件电源开关重启；启动后将可能造成当初debug“写锁死”的硬盘“写保护”，只能chkdisk调用操作系统命令来“扫描和纠错”，这个过程太漫长了，
ngDialog 弹出层关闭
whh_lydia的博客
03-29 7155
做网站经常会遇到弹出对话框获取用户输入或弹出对话框让用户确认某个操作之类的情景，有一个基于AngularJS的扩展模块可以帮我们优雅地完成这类事情：ngDialog。 ngDialog在github上提供了一个示例网页，演示了它的各种用法，在这里：https://github.com/likeastore/ngDialog/blob/master/example/index.html。ngD
笔记el-dialog与el-tabs结合使用会导致页面卡死浏览器崩溃
qq_42157868的博客
05-04 435
修复方法 手写弹窗组件或者tabs组件 或者升级为新版框架。原因：版本问题的框架缺陷。
Delphi 从文件中存取组件.rar
07-10
Delphi 从文件中存取组件，实例如图所示的效果中，通过菜单命令，可清除窗口中的控件，这个控件信息保存在文件中，清除了文件内容，也就清除了控件： 　for I := self.ComponentCount - 1 downto 0 do 　begin 　if ...
20.Delphi对象式数据管理功能
javazhuanzai的专栏
02-01 449
====================================================== 注：本文源代码点此下载 ====================================================== 面向对象技术是九十年代的主流技术,各类应用软件如果以面向对象的方法构造并且渗透面向对象的风格将使软件具有更高的品质。在面向对象程序设计中,对象式数
Delphi内建异常类 异常处理参考
找个地方放一下
05-19 4876
【详细过程】 Eabort：静静的触发异常而不提示任何信息对话框，调用abort函数触发此异常； Eabstracterror：程序企图调用一个纯虚拟方法(abstract method)时产生异常； Eaccessviolcation：无效内存(memory)处理操作; Eassertionfailed：当代入asscert的函数的参数的值为false时； Econtr
ng-dialog使用心得
web_harry的博客
05-24 4162
ng-dialog使用心得 一、重写confirm()函数 1.遇到问题： 使用插件API：openConfirm(options)时报错：$scope.openConfirm() is not a function. 代码如下： $scope.confirm = function(msg) { ......some code...... $scope.openConfirm
ShowDialog 重复调用，导致卡死
layinsuo的博客
04-18 276
我们都知道模态对话框用完需要关闭，才能进行下一次的调用，如果在没有彻底关闭对话框时，再次调用，则UI容易卡死。
el-dialog中嵌套el-tabs,点击关闭按钮时页面卡死的问题
weixin_45496202的博客
06-21 685
el-dialog中嵌套el-tabs,点击关闭按钮时页面卡死的问题 在el-dialog中嵌套el-tabs时,点击关闭按钮导致页面卡死问题,是element组件的bug,把el-dialog的destroy-on-close属性去掉就好了
ngdialog使用心得
sanlingwu的博客
01-24 1903
在正在做的项目中所有的弹窗都是用ngdialog来实现的，在这里做一下总结： 1、首先在项目目录下使用npm install ng-dialog安装插件 2、将ngDialog.js，ngDialog.css和ngDialog-theme-default.css 引入项目中： 3、在控制器中声明： var APIGateway = angular.module('APIGateway',
【问题解决】-ElmentUI中dialog弹出窗关闭卡死崩溃问题解决
gjb760662328的博客
05-09 1580
elementui-弹窗关闭卡死
用gulp压缩js时，ngDialog弹窗出错
weixin_30483013的博客
01-17 55
出错的写法： ngDialog.open({ template : 'html/**.html', className : 'ngdialog-theme-plain', width : '60%', scope : $scope, cache : false, ...
delphi android选择文件对话框
07-24
在OnClick事件中，我们将使用TOpenDialog的Execute方法来显示选择文件对话框，并等待用户选择文件。一旦用户选择了文件，我们就可以使用TOpenDialog的FileName属性获取用户选择的文件名。 接下来，我们可以使用该...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值