2011 年 8月 29 日随笔档案 - del88

2011年8月29日

摘要： procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str := Memo1.Text; str := StringReplace(str, sLineBreak, '', [rfReplaceAll]); M 阅读全文

posted @ 2011-08-29 23:41 del88 阅读(18) 评论(0) 推荐(0) 编辑