有SQL语句不能处理BLOB类型,你可用TBLOBField去处理。

解决方案 »

  1.   

    用sql语句是可以的,我见过。
    如果感兴趣,我给你找找。
      

  2.   

    insert into atable values('a',:avalue)
    params[0].value:=
    execsql
    希望对你有帮助。
      

  3.   

    我用到的例子,供参考:
    var
      Mem:TMemoryStream;
        Mem := TMemoryStream.Create;
        Mem.LoadFromFile(FileName);
        Mem.Seek(0,soFromBeginning);   
        Query1.Close;
        Query1.SQL.Clear;
        Query1.SQL.Add('INSERT INTO BLOBNAME(NAME,FILENAMES) VALUES(:NAME,:FILENAMES)');
        Query1.ParamByName('Name').AsString := FileName;
        Query1.ParamByName('FileNAMES').LoadFromStream(Mem,ftBlob);
        Query1.ExecSQL;
        Mem.Free;