Formatação de Footer no GridView
Fala Rodrigão, ainda estou esperando vc ministrar aulas na TDS de são Pualo, rsrsrsrsr, um grande abraço.
Segue uma dúvida:
Tenho um GridView com duas colunas, e Footer visivel, onde coloco a soma da minha coluna TOTAL, que é do tipo Numeric(12,2) banco MSSQLServer 2005 Stan.
No meu evento DataBound, tenho isso:
procedure TLancamentos.GridViewSintetico_DataBound(sender: System.Object; e: System.EventArgs);
var
I : Integer;
Total : Currency;
begin
for I := 0 to GridViewSintetico.Rows.Count -1 do
begin
Total := Total + Currency.Parse(GridViewSintetico.Rows[I].Cells[1].Text);
end;
GridViewSintetico.FooterRow.Cells[0].Text := 'TOTAL GERAL =>';
GridViewSintetico.FooterRow.Cells[0].HorizontalAlign := HorizontalAlign.Right;
GridViewSintetico.FooterRow.Cells[1].Text := Total.ToString;
GridViewSintetico.FooterRow.Cells[1].HorizontalAlign := HorizontalAlign.Right;
end;
Já tentei Total.ToString('0:c') porem o RAD 2007 não aceita, pois a vezes tenho valores tipo 400,00 e fica somente 400, teria como colocar R$ 400,00 ???
Segue uma dúvida:
Tenho um GridView com duas colunas, e Footer visivel, onde coloco a soma da minha coluna TOTAL, que é do tipo Numeric(12,2) banco MSSQLServer 2005 Stan.
No meu evento DataBound, tenho isso:
procedure TLancamentos.GridViewSintetico_DataBound(sender: System.Object; e: System.EventArgs);
var
I : Integer;
Total : Currency;
begin
for I := 0 to GridViewSintetico.Rows.Count -1 do
begin
Total := Total + Currency.Parse(GridViewSintetico.Rows[I].Cells[1].Text);
end;
GridViewSintetico.FooterRow.Cells[0].Text := 'TOTAL GERAL =>';
GridViewSintetico.FooterRow.Cells[0].HorizontalAlign := HorizontalAlign.Right;
GridViewSintetico.FooterRow.Cells[1].Text := Total.ToString;
GridViewSintetico.FooterRow.Cells[1].HorizontalAlign := HorizontalAlign.Right;
end;
Já tentei Total.ToString('0:c') porem o RAD 2007 não aceita, pois a vezes tenho valores tipo 400,00 e fica somente 400, teria como colocar R$ 400,00 ???
Paulo Freire
Curtidas 0
Respostas
Rodrigo Mourão
23/06/2009
Opa !!!
É so o chefe mandar que vou ai dar um treinamento sim com maior prazer ! kkkk
Bem esse problema não parece, a principio, um bicho de sete cabeças. Eu vou realizar uns testes aqui e posto um caminho para a resolução em breve.
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
É so o chefe mandar que vou ai dar um treinamento sim com maior prazer ! kkkk
Bem esse problema não parece, a principio, um bicho de sete cabeças. Eu vou realizar uns testes aqui e posto um caminho para a resolução em breve.
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Rodrigo Mourão
23/06/2009
Olá Amigo, segue seu código abaixo com apenas uma modificação:
procedure TLancamentos.GridViewSintetico_DataBound(sender: System.Object; e: System.EventArgs);
var
I : Integer;
Total : Currency;
begin
for I := 0 to GridViewSintetico.Rows.Count -1 do
begin
Total := Total + Currency.Parse(GridViewSintetico.Rows[I].Cells[1].Text);
end;
GridViewSintetico.FooterRow.Cells[0].Text := 'TOTAL GERAL =>';
GridViewSintetico.FooterRow.Cells[0].HorizontalAlign := HorizontalAlign.Right;
GridView1.FooterRow.Cells[1].Text := System.&String.Format('{0:c}',Total);
GridViewSintetico.FooterRow.Cells[1].HorizontalAlign := HorizontalAlign.Right;
end;
Abs! Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
var
I : Integer;
Total : Currency;
begin
for I := 0 to GridViewSintetico.Rows.Count -1 do
begin
Total := Total + Currency.Parse(GridViewSintetico.Rows[I].Cells[1].Text);
end;
GridViewSintetico.FooterRow.Cells[0].Text := 'TOTAL GERAL =>';
GridViewSintetico.FooterRow.Cells[0].HorizontalAlign := HorizontalAlign.Right;
GridView1.FooterRow.Cells[1].Text := System.&String.Format('{0:c}',Total);
GridViewSintetico.FooterRow.Cells[1].HorizontalAlign := HorizontalAlign.Right;
end;
Abs! Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Rodrigo Mourão
23/06/2009
Olá amigo, o código abaixo foi suficiente ?
Estamos aguardando para encerrar o chamado !!
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
Estamos aguardando para encerrar o chamado !!
Abs.
Atenciosamente,
Rodrigo Carreiro Mourão
Borland Instructor Certified
Coordenador da Consultoria em Delphi
GOSTEI 0
Paulo Freire
23/06/2009
Belezinha, mais uma vez obrigado.
GOSTEI 0