Valores Monetários como fazer ?

Delphi

20/01/2004

Pessoal tenho uma campo que é de valor monetario : valor_de_Compra(FLOAT) e logo apos ele tem um campo Margem_de_Lucro(INTEIRO) gostaria que ao sair do campo Margem_de_Lucro(INTEIRO) o proximo campo que um campo monetario recebece o valor de venda que é feito pela operaçao abaixo

aux (float monetario) := valor de compra (float monetario) * margem de lucro(real/ inteirio) / 100;
valor de venda (float monetario) := valor de compra(float monetario) + aux(float monetario);

agora para transformar real em inteiro e inteiro em real que to pagando mico....

aki gostaria tbem de ter um campo de valor monetario (FLOAT) recebendo :


total estoque := quantidade (inteiro) * valor de vendo(float monetario);

alguem pode me ajudar a monta a rotina.. so n to sabendo transformar os dados ta dando erro q R$1.23 is not a valid integer value...


Jonasaf

Jonasaf

Curtidas 0

Respostas

Nigro

Nigro

20/01/2004

Isso nunca vai dar certo mesmo pois você está tentando converter um número quebrado 1.23 em um número inteiro, mas caso seja isso mesmo, use a função round.


GOSTEI 0
POSTAR