K kjj Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-05 #1 我想从已知的字符串中分离出想要的子串，我只想到用字串的长度做一个循环来分离。不知还有没有简单的方法，或函数。
B BaKuBaKu Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-05 #3 这不就是数据结构里的模式匹配吗？首先快速查找到子串位置， 再使用 Copy 函数。
P plwei Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-05 #4 用pos函数不行吗？ str:='1234567890'; sub:='456'; if pos(sub,str)>0 then mystr:=copy(str,pos(sub,str),length(sub)); 不知道你的意思我弄明白了没有？？
用pos函数不行吗？ str:='1234567890'; sub:='456'; if pos(sub,str)>0 then mystr:=copy(str,pos(sub,str),length(sub)); 不知道你的意思我弄明白了没有？？
K kjj Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-05 #5 问题是现不知只串内容，只知起始和终止字符，那pos还怎么用呢？
B Big_Z Unregistered / Unconfirmed GUEST, unregistred user! 2000-04-05 #6 iStart := Pos('起始字符', aString); // 第一个‘起始字符’ iEnd := Pos('终止字符', aString); // 第一个‘终止字符’ iStart2 := LastDelimiter('起始字符', aString); // 最后一个‘起始字符’ iEnd2 := LastDelimiter('终止字符', aString); // 最后一个‘终止字符’ ... then Copy(... More Info, See Help.
iStart := Pos('起始字符', aString); // 第一个‘起始字符’ iEnd := Pos('终止字符', aString); // 第一个‘终止字符’ iStart2 := LastDelimiter('起始字符', aString); // 最后一个‘起始字符’ iEnd2 := LastDelimiter('终止字符', aString); // 最后一个‘终止字符’ ... then Copy(... More Info, See Help.
