Fórum Quantidade * Codigo do Produto #268169
11/02/2005
0
Tenho uma programa que trabalha com vendas. Gostaria de saber como faço para criar uma rotina que possa digitar a quantidade * o código do produto em mesmo campo pra que ja saia calculado o valor total do produto.
Josimar
Curtir tópico
+ 0
Responder
Posts
11/02/2005
Ivanh
Explique melhor!!
Responder
Gostei + 0
11/02/2005
Emerson Nascimento
vc precisa de um edit pra isso. e a rotina é bem simples, só é preciso ter uma regra, por exemplo:
[quantidade]*[codigodoitem]
ou seja, a quantidade vem sempre antes do sinal de multiplicar.
daí basta você fazer:
try
    quant := strtofloat(copy(edit.text,1,pos(´*´,edit.text)-1));
except
    quant := 0;
end;
codigo := copy(edit.text,pos(´*´,edit.text)+1,length(edit.text));
faça a busca pelo codigo no banco de dados, pra encontrar o valor unitário e depois é só fazer:
valor := precounitario * quant;
[quantidade]*[codigodoitem]
ou seja, a quantidade vem sempre antes do sinal de multiplicar.
daí basta você fazer:
try
    quant := strtofloat(copy(edit.text,1,pos(´*´,edit.text)-1));
except
    quant := 0;
end;
codigo := copy(edit.text,pos(´*´,edit.text)+1,length(edit.text));
faça a busca pelo codigo no banco de dados, pra encontrar o valor unitário e depois é só fazer:
valor := precounitario * quant;
Responder
Gostei + 0
11/02/2005
Emerson Nascimento
vc precisa de um edit pra isso. e a rotina é bem simples, só é preciso ter uma regra, por exemplo:
[quantidade]*[codigodoitem]
ou seja, a quantidade vem sempre antes do sinal de multiplicar.
daí basta você fazer:
faça a busca pelo codigo no banco de dados, pra encontrar o valor unitário e depois é só fazer:
valor := precounitario * quant;
[quantidade]*[codigodoitem]
ou seja, a quantidade vem sempre antes do sinal de multiplicar.
daí basta você fazer:
try quant := strtofloat(copy(edit.text,1,pos(´*´,edit.text)-1)); except quant := 0; end; codigo := copy(edit.text,pos(´*´,edit.text)+1,length(edit.text));
faça a busca pelo codigo no banco de dados, pra encontrar o valor unitário e depois é só fazer:
valor := precounitario * quant;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)