你在数据库中测试过了吗?在Delphi中:
dsMaxStringSize = 8192; { Maximum string field size } //四千个多个汉字!!!!procedure TStringField.SetAsString(const Value: string);
var
Buffer: array[0..dsMaxStringSize] of Char;
begin
StrLCopy(Buffer, PChar(Value), Size);
if Transliterate then
DataSet.Translate(Buffer, Buffer, True);
SetData(@Buffer);
end;
dsMaxStringSize = 8192; { Maximum string field size } //四千个多个汉字!!!!procedure TStringField.SetAsString(const Value: string);
var
Buffer: array[0..dsMaxStringSize] of Char;
begin
StrLCopy(Buffer, PChar(Value), Size);
if Transliterate then
DataSet.Translate(Buffer, Buffer, True);
SetData(@Buffer);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货