我用DELPHI+ACCESS编程过程中在ACCESS的一张表里用OLE对象放入了JPG图形文件.但在DELPHI里面不知道怎么插入
本人的语句如下
procedure TForm2.DBImage1Click(Sender: TObject);
begin
if openpicturedialog1.Execute then
dbimage1.Picture.LoadFromFile(openpicturedialog1.FileName);
end;
还有就是有一MEMO字段在程序运行时对它进行编辑处理后一点击保存就出现
project manager.exe raised exception class eoleexception with message '多步操作产生错误.请检查第一步的状态值.'process stopped.use step or run to continue.
不知道何处出错.
本人的语句如下
procedure TForm2.DBImage1Click(Sender: TObject);
begin
if openpicturedialog1.Execute then
dbimage1.Picture.LoadFromFile(openpicturedialog1.FileName);
end;
还有就是有一MEMO字段在程序运行时对它进行编辑处理后一点击保存就出现
project manager.exe raised exception class eoleexception with message '多步操作产生错误.请检查第一步的状态值.'process stopped.use step or run to continue.
不知道何处出错.
解决方案 »
- 汇总,排序问题(急)
- 为什么form没办法释放?
- 一个ado.query的问题
- 远程文件操作!!!!
- 请问 RzCheckTree 控件怎样选中子结点的同时选中父结点?
- 请问一个函数指针的问题
- 高分彻底送,各路大哥帮帮我!!!
- 修改記錄后POST出錯信息:Insufficient key column Information for updating or refreshing
- 问几个基础知识:pchar,char far *,和一维数组变量有什么具体区别?我敢打赌,能说清的人不多于10人
- 关于fastreport的一个问题,保证送分
- 动态数组问题,多多请教,急急,delphi5环境下
- 着急啊,帮忙啊,字符串转换的问题
var
tempstream:TStringStream;
tempjpeg:TJPEGImage;
begin
try
tempstream:=TStringStream.Create(' ');
TBlobField(adodataset1.FieldByName('photo')).SaveToStream(tempstream);
tempstream.Position:=0;
tempjpeg:=TJPEGImage.Create;
tempjpeg.LoadFromStream(tempstream);
DBImage1.Picture.Bitmap.Assign(tempjpeg);
finally
tempstream.Free;
tempjpeg.Free;
end;
end;
至于你后面的问题是不是没有定义主键的原因呢?
可能我没说清楚我需要在DELPHI程序中对ACCESS的某张表中的字段插入图片.另一个问题主键在哪定义呀?我其它的MEMO字段是可以正常修改的