使用delphi将'Manual[123,002]'分开
时间: 2024-01-20 21:02:33 浏览: 92
Delphi下ClientDataSet使用例子
可以使用 Delphi 中的字符串处理函数 `Pos` 和 `Copy` 来分开字符串。
例如,你可以使用以下代码来将字符串 `'Manual[123,002]'` 分开:
```delphi
var
s: string;
leftBracketPos, rightBracketPos, commaPos: Integer;
manual, num1, num2: string;
begin
s := 'Manual[123,002]';
leftBracketPos := Pos('[', s);
rightBracketPos := Pos(']', s);
commaPos := Pos(',', s);
manual := Copy(s, 1, leftBracketPos - 1);
num1 := Copy(s, leftBracketPos + 1, commaPos - leftBracketPos - 1);
num2 := Copy(s, commaPos + 1, rightBracketPos - commaPos - 1);
end;
```
在上面的代码中,我们使用 `Pos` 函数来查找左括号、右括号和逗号出现的位置,然后使用 `Copy` 函数来截取相应的子字符串。最后,我们将 `'Manual'`、`'123'` 和 `'002'` 分别存储到 `manual`、`num1` 和 `num2` 变量中。
阅读全文