CPGrade_Grupos.Columns.Add.FieldName       := 'LUCRO';
  CPGrade_Grupos.Columns[9].Title.Caption    := 'Margem Lucro';
  CPGrade_Grupos.Columns[9].Title.Alignment  := taRightJustify;

Onde CPGrade_Grupos é um TDBGrid.



[As partes desta mensagem que não continham texto foram removidas]

Responder a