delphi保存附件到access,怎么实现? 最好有代码

var
s5, m:TMemoryStream;
m:=TMemorystream.Create;

m.LoadFromFile(opendialog1.FileName);
adoquery1.Parameters.ParamByName('s5').LoadFromFile(m,ftblob)
这段代码执行后提示 incompatible tyepes :"string" and "tmemorystream"

求高手指点

第1个回答  2024-04-09
LoadFromFile --> LoadFromStream
相似回答