关于delphi读取jpg的例子网上很多,大多数都能实现功能。近来做个项目需要读取jpg文件并保存到sql数据库中,本来觉得没什么,结果浪费了两天的时间。
和大多数情况不同的是,我需要读取一个大于10M的jpg文件到image控件中,发现一直再报错。由于开始没有测试,所以后来只能一行行屏蔽掉代码验证错误的地方,最终屏蔽掉大部分代码后发现,根本就是以下四句的问题。
jpg := TJPEGImage.Create;
jpg.LoadFromFile(OpenDialog1.FileName);
Image1.Picture.Bitmap.Assign(jpg);
jpg.Free;
后来编译了一下delphi安装程序自带的例子发现该程序也再报错,至今没有找到问题所在。所以目前只能使用bmp文件进行操作。
关于delphi自带读取图片到image控件的例子在C:\Program Files\Borland\Delphi7\Help\Examples\Jpeg,其中横线部分为delphi安装目录。
有知道问题所在或解决办法的请告之一下,在此先表示感谢。