[ZaaaK]

есть Word документ...тырю из него всю инфру,копируя через буфер

Код:

procedure TForm7.Button1Click(Sender: TObject);
 var COM_Word: variant;
    DocName, TxtName, EditFile: string;
    bmp:TBitmap;
begin
  try
  if OpenDialog1.Execute then EditFile := Form7.OpenDialog1.FileName;
  try
    COM_Word := CreateOLEObject('Word.Application');
    COM_Word.Visible := False;
    DocName := {ExtractFilePath(Application.ExeName) +} EditFile;
    COM_Word.Documents.Open(DocName);
    Com_Word.ActiveDocument.Select;
    COM_Word.Selection.Copy;
    RichEdit1.PasteFromClipboard;
    COM_Word.DisplayAlerts := False;
    COM_Word.Quit;
   finally
    COM_Word := UnAssigned;
  end;
   except
   end;
end;

а еще в этом документе картинки лежат, а RichEdit их не умеет смотреть...слышал что-то вроде что можно каждую картинку в динамический Image втыкать...но как картинки собственно можно из буфера умыкнуть? для меня это остается огромной тайной