我写了段程序,大意如下如下:
begin
InitValueList:=TStringList.Create;
InitValueList.Delimiter:=',';
InitValueList.CommaText:=edit1.text
for i := 1 to j do
StringGrid1.Cells[3,i]:= InitValueList.Strings[i-1];
可是,当edit.text:='1 2 3 4,5'时,输出结果是
1
2
3
4
5
而不是
1 2 3 4
5
何解?
我记得CommaText默认是逗号分行,我还特意定义了一下,结果还是出错.初学delphi,请大家不吝赐教^_^
begin
InitValueList:=TStringList.Create;
InitValueList.Delimiter:=',';
InitValueList.CommaText:=edit1.text
for i := 1 to j do
StringGrid1.Cells[3,i]:= InitValueList.Strings[i-1];
可是,当edit.text:='1 2 3 4,5'时,输出结果是
1
2
3
4
5
而不是
1 2 3 4
5
何解?
我记得CommaText默认是逗号分行,我还特意定义了一下,结果还是出错.初学delphi,请大家不吝赐教^_^
解决方案 »
- 谁做过这样的功能
- 小弟初学者,问一个很简单的问题,会点的都能回答,谢谢。
- IDHTTP实现登录QQ网站
- 困擾了很久的串口通訊的問題,使用SPCOMM接收的問題,啊!!!!!!求教啊
- Delphi下一版本,代号TIBURON
- TClientDataSet 多字段匹配查找问题?LookupKeyFields
- 如何使DBGRID中的某一列的内容以一定的格式输出?
- 求GPRS或者MODEM的拨号程序,功能如下。。。
- 一个最简单的问题
- 使用DELPHI+SQL做仓储管理,企业人事管理和网上图书馆等软件能在深圳混口饭吃吗?
- 僵哥,我想请问下载delphi下如何写这个函数。
- 100分求dll深入学习的一些资料
//InitValueList.CommaText:=edit1.text
改为
InitValueList.DelimitedText := edit1.text;
'1 2'赋给stringgrid得出的结果还是
1
2
而不是
1 2
哪里错了呢?
但是我还是想知道,之前错误的原因.
毕竟StringReplace是迂回路径