delphi 怎样把一篇文章读入Memo时,去掉所有的回车换行,并使memo的内
1个回答
展开全部
opendialog1beign if onendialog1.execute then begin memo1.loadfromfile(opendialog1.filename); for i 0 to memo1.lines.count-1 do begin for J 1 to length(memo1.lines ) do if (copy(memo1.lines ,J,1) = '#10') or (copy(memo1.lines ,J,1) = '#13') then copy(memo1.lines ,J,1) #0; end; end;end; 查看原帖>>
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询