将字符串与数字相乘

时间:2012-04-08 15:07:01

标签: delphi delphi-7

我如何将一个字符串乘以一个数字,以在标签标题中实现该字符串的n次重复,即    如果n = 5,那么's'* n ='sssss'将成为标签标题。

沿着这些行的任何内容都会返回操作符不适用于操作数类型的错误。 感谢

2 个答案:

答案 0 :(得分:10)

没有内置的运算符可以满足您的需求。您的代码可以在Python中使用,但在Delphi中则不行。

如果您的字符串是单个字符,那么您可以使用StringOfChar

Caption := StringOfChar('s', n);

对于较长的输入字符串,请使用StrUtils单元中的DupeString

Caption := DupeString('blah', n);

答案 1 :(得分:6)

Delphi不允许这种语法。但是,DupeString中有一个名为StrUtils.pas的函数,它的含义相同:

Label1.Caption := DupeString('test', 4);