Y yytxt Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-17 #1 请问各位高手： 有没有一个这样的函数可以将一个字符串以空格进行分割，形成数个子字符串？
Y yangxiao_jiang Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-17 #2 好象没有，你自己写一个吧，判断字符是不是空格（用ASCII），进行分割
Z zhliangming Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-17 #4 TStringList可以完成。你可以用DelimitedText及Delimiter属性。
T tinytao Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-17 #5 有，是用 字符串替换函数，把空格换成 #13#10，已得要加参数 [All...] 我现在没有Delphi, 你查一查帮助吧。
A aizb Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-17 #6 procedure TForm1.Button1Click(Sender: TObject); Var s:String; begin s:='sddssd gffggf ghhjhjdfdf bnbvgfdfrr dfgfgfgfgf'; s:=StringReplace(s,' ',#13#10,[rfReplaceAll,rfIgnoreCase]); ShowMessage(s); end;
procedure TForm1.Button1Click(Sender: TObject); Var s:String; begin s:='sddssd gffggf ghhjhjdfdf bnbvgfdfrr dfgfgfgfgf'; s:=StringReplace(s,' ',#13#10,[rfReplaceAll,rfIgnoreCase]); ShowMessage(s); end;
