怎样判断rxrichedit中的内容是图片还是文字(80分)

怎样判断rxrichedit中的内容是图片还是文字，它是否有一个什么属性能包括全部
不管是图片，还是文字，有没有象"rxrichedit.all"这样的属性。谢谢。
分数不多了。只有80分,请高手指教！！！

to jbas：
判断rxrichedit里是图片还是文字，你需要用到剪贴板；
利用剪贴板的HasFormat事件。

CF_TEXT Text with a CR-LF combination at the end of each line. A null character identifies the end of the text.
CF_BITMAP A Windows bitmap graphic.
CF_METAFILEPICT A Windows metafile graphic.
CF_PICTURE An object of type TPicture.
CF_COMPONENT Any persistent object.

procedure TForm1.Button1Click(Sender: TObject);//加载图片
var
Pict :TPicture;
begin
with OpenPictureDialog1 do begin
if Execute then begin
Pict := TPicture.Create;
try
Pict.LoadFromFile(FileName);
Clipboard.Assign(Pict);
RxRichEdit1.PasteFromClipboard;
finally
Pict.Free;
end;
end;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);//判断rxrichedit里是图片
begin
RxRichEdit1.CopyToClipboard;
if Clipboard.HasFormat(CF_BITMAP) then
ShowMessage('图片');
end;

而判断是文字你则需要加上 ： RxRichEdit1.SelectAll;

谢谢，好象还有问题，当有图片和文字时，总是错。我想是否能够用某个html编辑器控件充当
rxrichedit的功能，当编辑好后，把它存入数据库，同时格式也录入数据库，但不只行不行，具体我也不知道，是否
有知道的高手帮我一下！！！

接受答案了.