Вставить картинку из ImageList в RichView

[Shouldercannon]

Реально ли вставить картинку из ImageList в RichView?

[Greek9000]

Если необходимо именно в RichView вставить картинку, то относительно простого пути скорее всего не существует. Метод PasteFromClipboard вставляет только текст, а стандартных методов вставки изображения я не нашёл. Соответственно на ум приходят два варианта:
1. отказаться от ричэдита в пользу другого компонента, либо
2: поискать описание ДЛЛ-ки RICHED32.DLL (компонент обращается именно к ней) и дописать собственный метод вставки изображения.

Если нет необходимости открывать rtf-документы, то лично я бы воспользовался THTMLViewer-ом.

[Shouldercannon]

procedure TForm1.Button1Click(Sender: TObject);
var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  ImageList1.GetBitmap(0, bmp);

  RichView1.AddPictureEx('', bmp1, 0, rvvaAbsMiddle);
  RichView1.Format;
end;