请教:如何在RICHEDIT控件中添加图片(除插入对象的方法外,还有别的办法吗)?(50分)

  • 主题发起人 主题发起人 zfmich
  • 开始时间 开始时间
Z

zfmich

Unregistered / Unconfirmed
GUEST, unregistred user!
请教:如何在RICHEDIT控件中添加图片(除插入对象的方法外,还有别的办法吗)?
 
RICHEDIT控件中不能添加图片,要用RxRICHEDIT控件。
 
那TwwDBRichEdit可以添加图片吗?
 
没用过,但RxDBRICHEDIT控件肯定行。
 
具体是怎么用?能给个例子吗?谢谢!
 
将word的图文文件装入RxDBRICHEDIT
1.剪切板:RxDbRichEdit1.PasteFromClipboard;
2 打开word文档:
wordapp.Selection.WholeStory;
wordapp.Selection.Copy;
RxDbRichEdit1.PasteFromClipboard;

 
利用剪贴板实现插入图片
uses Clipbrd;
...
procedure TMainForm.InsertImg(sFN: string; RxEdit: TRxRichEdit);
{插入图像到RXRICHEDIT中
sFN : 图像文件
RxEdit : 要插入图像文件的控件
}
var
Pict : TPicture;
begin
Pict := TPicture.Create;
try
Pict.LoadFromFile(sFN);
Clipboard.Assign(Pict);
RxEdit.PasteFromClipboard;
finally
Pict.Free;
end;
end;
 
为什么会提示
cannot assign a TPicture to a TClipboard
 
wind2000的代码没问题。
 
不好意思,引用了别的单元。
解决了,谢谢!
 
后退
顶部