L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #1 如何复制作字符串;将A字符到B字符之间的所有字符复制到,memo控件中去? 也就是复制作特定范围内的字符串!谢谢高手相救
L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #2 高手们是不是觉得钱太少了,我真的没钱了,侠义之士,救命
C chshanghai Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #3 你这个问题不好答: 你的源字符串是一个什么样了例如 str:='AABBBBBB' 你说要复制, A字符到B字符 结果是多少 A是数值时 还可以 你可以用 if b>=a then showmessage( copy(str,a,b-a)) else showmessage(copy(str,b,a-b));
你这个问题不好答: 你的源字符串是一个什么样了例如 str:='AABBBBBB' 你说要复制, A字符到B字符 结果是多少 A是数值时 还可以 你可以用 if b>=a then showmessage( copy(str,a,b-a)) else showmessage(copy(str,b,a-b));
J jrq Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #4 得到a b的 位置 i,j memo.text:=copy(str,i+1,j-i-1)就可以了!
X xfliwu Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #5 memo.text:=copy(str,pos('a',str)+1,pos('b',str)-pos('a',str)-1); ok!
L laohe Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #6 大侠为什么不能:例如:我想取出 procedure TForm1.Button1Click(Sender: TObject); TForm1.Button1Click 这段字节 所以我才想'procedure'与'(Sender: TObject);'字符之间;
大侠为什么不能:例如:我想取出 procedure TForm1.Button1Click(Sender: TObject); TForm1.Button1Click 这段字节 所以我才想'procedure'与'(Sender: TObject);'字符之间;
C chshanghai Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #7 只要你的字符串不出现 'AADFASsDFAsSADA' 取A 到S中间的内容就行 你可以用xfliwu 的方法
C CJ Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-21 #8 用pos确定字符串的位置,用copy复制字符串,应该没有问题吧