谁能帮我写个richedit的插入OLE图片的例子，最好是JPG图片的 ( 积分: 100 )

如题，bmp的话我已经有了，但是还是看不明白，所以最好有详细注释，不要跟我说rxrichedit或是richview，我现在只能用richedit

如题，bmp的话我已经有了，但是还是看不明白，所以最好有详细注释，不要跟我说rxrichedit或是richview，我现在只能用richedit

给你一段代码，可以放到插入图片的过程中。
var
Picture: TPicture;
OpenPictureDialog: TOpenPictureDialog;
begin
OpenPictureDialog := TOpenPictureDialog.Create(nil);
try
OpenPictureDialog.Filter := Format('%s|%s|%s', [GraphicFilter(TBitmap),
GraphicFilter(TMetafile),GraphicFilter(TJPEGImage)]);//设置有Jpeg文件
if OpenPictureDialog.Execute then
begin
Picture := TPicture.Create;
try
Picture.LoadFromFile(OpenPictureDialog.FileName);
Clipboard.Assign(Picture);
RichEdit.PasteFromClipboard;
finally
Picture.Free;
end;
end;
finally
OpenPictureDialog.Free;
end;
end;
别忘了在uses中加入ClipBrd

我是说OLE，不是粘贴，再说了，你的那个方法在richedit上没用的

用richedit还不如直接用ie控件

还是转成bmp再插入吧

直接粘贴就行了，具体内容发邮件

接受答案了.