社区
Delphi
帖子详情
关于Memo中字符串的问题!
tibet
2000-06-12 09:03:00
我想通过Pos(chr(13),Memo1.Lines[IntRow])来获取任意一行回车符的位置,但是得到的值始终是0,为什么?不知哪位大侠另有高见,请指教!
...全文
223
7
打赏
收藏
关于Memo中字符串的问题!
我想通过Pos(chr(13),Memo1.Lines[IntRow])来获取任意一行回车符的位置,但是得到的值始终是0,为什么?不知哪位大侠另有高见,请指教!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
LaoZheng
2000-06-22
打赏
举报
回复
获取任意一行回车符的位置=length(memo1.lines[introw])
7030
2000-06-22
打赏
举报
回复
我用的是如下方法,就不会为0了:
pos('#$D#$A',memo1.lines[introw])
H999
2000-06-21
打赏
举报
回复
Pos(chr(13),Memo1.Lines[IntRow])为0,
是因为Memo1.Lines[IntRow]中本来就没有chr(13).
Memo1.Lines 属于 Tstrings 类,
而每一行strings[row]中,不可能有chr(13),
因为chr(13),是它的行结束标志之一。
memo1.lines[row]是没有chr(13)的。
pos(chr(13),memo1.text)能找到#13的位置.
用stream也可以。
fzm2000
2000-06-21
打赏
举报
回复
zyc说得对,另外还可以用Stream实现。
ocean_boy
2000-06-13
打赏
举报
回复
得到值为0的原因是没有找到,应该用这条语句Pos(chr(#13),Memo1.Lines[IntRow])
hhzh426
2000-06-13
打赏
举报
回复
用pos(chr(13),memo1.text)可以得到memo1中的换行符,memo中并没有所谓的软回车,每输入一个回车符就表示增加一段,也就是lines.count加1
zyc
2000-06-12
打赏
举报
回复
我不知道你要找回车符来干吗. 在Delphi中, 碰到回车符就认为是换行, 所以你以取出一行的办法, 取也的字符串中是不包含回车符的, 也就你写的语句返回值为0的原因.
其实, 要知道Memo中的回车符的位置不难, 有几种办法可行:
1.将整个的memo作为一个字串来看待, 然后再在里面查找回车就可以啦.
2.每一行行的长度加2就是回车符的位置.
在
memo
中
查找
字符串
function Search
Memo
(
Memo
: TCustomEdit; const SearchString: string; Options: TFindOptions): Boolean; var Buffer, P: PChar; Size: Word; begin Result := False; if Length(SearchString) = 0 then ...
Delphi T
Memo
字符串
的查找完全实现
这是早上传的发现有
问题
不能在Delphi Xe5
中
运行 但能在Delphi7
中
运行 我想删除它也没权限 http://download.csdn.net/detail/teststudio/6404077 所以重传下 Delphi T
Memo
字符串
的查找完全实现 已经完全的解决...
Delphi 在
字符串
中
使用单引号.rar
本Delphi实例演示如何在
字符串
中
使用单引号的方法,属于
字符串
处理的范畴,我们编写以下代码实现这个功能: begin //普通的SQL查询语句 SQL := 'Select * From MR_Login';
Memo
1.Lines.Add(SQL); //带单...
字符串
工具(内附源程序)
生成如下
字符串
的例子: A
字符串
50
字符串
B A
字符串
51
字符串
B A
字符串
52
字符串
B A
字符串
53
字符串
B A
字符串
54
字符串
B A
字符串
55
字符串
B
phc-format::
memo
:Node.JS的PHC
字符串
格式实现
phc格式 :
memo
: PHC
字符串
格式串行器/解串器编码为 :red_heart: 作者西蒙妮·普里马罗萨( Simone Primarosa) 。 动机PHC
字符串
格式是一种尝试,它指定一种公共哈希
字符串
格式,该格式是Modular Crypt Format的受限...
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章