FiveTech Software tech support forums

Hola chicos(as)
Esto haciendo un informe con TPRINTER y utilizo Cmsay para presentar los datos. Pero tengon problema no consiguo centrar un texto en el centro dle informe

Hago esto
PRINT oPrn PREVIEW
oPrn:SetPortrait() //Ponemos la impresion en vertical
PrnSetSize( 2100, 2970 ) //Tamaño de la pagina

DEFINE FONT oFnt1 NAME "Arial" SIZE 0,-7 BOLD OF oPrn
DEFINE FONT oFnt2 NAME "Arial" SIZE 0,-13 BOLD OF oPrn
DEFINE FONT oFnt3 NAME "Arial" SIZE 0,-15 BOLD OF oPrn
DEFINE FONT oFnt4 NAME "Arial" SIZE 0,-24 BOLD OF oPrn
DEFINE FONT oFnt5 NAME "Arial" SIZE 0,-10 ITALIC OF oPrn
DEFINE FONT oFnt6 NAME "Arial" SIZE 0,-10 BOLD OF oPrn
DEFINE FONT oFnt7 NAME "Arial" SIZE 0,-7 OF oPrn
DEFINE FONT oFnt8 NAME "Courier New" SIZE 0,-14 ITALIC BOLD OF oPrn
oPrn:Startpage()
oPrn:CmSay(27.50,10.50,Dtoc(date()) ,oFnt7 )
oPrn:CmSay(27.50,14.30,Reparto->NOMORI ,oFnt7 )
oPrn:CmSay(28.00,03.00,Substr(Agenc->CODTER,1,2)+' '+SubStr(Agenc->NOMAGE,1,21),oFnt7 )
oPrn:CmSay(28.00,09.80,Agenc->DIRECC ,oFnt7 )


.................

oPrn:CmSay(29.00,09.80,Reparto->NOMDES,oFnt8,,,,TA_CENTER )
Aqui quiero al final de la pagina centrar un texto pero no se como



.................
Endpage
End Print

Alguien pued decirme como lo hago?

Gracias

Solucionado, en lugar de utilzat PAD_CENTER lo hacia con TA_CENTER

Gracias a todos