delphi 在一长字符串中提取字符串数组函数

type
TArr = array of string; //字符串数组

// 举例 G01X00Y1.1Z123 转换成 G01， X00 ，Y1.1 ，Z123 这样的数组
function Setstringtonum(cString: string): TArr;
var
i, j: integer;
str: string;
trayy: TArr;
// ResultList: TStringList;
begin
j := 0;
// Result := TStringlist.Create;
cString := UpperCase(cString); //大写
StringReplace(cString, ' ', '', [rfReplaceAll]);
i := 0;
repeat
if Pos(cString[i], '0123456789.-') <= 0 then
begin

// List.Add('Strings1')
     // Setstring.Add('q');
      SetLength(trayy, (j + 1));
      trayy[j] := cString[i];
      j := j + 1;

// break;
    end
    else
    begin
      str := trayy[j - 1];
      case cString[i] of
        '-':
          str := str + '-';

'.':
str := str + '.';

'0':
          str := str + '0';
        '1':
          str := str + '1';
        '2':
          str := str + '2';
        '3':
          str := str + '3';
        '4':
          str := str + '4';
        '5':
          str := str + '5';
        '6':
          str := str + '6';
        '7':
          str := str + '7';
        '8':
          str := str + '8';
        '9':
          str := str + '9';
      end;
      trayy[j - 1] := str;
    end;
    i := i + 1;
until i = length(cString) + 1;
Result := trayy;

end;

delphi 在一长字符串中提取字符串数组函数相关推荐

android字符串获取数字索引,从字符串中提取特定数据(Extract specific data from a string)...
从字符串中提取特定数据(Extract specific data from a string) 我有一个带有描述的长字符串. 我想从字符串中提取一些信息. 但我无法弄明白该怎么做. 这是字符串: C ...
从字母数字字符串中提取数字
http://office.microsoft.com/zh-cn/excel-help/HA001154901.aspx 本文的作者是 Ashish Mathur,是一位 Microsoft MVP ...
单词记忆系统二：音标字符输入(re从字符串中提取音标字符；依序打印音标字符；输入对应序号；替换序号。-＞完成“音标输入”)
Python 官网:https://www.python.org/ Free:大咖免费"圣经"教程< python 完全自学教程>,不仅仅是基础那么简单-- My CS ...
java从字符串中提取数字
1.做一下操作时会一般会用到提取数字操纵: a.列表中有翻页,当新添加的数据不是放在第一条或者最后一条时,需要翻页并循环找到对应的那条数据 b.当新添加的数据放在第一条或者最后一条时,则不需要翻页,只 ...
【转】SQL函数：字符串中提取数字，英文，中文，过滤重复字符
SQL函数:字符串中提取数字,英文,中文,过滤重复字符 --提取数字 IF OBJECT_ID('DBO.GET_NUMBER') IS NOT NULL DROP FUNCTION DBO.GET_ ...
R语言str_sub函数从字符串中提取或替换子字符串（substring）：str_sub函数指定起始位置和终止位置抽取子字符、str_sub函数指定起始位置和终止位置替换子字符串
R语言str_sub函数从字符串中提取或替换子字符串(substring):str_sub函数指定起始位置和终止位置抽取子字符.str_sub函数指定起始位置和终止位置替换子字符串目录
从html中提取手机号码,C#从字符串中提取电话号码、手机号码
C#程序目的:从一堆字符串中提取电话号码.手机号码,要求字符串中的号码以非数字字符分割.原理:利用正则表达式提取纯数字字符串数组,然后利用长度等号码特征,筛选过滤. 代码: //思路仅供参考 //nu ...
python正则表达式提取数字比较好_python正则表达式从字符串中提取数字的思路详解...
python从字符串中提取数字使用正则表达式,用法如下: ## 总结 ## ^ 匹配字符串的开始. ## $ 匹配字符串的结尾. ## \b 匹配一个单词的边界. ## \d 匹配任意数字. ## ...
趣味编程：从字符串中提取信息（参考答案 - 上）
这次"趣味编程"的目的是解析字符串,从一个指定模式的字符串中提取信息.对于目前这个问题,解决方案有很多种,例如直接拆分,使用正则表达式,或是如现在本文这般按照顺序解析.总结果上来说 ...

delphi 在一长字符串中提取字符串数组函数

delphi 在一长字符串中提取字符串数组函数相关推荐

最新文章

热门文章