var
  i: Integer;
  Countrys: string;
begin
  Countrys := 'sdfsdfsdfsdfsdf';
  atFilter.Edit();
  atFilter.FieldByName('Countrys').SetFieldType(ftMemo);
  atFilter.FieldByName('Countrys').Value := Countrys;
  atFilter.Post();
end;
countrys为一个长度为600的字符串,但插入数据库后只有300多,后面的部分没有了。郁闷!