操作系统: WindowsXp 编程工具: Delphi7 问题: 如何分离一行文字? 比如 1234$abcd$xyz 我只知道VB可以用Split(s,'$')。请问使用Delphi能做到吗? 水平: 刚入门(Mac) Delphi有一个ExtractStrings函数。该函数定义为: type TSysCharSet = set of Char; function ExtractStrings(Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer; Separators是分割符号的集合,而WhiteSpace是表示空格的集合。该函数按照分割符号分割字符串。 对于你的例子,可以这样: ExtractStrings(['$'], [' '], '1234$abcd$xyz', memo1.Lines); 另外,再提供一个例子: ExtractStrings([DateSeparator], [' '], PChar(DateToStr(Now)), memo1.Lines);
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18