如何截取选定右边的字符(20分)

比如我在Memo.Text中找到1.23243 2.3435436 3435
如何找用1.和2.找到23243 3435436 还有用2.找到3435这四个字呢???
就是选择2.后面空格后的字符

有个最简单的办法：

procedure TForm1.Button1Click(Sender: TObject);
var
str: tstrings;
i: Integer;
begin
str := TStringList.Create;
try
str.Delimiter := ' ';
str.CommaText := Memo.Lines.Text;

for i := 0 to str.Count - 1 do
Memo.Lines.Add(str);
finally
FreeAndNil(str);
end;

end;

posex 空格 和 . 查找