Ayuda Exportar Datos a Plantillas Excel Cerrar con Una Linea
 

Haber si alguien me ayuda. Primero Comparto la forma de como trabajo y haber si le sirve a alguien o me ayuda a mejorarlo.
Tengo Una Unidad con Funciones Globales los cuales uso desde todos los Formularios. Cuando quiero Exportar a Excel utilizo un Procedure Global que es el Siguiente.

Código Delphi [-]
unit funciones;

interface
uses
  Windows, OleServer, Excel2000, y un largo etc de las units que uso ;
var

Excel: TExcelApplication;
Libro : _Workbook;
Hoja : _Worksheet;
//Estas variables estan fuera del procedure porque son globales

procedure Exportar(Plantilla: String);
  begin
   Excel := TExcelApplication.Create(nil);
    Libro := Excel.Workbooks.Add(appcarpeta + 'Plantillas\'+Plantilla, 0);
    Hoja := Libro.ActiveSheet as _Worksheet;
  end;

Y obviamente desde el formulario que quiero trabajar hago la llamada asi.

Código Delphi [-]
Exportar('Nómina de Matrícula.xlt': String); //Nómina de Matrícula es una plantilla excel en la carpeta Plantillas.
Hoja.Cells.Item[9,11]:='Inserto Valores a esas celdas'; //por ejemplo de un dataset
Excel.Visible[1]:=true; // Dejo la Hoja visible.

Así me ahorro estar declarando y creando cada rato la Aplicación Excel. Ya tengo Todo funcionando.
La ayuda que quiero es que por ejemplo una plantilla de Nóminas debe ser cerrado con una linea recta y Oblicua después de llenar el ultimo dato de la Lista de Educandos.
Como hago eso? ya busque por todo lado y no encuentro. Quisiera por ejemplo insertar una linea recta desde. Celda C35 a K35 y una oblicua desde K35 a W40.

Espero puedan ayudarme los genios de este foro. Aprendí mucho aquí y ya dejé VB. Ahora Uso Delphi 2010 y todo buenísimo. Estoy desarrollando una Aplicación para Institutos Superiores en Delphi y Mysql.

Recordando mi Código de VB
 

Hola a todos de nuevo.
En Visual basic agregaba la Línea asi:
pX = Punto de inicio
pY = punto Final del horizontal
pz = Punto Final del Oblicuo
El punto inicial del Oblicuo es el mismo del final del Horizontal.

pX era la suma en pixeles del alto de filas
Py era la suma en pixeles del Ancho de Columnas
pz era la suma en pixeles del Alto de filas mas abajo que el pX.

entonces la Linea la agregaba así. El Codigo ya esta para Delphi.

Código Delphi [-]
Hoja.Shapes.AddLine(pX,pX,pY,pY).Line;
Hoja.Shapes.AddLine(pY,pY,pZ,pZ).Line;

Ahora supuestamente el Alto y Ancho de filas los extraía con.
Alto= Hoja.Rows[1].Width;
Ancho = Hoja.Columns[1].Height; Sin embargo en delphi ya no me permite agregar estos parametros de ancho y alto. para hacer los calculos que quiero.
¿Si un Experto me ayudara...? por lo menos a completar misma idea. O si hay alguna función que permita agregar asi. Hoja.Shapes.AddLine('A1','A6').Line sería mucho mejor jejejjee.