Como mostrar el total del ticket
 

Quisiera que me digan como hacen uds para mostrar el total de un ticket debajo de donde esta el detalle de la compra, ese lugar que dice subtotal, iva, decuento, total, etc...
Pense en colocar un dbgrid y asociarle estos campos desde el clientdataset, por ejemplo tengo total como un Aggregate donde su Expression es sum(total) y total es precio unitario por cantidad. Pero el problema es que no puedo posicionar los titulos de las columnas a la izquierda y sus valores a la derecha, no se si el DBGrid permite esto.
De lo contrario usaria un STRingGRid, pero no me aparece el total:

Código Delphi [-]
begin

         with mdatos.dsticket do
          begin
             Open;
             Insert;
             FieldByName('idproducto').AsInteger:=GrillaProd.DataSource.DataSet.FieldByName('idproducto').AsInteg  er;
             FieldByName('cantidad').AsFloat:=StrToFloat(Edit2.Text);
             FieldByName('nombre').AsString:=GrillaProd.DataSource.DataSet.FieldByName('nombre').AsString;
             FieldByName('marca').AsString:=GrillaProd.DataSource.DataSet.FieldByName('marca').AsString;
             FieldByName('preciou').AsFloat:=GrillaProd.DataSource.DataSet.FieldByName('preciou').AsFloat;
             FieldByName('total').AsFloat:=FieldByName('preciou').AsFloat *  StrToFloat(Edit2.Text);

          end;
          if mdatos.dsticket.State in [dsEdit, dsInsert] then
             mdatos.dsticket.Post;
        if mdatos.dsticket.ChangeCount > 0 then

        mdatos.dsticket.ApplyUpdates(0);
        Form2.StringGrid1.Cells[0,0]:='Total';
        Form2.StringGrid1.Cells[1,0]:=mdatos.dsticket.FieldByName('sumtotal').AsString;
        Edit2.Text:='';
        Form4.Close;

Saludos y agradezco su ayuda