菜鸟想去掉memo1.text里的所有'#$D#$A'字符,注意有'',如何做到呢???(69分)

  • 主题发起人 主题发起人 wanglong1
  • 开始时间 开始时间
W

wanglong1

Unregistered / Unconfirmed
GUEST, unregistred user!
菜鸟想去掉memo1.text里的所有'#$D#$A'字符,注意有'',如何做到呢??
 
你查看一下你要去掉字符的ASC碼,然後在memo1.text查找。
比例D的ASC碼是68,然後在memo1.text查找,if 字符=68的,就去掉
 
这个好像是换行符留着不影响的!
 
好像一个是换行一个是回车。
StringReplace(memo1.text, '#$D#$A', '', [rfReplaceAll]);
 
memo1.text := StringReplace(memo1.text, '''#$D#$A''', '', [rfReplaceAll]);

不知道我有没有理解对
 
这个问题正好前几天我也遇到过,不过不是在memo里遇到的,是在TStringlist中遇到的,原因是当我给一个字符串赋值的时候使用的是
var
str:string;
list:Tstrings
...
...
str:=list.text;//这样就会有你上面说的到符号,我是朝数据库添加出错的时候发现的

后来改了一下,就OK了。
str:='';
for I:=0 to list.count-1 do
str:=str+list;
//这样就没有了:)
memo我没试过,但是估计原因是一样的:)
 
解决问题就要给分哦!
 
同意smithcouple说的,在delphi中字符串''可以代表一个'字符 刚开始不太好理解可以用
memo1.text := StringReplace(memo1.text, chr(39)+'#$D#$A'+chr(39), '', [rfReplaceAll]);
 
后退
顶部