deiphi编程小问题

2008-07-17 09:23:58 185 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

如何利用URDF文件表示并联结构(仅适用于支持SDF格式的仿真环境) 介绍了一种使用URDF文件在Gazebo中表示并联结构的方法，该方法使用了URDF的SDF拓展。在一个具有并联结构的双足机器人上应用并演示了此方法的有效性。阅读详情

求一个用deiphi写的function用来解决字符串输出问题
如:有
var
str : string;
str:='123/456/789/911/grthrtur';
希望通过这个function达到输出的效果为:
123
456
789
911
希望有高手能解决下

...全文

SAP ABAP VL09 BAPI VL 216 ls_batch_item-fact_unit_denom = ls_lips_split-umvkn. "销售数量转换为 SKU 的值（分母）ls_batch_item-fact_unit_nom = ls_lips_split-umvkz. "销售数量转换成SKU的分子(因子)ls_batch_item-sales_unit_iso = ls_lips_split-meins. "被拆分DN基本单位。阅读详情

poplic_660

语言基础/算法/系统设计 16,741 成员 33,233 内容

+ 关注 + 加入社区

切换为时间正序

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

打赏
举报

恩,问题解决了.我明天加了分结帖

deiphi编程小问题

相关推荐