如何删除最后一个字符

Question

如何用substring或其他东西删除String的最后一个字符？

例如;

var
  query : String;
begin
  query:= 'test=1&line=5&'; 
end;

输出必须是：

query -> test1&line=5

Answer 1

第三种选择是这样的：

SetLength(Query,LENGTH(Query)-1)

Answer 2

尝试这个：

var
  query : String;
begin
  query:= 'test=1&line=5&';
  delete(query,length(query),1);

Answer 3

我想我会这样写：

NewValue := OldValue.Substring(0, OldValue.Length - 1);

我认为函数接口，即返回新值的函数，通常比具有副作用的过程更受欢迎。 我发现赋值运算符是一个明确的指示符，表明正在为变量赋值。 当您希望将新值存储在与原始值不同的变量中时，使用函数方法可以使语法更加清晰。

Answer 4

我实际上将这个用于另一个叫做“从字符串中删除最后5个字符”的答案，可能不是最好的方法，但它适用于简单的字符串，因为＃0表示字符串的终止。

为你的例子

Query[Length(Query)]:= #0;

对于其他主题示例，我无法回复

str[Succ(Length(str)) - 5]:= #0;
showmessage(str);

我会投票给HeartWare答案，因为这样做是更可接受的方式。 我只是为简单的字符串显示一个具有所需效果的快速替代品（主要是为了隐藏删除最后5个字符的其他主题）

Answer 5

var
test: System.String;
begin
  test := 'Sample Text To Delete Last Character;!';
  test := Copy(test,1,length(test)-1);
  ShowMessage(test);
end;

变量已建立;
SampleText提供给Variable;
变量然后在Copy命令中引用它本身
Copy命令通过从索引1（长度）-1开始的长度来处理变量字符串
它将结果返回给变量本身;
消息用于显示结果;

结果就是没有感叹的文字; //示例文本删除最后一个字符;