var  head, tail : string;

head := Copy(Source, 1, Pos(Target)-1);
tail := Copy(Source, Pos(Target)+1, Length(Source));
head가 Target앞의것
tail이 Target의 뒤의 문자열입니다.