错误提示:MySQL server has gone away如果文件只有几十K大小,就没有问题!代码:
  ssql:= 'select id,doc from table1 where id =1' ;
  FSQLDataSet.CommandText := ssql;
  FSQLDataSet.Open;  FCDS.Close;
  FCDS.Open;
  FCDS.Edit;
  TBlobField(FCDS.FieldByName('doc')).LoadFromStream(AMStr);
  FCDS.Post;
  FCDS.ApplyUpdates(0);   //这句出错了!!!
  FCDS.Close;
  FSQLDataSet.Close;

解决方案 »

  1.   

    设置一下数据库连接的超时时间,设长一点。
    你用的是什么连接mysql啊?
      

  2.   

    数据库字段足够是longblob,长度有16777215
    我连接数据库用的是DBExpress,delphi6
    不知道在哪里设置数据库的连接超时时间?
    谢谢!
      

  3.   

    如果你的控件用的是BDE的话,
    你需要改你的连接BDE的Blob size属性,以K为单位, 如32表示最大32k
      

  4.   

    我用的是dbexpress+SQLQuery
    大于600K的文件就不行!!!!!
    dbExpress的blob size已经设置为-1,SQLQuery的MaxBlobSize也设置为-1了。可还是不行。直接在DOS下对数据库操作插入700K的内容都可以!!!
    非常着急!
      

  5.   

    感谢大家。问题已经解决
    在my.ini中设置set-variable = max_allowed_packet=3M(或者更大),却省为1M