alto de fila en excel

[armando]

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....

[defcon1_es]

Hola. Aquí van algunas sugerencias:

Empezado por armando

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

Para ajustar automaticamente el tamaño de las celdas, puedes probar con la propiedad

Código Delphi [-]
Libro.Columns.AutoFit;

Empezado por armando

- como justificar el texto

Mira esta página (es algo antigua) por si te sirve algo de lo que indica Deborah.

Empezado por armando

- como insertar una foto en cada registro

Si las imágenes las tienes cargadas en campos BLOB, prueba con

Código Delphi [-]
Libro.Cells [i,1] := tabla.FieldByName ('IMAGEN').Value;