Delphi 字符串去掉前面指定的字符

你可以使用 Delphi 中的 `TrimLeft` 函数来去掉字符串前面指定的字符。具体操作如下：

var
  str: string;
begin
  str := '***Hello, World!';
  str := TrimLeft(str, '*'); // 删除前面的 "*" 字符
  ShowMessage(str); // 显示结果为 "Hello, World!"
end;

其中，`TrimLeft(str, '*')` 表示删除字符串 `str` 前面的所有 "*" 字符。如果你想删除多个字符，可以将它们放在第二个参数中，例如 `TrimLeft(str, '*!')` 表示删除字符串 `str` 前面的所有 "*" 和 "!" 字符。

相关问题

Delphi 字符串去掉前面指定的字符串

你可以通过循环调用 `Pos` 函数以及 `Copy` 函数来实现去掉字符串前面指定的字符串。具体操作如下：

var
  str: string;
  prefix: string;
begin
  str := 'Delphi is a great programming language!';
  prefix := 'Delphi is ';
  while StartsText(prefix, str) do // 判断字符串前缀是否匹配
    str := Copy(str, Length(prefix) + 1, Length(str) - Length(prefix)); // 去掉匹配的前缀
  ShowMessage(str); // 显示结果为 "a great programming language!"
end;

其中，`StartsText(prefix, str)` 用于判断字符串 `str` 是否以字符串 `prefix` 开头。如果是，就使用 `Copy` 函数将字符串前缀去掉。循环直到字符串前缀不再匹配为止。

Delphi 字符串去掉前面的一段字符

你可以使用 Delphi 中的 `Delete` 函数来去掉字符串前面的一段字符。具体操作如下：

var
  str: string;
begin
  str := 'Hello, World!';
  Delete(str, 1, 7); // 删除前面的 7 个字符
  ShowMessage(str); // 显示结果为 "World!"
end;

其中，`Delete(str, 1, 7)` 表示从字符串 `str` 的第一个字符开始，删除 7 个字符。