刘 刘邦 Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #1 返回子串及返回指定字符（例如：'/'）是倒数第几个，及返回倒数几个的子串
刘 刘邦 Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #2 返回子串及返回指定字符（例如：'/'）是倒数第几个，及返回倒数几个的子串
J jennykiller Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #5 返回倒数的子串，就用copy就行了，只要是指定开始和长度，不过是加加减减的事。 返回子串的倒数位置，可以用pos来做： if Pos(Edit1.Text,Edit2.Text) > 0 then begin showmessage(IntToStr(Length(edit2.Text) - Pos(Edit1.Text,Edit2.Text) +1)); end else begin ShowMessage('0'); end; 没考虑重复子串的问题，可以自己考虑写一下。
返回倒数的子串，就用copy就行了，只要是指定开始和长度，不过是加加减减的事。 返回子串的倒数位置，可以用pos来做： if Pos(Edit1.Text,Edit2.Text) > 0 then begin showmessage(IntToStr(Length(edit2.Text) - Pos(Edit1.Text,Edit2.Text) +1)); end else begin ShowMessage('0'); end; 没考虑重复子串的问题，可以自己考虑写一下。
X xianguo Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #6 返回子串: Copy(S Index, Count: Integer): string; 返回指定字符位置（右）:StrRScan(const Str: PChar Chr: Char): PChar; 返回倒数几个的子串 : Copy(S Index, Count: Integer): string;
返回子串: Copy(S Index, Count: Integer): string; 返回指定字符位置（右）:StrRScan(const Str: PChar Chr: Char): PChar; 返回倒数几个的子串 : Copy(S Index, Count: Integer): string;
刘 刘邦 Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #7 我是解决路径问题例如：c:/qqq/ddd/www/asd.txt,想解决最后一个'/'的位置，然后求子串'asd.txt'
X xianguo Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #8 如果是取文件名可以用 ExtractFileName('c:/qqq/ddd/www/asd.txt'); 取路径 ExtractFilePath
J jennykiller Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #9 有现成的函数不用？ extractFilename，extractfilepath ExtractFileName('c:/a.txt')
D dawnsong Unregistered / Unconfirmed GUEST, unregistred user! 2005-05-13 #11 楼主是否给错分了？ 受之有愧哦，该给上面的几个弟兄
