amo: 想简单的话这样 [阅读: 348] 2005-03-24 13:47:21 str1,str2:ansistring; ...... var strs : TStrings; begin strs := TStringList.Create; try strs.CommaText := str1; str2 := strs.Text; finally strs.free; end; end; oooO ↘┏━┓ ↙ Oooo ( 踩)→┃你┃ ←(死 ) \ ( →┃√┃ ← ) / \_)↗┗━┛ ↖(_/