Hacer encabezado de excel desde Delphi
Hola a todos,
Tengo una clase que hereda de TExcelAplication llamada TExcel sin campos, solo con algunos métodos
TExcel= class(TExcelApplication)
y dentro de ella tengo este procedimiento
procedure TExcel.Encabezado(Izquierdo, Centro, Derecho :string);
var
tmpWorksheet : _Worksheet;
begin
tmpWorksheet := ActiveWorkBook.ActiveSheet as _Worksheet;
with tmpWorksheet.PageSetup do begin
LeftHeader := Izquierdo;
CenterHeader := Centro;
RightHeader := Derecho;
end;
end;
tengo una variable MiExcel:TExcel
e invoco al método de la siguiente manera:
MiExcel.Encabezado('Clasificador', 'Inventario','Pág. &P de &N');
Segun tengo entendido con &P obtengo la pagina y con &N el nro total de páginas ; además:
&D : Fecha
&T : hora
&F : nombre del documento
&A : nombre de la hoja
sin embargo en mi ordenador todo está trocado, tengo que:
&F es la fecha
&N es el noombre del documento
&T es tachado
¿Con qué puede guardar relación esto?
Gracias de antemano....
|