5,930
社区成员
发帖
与我相关
我的任务
分享有没有这样的函数...
把字符串后面补上一定的空格的函数
例如：
strName := 'Jack'
变换成
strName := 'Jack '
例如：
strName := 'Jack'
变换成
strName := 'Jack '
...全文
请发表友善的回复…
发表回复
zfmich 2003-03-11
- 打赏
- 举报
to wolfAone(30，奋斗成男人) :
好象有吧，：）。delphi5/6都有啊。
好象有吧，：）。delphi5/6都有啊。
wolfAone 2003-03-11
- 打赏
- 举报
zfmich() ：没有StringOfChar（）函数吧？
楼主够懒的，：）
楼主够懒的，：）
wjlsmail 2003-03-11
- 打赏
- 举报
function GetIt(Var s : String;i : Integer) : Boolean ;
begin
while i > 0 do
begin
s := s + ' ' ;
Dec(i) ;
end ;
end ;
begin
while i > 0 do
begin
s := s + ' ' ;
Dec(i) ;
end ;
end ;
zfmich 2003-03-11
- 打赏
- 举报
strName := 'Jack' + StingOfChar(' ', 10);
yzdiyu 2003-03-11
- 打赏
- 举报
自己写吧,应该比较容易的.
lovelymelon 2003-03-11
- 打赏
- 举报
自己定义一个函数不就可以了
在public中定义，以后就可以调用了
只限本程序
在public中定义，以后就可以调用了
只限本程序
snooper 2003-03-11
- 打赏
- 举报
我要的可是函数呀，不能写循环语句
