社区
语言基础/算法/系统设计
帖子详情
deiphi编程小问题
poplic_660
2008-07-17 09:23:58
求一个用deiphi写的function用来解决字符串输出问题
如:有
var
str : string;
str:='123/456/789/911/grthrtur';
希望通过这个function达到输出的效果为:
123
456
789
911
希望有高手能解决下
...全文
135
14
打赏
收藏
deiphi编程小问题
求一个用deiphi写的function用来解决字符串输出问题 如:有 var str : string; str:='123/456/789/911/grthrtur'; 希望通过这个function达到输出的效果为: 123 456 789 911 希望有高手能解决下
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
14 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
poplic_660
2008-07-17
打赏
举报
回复
问一下怎么放?
我弄进去效果不是我要的那效果
matianpeng
2008-07-17
打赏
举报
回复
用writeln()?
BambooCaep
2008-07-17
打赏
举报
回复
[Quote=引用 10 楼 poplic_660 的回复:]
问一下 str:=123/321/3122/3545453
我不想输出'/'最后一个字符串怎么办?
只输出:
123
321
3122
[/Quote]
放在TStringList里,去掉最后一行。
poplic_660
2008-07-17
打赏
举报
回复
问一下 str:=123/321/3122/3545453
我不想输出'/'最后一个字符串怎么办?
只输出:
123
321
3122
BambooCaep
2008-07-17
打赏
举报
回复
StringReplace(Str, '/', #13#10, [rfReplaceAll]);
poplic_660
2008-07-17
打赏
举报
回复
不行```
gyk120
2008-07-17
打赏
举报
回复
sl.Delimiter :='/';
sl.DelimitedText := '123/456/789/911/grthrtur';
for i :=0 to sl.Count -2 do
ShowMessage(sl.Strings[i]);
sl.Free;
这个行不行?
poplic_660
2008-07-17
打赏
举报
回复
主要是通过/来分离各字符串
最后一个/之后的内容不要
gyk120
2008-07-17
打赏
举报
回复
var
sl: TStringList;
i : Integer;
begin
sl := TStringList.Create;
sl.Delimiter :=',';
sl.DelimitedText := 'sgdfg,dfgdfg,dfgdfg,dfgdfgdf';
for i :=0 to sl.Count -1 do
ShowMessage(sl.Strings[i]);
sl.Free;
end;
这个呢?
gyk120
2008-07-17
打赏
举报
回复
这个有些不好办,连+号也不能?
如果可以用+号的话
str:='123'
+
'456';
这样也行
poplic_660
2008-07-17
打赏
举报
回复
分今天我不能加上去了.有能帮忙的我明天加上去分再结帖就行了
不能在 str里加任何东西.需要把str分离出来
如一个固定字符串 str:='123/456/789/911/grthrtur';
需要通过funtion(str :string):string;
输出:
123
456
789
911
gyk120
2008-07-17
打赏
举报
回复
其实就是个换行符的问题,一般的编程类书籍上面都讲过了吧?
gyk120
2008-07-17
打赏
举报
回复
又见0分帖……
加入#13#10即可
比如
'123'+#13+#10+'456'
poplic_660
2008-07-17
打赏
举报
回复
恩,问题解决了.我明天加了分结帖
delphi 的USB设备读写(HID)
delphi 整理的一个 HID 硬件的USB接口的读写程序,经过delphi6 windows2003测试通过。
Delphi源代码大集合
Delphi源代码大集合 包括方面很全的。 本站收集提供下载,强烈推荐。
Delphi xe6 Android
编程
入门
200元买的书的资料,和大部分代码。大家可以参考一下,不过,说实话,不值200元,代码都是英文例子,直接汉化一下中文,就出书了,没有详细的讲解代码和函数,没有函数手册,都是堆砌代码,抄袭copy人家的例子和代码,堆成一本书;可读性很差,根本没有讲解,很难理解。大家参考看看吧。我就不做过多评论了。
Delphi7完美经典.pdf
Delphi7完美经典.pdf Delphi7完美经典.pdf
Delphi反编译工具
超猛的可以反编译Delphi、C++ bulider程序的源代码-bets can decompile the Delphi, C bulider program's source code!
语言基础/算法/系统设计
16,747
社区成员
33,239
社区内容
发帖
与我相关
我的任务
语言基础/算法/系统设计
Delphi 语言基础/算法/系统设计
复制链接
扫一扫
分享
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章