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]