怎样获取cxGrid选中的文字

像图示这样，鼠标选中单元格中的一段文字，自动显示在memo中，怎么实现呢？
我不要整个单元格的文字

[解决办法]
var
clpbrd: TClipboard;
...
clpbrd := Tclipboard.create;
try
clpbrd.astext := '';
SendMessage(ActiveControl.handle,wm_copy,0,0);
showmessage('选中的值是'+clpbrd.astext);

finally
clpbrd.Free;
end;