Ver Mensaje Individual
  #1  
Antiguo 12-08-2007
zidfrid zidfrid is offline
Miembro
 
Registrado: abr 2007
Ubicación: buga valle colombia
Posts: 66
Reputación: 20
zidfrid Va por buen camino
insertar bitmap en word

Hola de nuevo amigos del foro.
a ver muchachos, tengo un pequeño problema, resulta que estoy desarrollando una sencilla aplicación que genere un documento de word, esto lo he logrado tomando ideas de aqui y de aya, en fin, el hecho es que ahora deseo insertarle una imagen o bitmap de una manera sencilla y no se como, aquí anexo el código para quienes les interese.

OleVariant Template = EmptyParam;
OleVariant NewTemplate = False;
OleVariant ItemIndex = 1;

WordApplication1->Connect();
WordApplication1->GetDefaultInterface()->Visible = True;
WordApplication1->Documents->Add(Template, NewTemplate);

WordDocument1->ConnectTo(WordApplication1->Documents->Item(ItemIndex));

WordApplication1->Options->CheckSpellingAsYouType = False;
WordApplication1->Options->CheckGrammarAsYouType = False;

WordDocument1->Range(EmptyParam, EmptyParam)->InsertAfter(StringToOleStr("hola\n"));
WordDocument1->Range(EmptyParam, EmptyParam)->InsertAfter(StringToOleStr("amigos\n"));
WordDocument1->Range(EmptyParam, EmptyParam)->InsertAfter(StringToOleStr("del club\n"));
WordDocument1->Range(EmptyParam, EmptyParam)->InsertAfter(StringToOleStr(" "));
}

de antemano muchas gracias a todos aquellos que se tomen la molestia de leer mi inquietud.
__________________
documentos de word
Responder Con Cita