FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Imagen con tword
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Imagen con tword

Posted: Mon Aug 25, 2008 09:41 AM

Amigos...

Estoy generando documentos word con la clase tword y con Office 2007 cuando incluyon una imagen me coloca un recuadro en blanco

oWord:AddImagen( 0 , 1 , 5 , 10 , diskname()+':'+'logo.bmp' ,{0})

me lo realiza con formato BMP o JPG

Gracias

dbarrio
Argentina

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Imagen con tword

Posted: Wed Aug 27, 2008 09:50 AM

Estimados

Nadie tiene respuesta apregunta?? o que me dirija a alguien especial para ver como puedo solucionar

o bien existe la clase TWORD actualizada??

dbarrio
Argentina

Posts: 159
Joined: Wed Mar 28, 2007 01:19 PM

Imagen con tword

Posted: Wed Aug 27, 2008 01:55 PM

dbarrio,

hBmp:=ReadBitmap(0, "C:\bitmap.bmp")
nHig=nBmpHeight(hBmp)
nWid=nBmpWidth(hBmp)
oWord:AddImagen( 1, 1, 1+nCol, 1+nHig, nWid, "C:\bitmap.bmp", {1,1,1,1,1,1})

Saludos, Euclides

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Imagen con tword

Posted: Thu Aug 28, 2008 08:50 AM

Estimado Euclides

Muchas gracias por tu respuesta.

Te comento que no me coincide el orden de los comando que me pasas con la clase que tengo yo (TWORD), sin duda que no me funciona.

oWord:AddImagen( 1, 1, 1+nCol, 1+nHig, nWid, 'c:\logo.bmp', {1,1,1,1,1,1})

oWord:AddImagen( 0 , 1 , 5 , 10 , diskname()+':'+'logo.bmp' ,{0})

No debemos tener la misma clase TWORD

Saludos

Dbarrio
Argentina

Posts: 159
Joined: Wed Mar 28, 2007 01:19 PM

Imagen con tword

Posted: Thu Aug 28, 2008 12:02 PM

dbarrio,
sigue el método AddImagen:

METHOD AddImagen( nTop, nLeft, nBottom, nRight, cImagen, alinea, ntipo, nrotacion ) CLASS TWord

   ::Box(nTop, nLeft, nBottom, nRight, {,,,,,,,cImagen}, alinea, ntipo, nrotacion, .t.)

   return nil

Saludos, Euclides

Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM

Imagen con tword

Posted: Thu Aug 28, 2008 09:09 PM

dobfivewin...

Yo hago lo siguiente:

oWord:AddImagen( 20, 30, 81, 90, logotipo,{,,,1,,})

Un saludo.
LORENZO

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Imagen con tword

Posted: Fri Aug 29, 2008 08:55 AM

Amigos del Foro

solucioné el problema....

muchas gracias

Propongo abrir un Asunto para intercambiar conocimiento sobre la clase TWORD

Saludos para todos

David
Argentina

Continue the discussion