求高手指点!现有一个icon是combobox,items中为图片名,如1.bmp 2.bmp 另还有一个图片控件image1 我要实现的效果是当从icon中选择一项后,如选择1.bmp后,image1中显示相应路径的图片。路径为:E:\程序\icons\1.bmp
我写的代码是:icon的onchange事件时,
Image1.Picture.LoadFromFile('E:\毕业设计\icons\'''+trim(icon.Text)+'''') ;
但是运行后,我选择1.bmp后,报错:unknown picture file extension (.)
这是怎么回事?扩展名不识别吗?但是我单独用image1可以将1.bmp的图片显现啊?
***********************************************************************
同时,在保存时,我想将图片提交到数据库表中,对应数据表的字段名为icon 类型为OLE 对象
在提交的时候我应该怎么写啊?fieldvalues['icon']:= image1.Picture.?;
************************************************************************
求指点!我已经纠结很长时间了。
我写的代码是:icon的onchange事件时,
Image1.Picture.LoadFromFile('E:\毕业设计\icons\'''+trim(icon.Text)+'''') ;
但是运行后,我选择1.bmp后,报错:unknown picture file extension (.)
这是怎么回事?扩展名不识别吗?但是我单独用image1可以将1.bmp的图片显现啊?
***********************************************************************
同时,在保存时,我想将图片提交到数据库表中,对应数据表的字段名为icon 类型为OLE 对象
在提交的时候我应该怎么写啊?fieldvalues['icon']:= image1.Picture.?;
************************************************************************
求指点!我已经纠结很长时间了。
var
ms:TMemoryStream;
begin
ms:=TMemoryStream.Create;
Image1.Picture.Bitmap.SaveToStream(ms);
ms.Position:=0;
//下面这句代码是主要的保存代码,其它的就省略了
TBlobField(fdata.ADOQuery1.FieldByName('ty')).LoadFromStream(ms);
end;