DBMemo用空格符代替换行符 问题如题!现在是用手工进行操作,所以比较麻烦!要怎么设置,请不吝赐教!谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.DBMemoKeyPress(Sender: TObject; var Key: Char);begin if Key = Char(' ') then Key := #13;end; procedure TForm1.Table1YouFieldGetText(Sender: TField; var Text: String; DisplayText: Boolean);begin Text := StringReplace(Text, #13#10, #32, [rfReplaceAll]);end; zswang(伴水清清)(专家门诊清洁工):我试过了,但是还是不行!不知道是我用错了,还是真的不能替换!我是想对数据库的一个字段进行换行符替换,比如:DBMemo.Lines.add(...);//一行一行的添加数据 DBMemo指向字段A1,就是希望能把DBMemo的换行符替换成空格符该怎么用才可以达到目的!还请用一个具体的例子说明一下!谢谢! 可能是因为你没的找到Table1YouFieldGetText事件是吧;或者,你的字段里根本就没有空格 delphi 如何通过线程来启动RemoteDataModule 大家好,新手问题。请多帮忙 点击ListView问题? BDE如何安装 大家的ICO图标是哪儿找的? 急,请教高手,关于图片数据库流读取出现的一个问题! 在程序关闭时要执行对数据库操作,如过连接不到数据库程序打开后就关闭不了,总抱错。怎么办? 如何判断两条曲线走势是否一致 那位大虾可以介绍一下deliph下具有强大功能的报表控件啊!急用! 还是昨晚的问题,搞过汉字词库处理的同志请进 编写SQL语句格式化的算法 在dbgrid表里显示某一列是另一个表中的ID值,想替换成另一表中的对应文本字段怎么弄?
begin
if Key = Char(' ') then
Key := #13;
end;
DisplayText: Boolean);
begin
Text := StringReplace(Text, #13#10, #32, [rfReplaceAll]);
end;
我试过了,但是还是不行!
不知道是我用错了,还是真的不能替换!我是想对数据库的一个字段进行换行符替换,
比如:DBMemo.Lines.add(...);//一行一行的添加数据
DBMemo指向字段A1,就是希望能把DBMemo的换行符替换成空格符该怎么用才可以达到目的!
还请用一个具体的例子说明一下!谢谢!
或者,你的字段里根本就没有空格