FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour problema con exportaci贸n a excel
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
problema con exportaci贸n a excel
Posted: Tue Jun 14, 2016 07:18 PM
Tengo un xbrowse con una columna donde muestran la imagen recogida desde su ruta ...
Esto funciona bien pero al realizar la exportaci贸n a excel con obrw:toexcel() las im谩genes no se exportan como se supone que tendr铆a que pasar .
He realizado un ejemplo donde se reproduce el problema . Al hacer dblclick se exporta a excel pero las im谩genes no se exportan.
驴 Veis algo raro en el c贸digo que hace que no funcione ?
Saludos y gracias anticipadas.

Code (fw): Select all Collapse
#include "fivewin.ch"
#include "xbrowse.ch"

function Main()

   local oWnd, oBrw
   local cAlias
   local oCol
   use customer
   calias:= Alias() 
     define window ownd
        
   @ 0,0 xbrowse oBrw of oWnd ;
         alias calias
         
     obrw:nRowHeight := 76  
     obrw:blDblClick := { | nRow, nCol, nKey | obrw:toexcel()  }
         
      oCol := obrw:AddCol()
      WITH OBJECT oCol
         :cHeader   := "first"
         :bEditValue  := { || ( oBrw:cAlias )->first }
         :nWidth    := 170
      End    
      
       oCol := obrw:AddCol()
      WITH OBJECT oCol
         :cHeader   := "foto"
         :bStrImage      := { ||  "c:\fwh\bitmaps\pngs\2.png" }
         :nWidth    := 170
         :cDataType     := 'F'
      End       
        
         
   oBrw:CreateFromCode()
   oWnd:oClient := oBrw

   activate window oWnd

return nil
Posts: 1516
Joined: Thu May 27, 2010 02:06 PM
Re: problema con exportaci贸n a excel
Posted: Thu Jun 16, 2016 12:46 PM

up..

Continue the discussion