como tirar o R$ de um resultado

Question

Eu tenho um campo na minha tabela paradox tipo $ mais no � feita uma conta e exibo nesse campo mas s� que aparece o R$ no resultado
como fa�o para tira-lo ???
n�o posso usar tipo N pois preciso de n� redondos...
obrigado

Echoesofpinkfloyd · Answer

[quote:7a93501ecd=�andinho_levita�]Eu tenho um campo na minha tabela paradox tipo $ mais no � feita uma conta e exibo nesse campo mas s� que aparece o R$ no resultadocomo fa�o para tira-lo ???n�o posso usar tipo N pois preciso de n� redondos...obrigado[/quote:7a93501ecd]valorfinal:=strtofloat(copy(floattostr(valoranterior),3,lenght(floattostr(valoranterior))-2));...

Wbb · Answer

Voc� pode usar uma fun��o para extrair apenas os n�meros.
Eu vi esta fun��o em outro site. Funciona bem.

Fun��o:

function SoNumeros(sTexto: String): String;
//Esta fun��o extrai os n�emros contidadas em uma string
var 
   iCont: Short;
   sTemp: String;
begin
   sTemp := ��;
   for iCont := 1 to Length(sTexto) do
      if (sTexto[iCont] in [�0�..�9�]) then
         AppendStr(sTemp, sTexto[iCont]);

      Result := sTemp;
end;

Rotina chamadora:

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := SoNumeros(�5763214blaBla�); //O resultado ser� 5763214 somente
end;

Como voc� j� sabe que o resultado sempre ter� duas casas decimais (xxx,xx), ent�o divida o resultado da fun��o por 100, pois ela ir� eliminar tamb�m a v�rgula.

wbb

F�rum como tirar o R$ de um resultado #186234