System.amp;string.format
07/08/2007
0
Ola pessoa alguem pode me dar uma ajudinha
valores que esta no banco uso um sum para somar
entao gostatia de dividir esses valores e o resultado apresentar em um label
var
valor1,valor2,resultdivisao :
begin
resultdivisao := valor1 div valor2;
label1.text := system.&string.format(´{0:c}´,resultdivisao);
obs nao esta funcionando
ele traz o resultado mais nao coloca em formato de moeda alguem pode me ajudar ?
valores que esta no banco uso um sum para somar
entao gostatia de dividir esses valores e o resultado apresentar em um label
var
valor1,valor2,resultdivisao :
begin
resultdivisao := valor1 div valor2;
label1.text := system.&string.format(´{0:c}´,resultdivisao);
obs nao esta funcionando
ele traz o resultado mais nao coloca em formato de moeda alguem pode me ajudar ?
M2_gibin
Curtir tópico
+ 0
Responder
Posts
08/08/2007
Knight_of_wine
resultdivisao.ToString(´#.0,00´)
Isso deve resolver.
Aí é só colocar um label com R$ na frente do TextBox e pronto.
Responder
08/08/2007
M2_gibin
Obrigado mesmo entrei agora para deixar a solucao ...........
function TWebForm1.media_data: string;
var
divisao : integer;
begin
divisao := Convert.ToInt16(_DATASOMAVALOR.ExecuteScalar) div Convert.ToInt16(_DATASOMAGRAMA.ExecuteScalar);
[b:3834d4c0a1]Result:= divisao.ToString((´R$ ´+´0.00´));[/b:3834d4c0a1]
end;
function TWebForm1.media_data: string;
var
divisao : integer;
begin
divisao := Convert.ToInt16(_DATASOMAVALOR.ExecuteScalar) div Convert.ToInt16(_DATASOMAGRAMA.ExecuteScalar);
[b:3834d4c0a1]Result:= divisao.ToString((´R$ ´+´0.00´));[/b:3834d4c0a1]
end;
Responder
08/08/2007
Knight_of_wine
Coloque essa máscara que eu postei, que fica no formato ideal. :wink:
Responder
Clique aqui para fazer login e interagir na Comunidade :)
