文件保存到数据库问题！！！！！！！！！！！！

Question

我用adoquery 能成功比如：
Files:='aaa.emt';
adoquery1.active:=true;
adoquery1.append;
adoquery1.fieldbyname('id').asinteger:=1;
adoquery1.fieldbyname('filename').asstring:='aaa.emt';
TBlobField(adoquery1.fieldbyname('EmtFile')).LoadFromFile(Files);
adoquery1.post;如果我是用BDE 应该怎么写？qcx:tquery;with qcx do
   begin
       close;
       sql.clear;
       sql.add('insert into blmb (id,filename,EmtFile)');
       slq.add('values((:id),(:fieldname),(:EmtFile) )');
       Parambyname('id').asinteger:=1;
       Parambyname('Filename').asstring:=files;
       parambyname('EmtFile').LoadFromFile(files,???);
       execsql;
   end;执行不成功，????为TBLOBtype 不知写什么类型？请指点

Answer 1

parambyname('EmtFile').LoadFromFile(files,ftBlob);

Answer 2

Files:='aaa.emt';
adoquery1.active:=true;
adoquery1.append;
adoquery1.fieldbyname('id').asinteger:=1;
adoquery1.fieldbyname('filename').asstring:='aaa.emt';
TBlobField(adoquery1.fieldbyname('EmtFile')).LoadFromFile(Files);
adoquery1.post;
==============================
把adoquery1这个控件直接换成BDE的query控件不行吗?

Answer 3

parambyname('EmtFile').LoadFromFile(files,???);
红色部分应该是加载文件的方式选择