Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 21-05-2013
armando armando is offline
Miembro
 
Registrado: dic 2003
Posts: 74
Poder: 21
armando Va por buen camino
alto de fila en excel

saludos.. tengo que exportar a excel. de una aplicacion en delphi 7 y firebird
tengo este codigo
Código Delphi [-]
procedure HojasExcelF(ArchivoF: String; var nombreHojaF:String);    /////////FOTOS
var
  Excel: OleVariant;
  Libro: OleVariant;
  I: Integer;

begin

  Excel := CreateOleObject('Excel.Application');
  Libro := Excel.WorkBooks.Open(ArchivoF);
  nombreHojaF:= Libro.Worksheets.Item[1].Name; //Hoja 1 del archivo excel
  Excel.Visible := True;
                 //  EXCEL.RowHidth:= 90;
               //excel.ROW[14].ROWWidth :=90;
// aqui le ponemos nombre a los campos
   Libro := Excel.WorkBooks[1].WorkSheets['INVENTARIO'];
   Libro.Cells [5,5] := 'FECHA DE CONTROL'+' '+DATETOSTR(NOW);
   Libro.Cells [7,5] := 'SUCURSAL'+' ' +DM.QINVSUCURSAL.AsString;

  tabla.First;
    i:=14;

    while not tabla.EOF do
      begin
        i:=i+1;
        Libro.Cells [i,1] := tabla.FieldByName ('ACTIVO').AsString;
        Libro.Cells [i,2] := tabla.fieldByName ('CANTIDAD').AsString;
        Libro.Cells [i,3] := tabla.FieldByName ('DESCRIPCION').AsString;
        Libro.Cells [i,4] := tabla.FieldByName ('MARCA').AsString;
        Libro.Cells [i,5] := tabla.FieldByName ('COLOR').AsString;
        Libro.Cells [i,6] := 'X';
        Libro.Cells [i,10] := tabla.FieldByName ('SERIE').AsString;
        Libro.Cells [i,11] := tabla.FieldByName ('OBSERVACIONES').AsString;

        tabla.Next;
    end;


end;
necesito....
- como voy a insertar una foto.. necesito ampliar el alto de la fila en cada registro que se inserte en excel..
- como justificar el texto
- como insertar una foto en cada registro

gracias como siempre espero sus comentarios....

Última edición por Casimiro Notevi fecha: 21-05-2013 a las 20:48:50.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Insertar una fila en excel cacu OOP 1 03-07-2008 21:06:32
Modificar el Alto de celdas de un Stringgrid y ver en mas de una fila las cadenas richisaurio OOP 1 20-05-2008 17:07:09
Alto de la fila de un DBgrid nostrajara Gráficos 6 13-12-2007 21:56:53
Alto fila par insertar texto de un Memo Minio OOP 4 22-11-2007 19:39:51
Color de fila en excel Aleca Servers 7 30-07-2006 00:42:42


La franja horaria es GMT +2. Ahora son las 04:00:49.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi