3.2w+
社区成员
- 主页
- 基础类
- 应用实例
- 新技术前沿
各位大虾：ado是不是对imange型的字段不很好用？如何解决？
用ado使一个结果集对另一个结果集赋值时，即recordeset1.fields(1).value=recordset2.fields(1).value,若fields(1)是image型字段,则这个语句无法执行。
我用的ado连接是：connectstring="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=mydb;"
请问如何解决？
我用的ado连接是：connectstring="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=mydb;"
请问如何解决？
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
pengdali 2003-01-13
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ADOTable1.Append;
TBlobField(ADOTable1.FieldByName('FImage')).LoadFromFile(OpenPictureDialog1.FileName);
ADOTable1.Post;
end;
begin
if OpenPictureDialog1.Execute then
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ADOTable1.Append;
TBlobField(ADOTable1.FieldByName('FImage')).LoadFromFile(OpenPictureDialog1.FileName);
ADOTable1.Post;
end;
