走过路过,请不要错过...50轻松送 各位老鸟们,请问在Delphi 中的 ExtractStrings 字符串分割函数 是否可以以#13(回车),#10(换行),#0(字符串结束符),来分割么?如果可以分割需要有什么注意的么? 这个语言我刚接触,什么都不懂,望海涵 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 dephi真的不懂,怎么发到.net版了?其实可不可以不用问,试一下就知道了。 说真的,我建议你自己构造一个包括了#13(回车),#10(换行),#0(字符串结束符)在内的字符串,然后尝试用ExtractStrings进行分割。这样比你直接从这里捡一个答案更能加深你的印象。 你知道吧,我进Delphi场子去发个帖,几天都没人看,然后我一仔细看里面其他人的发帖时间,都是很久以前的。那里面根本就没人啊 语法结构:function ExtractStrings(Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer;其中:【Separators 是一个字符的集合,他被当作分隔符,分割字串。 回车、换行 和引号(单/双)总是被当作分隔符。.......】procedure TfrmBaseRequestTemplate.Button2Click(Sender: TObject);var strLst:TstringList; str:string;begin str:='66,77,88,,99'; strLst:=TstringList.Create; ExtractStrings([','],[],Pchar(str),strLst); //strLst.Text:=stringReplace(str,',',#13#10,[rfReplaceAll]); showmessage(strLst.Text); strLst.Free;end; 我也有这么想过,不过我连Delphi第一个项目都没创建过,现在手上拿的都是已经做好了的,需要改变一下算法来提升性能,索性就来这里直接问人了,今天得忙着交个方案 taomanman 大哥, 你意思是说ExtractStrings 函数默认分割就是按照回车,换行,引号,还有,ExtractStrings 分割出来的返回类型是integer,而不是像java里面返回的数组么? 这玩意不懂,只关注net的飘过 dephi , 导演放错片啦 Delphi 场地放不了片 O.O 太久不用了,不过应该是chr(13)之类的吧 C#如何进行数据运算! 鼠标 移动 div 十万火急,遇到一个怪问题! 蜘蛛大搜捕 —— 找到访问你的网站的蜘蛛(机器人)。蜘蛛名称补充及疑惑? e.Item.Attributes.Add()的用法? 如何解决 TREEVIEW 刷新时候闪索的问题 如何写CSS来控制datagrid的样式呢? 我怎么点击一个按钮(不是文件按钮),就弹出上传文件的那个对话框?然后上传 初学者的疑问! 动态添加的空间如何修改属性? 双击repeater的某一行 弹出新的窗体赋值到新窗体的各个控件 js中alert怎么在弹出的窗体的文字中加入超链接?
其实可不可以不用问,试一下就知道了。
你知道吧,我进Delphi场子去发个帖,几天都没人看,然后我一仔细看里面其他人的发帖时间,都是很久以前的。那里面根本就没人啊
function ExtractStrings(Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer;
其中:
【Separators 是一个字符的集合,他被当作分隔符,分割字串。 回车、换行 和引号(单/双)总是被当作分隔符。.......】
procedure TfrmBaseRequestTemplate.Button2Click(Sender: TObject);var
strLst:TstringList; str:string;begin str:='66,77,88,,99'; strLst:=TstringList.Create;
ExtractStrings([','],[],Pchar(str),strLst); //strLst.Text:=stringReplace(str,',',#13#10,[rfReplaceAll]); showmessage(strLst.Text); strLst.Free;end;
我也有这么想过,不过我连Delphi第一个项目都没创建过,现在手上拿的都是已经做好了的,需要改变一下算法来提升性能,索性就来这里直接问人了,今天得忙着交个方案