Ir para conteúdo
Fórum Script Brasil
  • 0

Somar Valores Ignorando R$


Cleverson Honório Gouvêa

Pergunta

Pessoal, eu quero colocar no evento OnEnter do meu edit um código que some o valor do Edit1 e do Edit2 e me dê o resultado, porém ele precisa Ignorar o 'R$' que está na frente do campo, nos dois primeiros digitos!!! Como eu faço isso???

Ex:.

Se eu tiver R$ 70,00 e R$ 40,00 quero que o Edit3 receba a soma com o R$ "R$110,00"

Entenderam!?

Se tiver como subtrair de outro edit chamado desconto também é bom!!!

valeu!!!

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

opa

você pode filtrar o conteúdo do Edit pra somente números e vírgulas...

exemplo

type
  TChars = set of Char;

function FilterChars(const S: string; const ValidChars: TChars): string;
var
  I: integer;
begin
  Result := '';
  for I := 1 to Length(S) do
  if S[I] in ValidChars then
  Result := Result + S[I];
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  iA, iB, iTotal: Real;
begin
  try
    iA := StrToFloat(FilterChars(Edit1.Text, ['0'..'9',',']));
  except
    iA := 0;
  end;
  try
    iB := StrToFloat(FilterChars(Edit2.Text, ['0'..'9',',']));
  except
    iB := 0;
  end;
  iTotal := iA + iB;
  Edit3.text := 'R$ ' + Formatfloat('###,###,##0.00', iTotal);
end;

abraço

Link para o comentário
Compartilhar em outros sites

  • 0
vlw, vou ver se dá aqui, só que eu quero filtrar " R$ " !!!
então deste jeito que te passei está filtrando, pra testar, coloque 3 edits no seu form e um botão, no edit1 coloque o texto R$ 40,00 e no edit2 coloque R$ 70,00 ou qualquer valor, e coloca o código do botão no OnClick do botão e ao clicar no botão ele vai somar os campos e jogar o resultado no Edit3...

abraço

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...