FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
pegar imagen a word desde delphi
Saludos a todos!!!
Podríais darme algun ejemplo de código para pegar una imagen a word de Office desde una aplicación de delphi? Es que hago una captura de pantalla de mi programa en delphi(o donde sea), la guardo en una bitmap con el siguiente codigo: Bmp:=Tbitmap.Create; Bmp.Height:=1000; Bmp.Width:=1000; Bmp.Canvas.CopyRect(Rect(1,1,1000,1000),Canvas,Rect(1,1,1000,1000)); Bmp.SaveToFile('c:\bmp.bmp'); Bmp.Free; y el último paso que quiero hacer es pegar esta imagen en un archivo word, pero todo desde mi aplicacion delphi. Como pegar una imagen a word?? Os agradeceré si me dais alguna solucion u otro modo de hacerlo Gracias de antemano!!! |
#2
|
||||
|
||||
Experimenta con algo así
Código:
var LinkToFile: Olevariant; SaveWithDocument: OleVariant; Range: OleVariant; begin LinkToFile := false; SaveWithDocument := true; Range := WordDoc.Range; WordDoc.Range.InlineShapes.AddPicture( 'c:\bmp.bmp', LinkToFile, SaveWithDocument, Range ); |
#3
|
|||
|
|||
Hola, tengo un pequeño problema
He insertado tu código en mi programa y no sé si funciona o no porque no sé donde ubica el fichero Word, es decir, como sé que esta imagen se pega en cual fichero Word?, el que yo diga?, uno predeterminado con nombre ya establecido, etc...?
Espero tu respuesta Gracias de antemano |
#4
|
|||
|
|||
Hola otra cosa si no te importa!!!
El tamaño de la imagen pegada en el archivo Word la puedes escoger tu o sale predeterminada??
Si me contestas una de las dos preguntas me considerare afortunado Gracias!!!! |
|
|
|