Coluna 1 Coluna 2 Antonio 45 agora aparece assim Coluna 1 Coluna 2 Antonio 45Acho que deve criar propriedades adicionais, por exemplo, uma propriedad de tipo array para o ancho e tipo das colunas.
* Método .Select() && ??? select * ... into cursor TempReport * Determinar número de campos This.nNumeroColunas = ... && Deve definir propriedades adicionais && na folha de propriedades. local i for i = 1 to This.nNumeroColunas This.aTipoColuna(i, 1) = (tipo de coluna: C, N, D, ...) This.aTipoColuna(i, 2) = (ancho de coluna) This.aTipoColuna(i, 3) = (decimales) This.aTipoColuna(i, 4) = (expresão: pode ser o nome do campo) This.aTipoColuna(i, 5) = (título para header - onde pode obter isto?) nextDepois, pode dar formato às colunas tanto no método .Detail(), como no método .PageHeader() (ou .GroupHeader()):
* Detail This.PrintLine() && começar nova linha local i for i = 1 to This.nNumeroColunas do case case This.aTipoColuna(i, 1) = "C" This.Print(padr(eval(This.aTipoColuna(i, 4)), This.aTipoColuna(i, 2)) ... nextSimilar no método Header.