Ver Mensaje Individual
  #1  
Antiguo 03-01-2018
agustibaldo agustibaldo is offline
Miembro
 
Registrado: Nov 2006
Posts: 105
Reputación: 12
agustibaldo Va por buen camino
Error al exportar Excel en DelphiXE3

Hola gente de ClubDelphi.
Les escribo en esta oportunidad para comentarles un error que estoy teniendo el intentar generar un archivo de Excel desde DelphiXE3. Antes de mostrarles en detalle el código, les comento que todo el código implementado estaba funcionando correctamente y que, a partir de una nueva versión de la app, comenzó a fallar durante el proceso que exporta a Excel.

A continuación les adjunto el código con el cual genero el archivo Excel:

Código Delphi [-]
var
    XLApp : variant;
    Sheet: variant;
begin
    ....
    XLApp := CreateOleObject('Excel.Application');
    XLApp.Visible := true;
    XLApp.Workbooks.Add;
    XLApp.Workbooks[1].WorkSheets[1].Name := 'Dia';  //// --> acá el ERROR
    Sheet := XLApp.Workbooks[1].WorkSheets['Dia'];

    Sheet.Columns[1].HorizontalAlignment := 2;
    Sheet.Columns[3].ColumnWidth := 35;
    Sheet.Columns[4].ColumnWidth := 17;

    ....

A partir de esta nueva versión, al procesar el informe y comenzar con el armado de Excel, en la línea señalada arroja error "Tipo de variable incorrecto."
El problema en cuestión, se origina a partir de que quiero compilar esta nueva versión. Al intentar hacerlo el compilador me detalle un error con la unidad dxTouch donde no encontraba el archivo Registry.dcu
Entonces, procedo a buscarlo y actualizar el LibraryPath de mi entorno y logro compilar la versión para subirlo.
Posteriormente, probando la app me doy cuenta de que este proceso comenzó a fallar aún no habiendo realizado ningún cambio sobre el mismo en esas líneas.
Les pido si alguno puede darme algo más de info sobre lo que pueda estar sucediendo. Si necesitan mas detalle sobre lo comentado anteriormente me avisan.
Desde ya, muchas gracias.
Saludos.

Última edición por ecfisa fecha: 03-01-2018 a las 18:03:11.
Responder Con Cita