为什么行尾的符号字符(10)会丢失？

Question

在我的例子中，当我在Delphi中得到字段时，在行的末尾丢失了一个符号$A。我认为，问题在于FireDac组件。我使用Delphi10.1柏林和Sqlite (我不知道一个版本)。当我在下面启动程序时，消息中的结果是3!=4。这是代码：

FD := TFDQuery.Create(nil);
FD.Connection := FDConnection1;
FD.ExecSQL('create table t2 (f2 text)');
FD.ExecSQL('insert into t2 values(''123''||char(10))');
FD.Open('select f2, length(f2) as l from t2');
ShowMessage(IntToStr(Length(FD.FieldByName('f2').AsString))+'!='+FD.FieldByName('l').AsString);

最后一个符号$A丢失了。也许有人能解释我这种奇怪的行为。

Answer 1

您需要关闭TFDQuery.FormatOptions.StrsTrim属性：

控件从字符串值中移除尾随空格，从二进制值中移除零字节。 ..。 对于SQLite，此属性应用于所有字符串列。