有关截取字符串

Question

1%(upper)Black(1): G6-G5 
 time used:   2.23
我要取G6-G5，总是取得不是太标准,字符串中'time used'是唯一的

Answer 1

Black(1): G6-G5 
 time used:   2.23
我要取G6-G5，总是取得不是太标准,字符串中'time used'是唯一的如果是取 ':'后的字符串，那就简单：
  resultStr:=copy(s, Pos(':', s)+1, 100);

Answer 2

1%(upper)Black(1): G6-G5 time used:   2.23
var
  ibegin,iend;integer
begin
  ibegin := Pos(':', s);
  iend := Pos('time used:', s);
resultStr:= copy(s, ibegin+1,iend - ibegin );resultstr := trim(resultstr);