hola a todos
Les doy las gracias por sus respuestas y comentarios todo me ha servido
El codigo quedo como sigue, por si alguien tiene el mismo problema:
Voy a unir una imagen con el contenido de un archivo y mandar a imprimir:
Código PHP:
//---abrir archivo----//
s:=ruta+'a6.RTF'; //asignamos el archivo
Word1 := CreateOleObject('Word.Application');
Word1.Documents.Add(s);
//seleccionamos el grafico
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile(WRITEPATH+'ima.bmp');
Bitmap.SaveToClipBoardFormat(BmpFormat, BmpData, BmpPalette);
ClipBoard.SetAsHandle(BmpFormat, BmpData);
//lo pegamos
Word1.ActiveWindow.Selection.Paste;
Word1.ActiveDocument.Saveas(WRITEPATH+'reda\aaaaa.doc');
//mandamos a imprimir
Word1.printout(false);
Word1.Quit;
Word1:= UnAssigned;
Gracias por todo