Quantidade * Codigo do Produto

Delphi

11/02/2005

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

Josimar

Curtidas 0

Respostas

Ivanh

Ivanh

11/02/2005

Explique melhor!!


GOSTEI 0
Emerson Nascimento

Emerson Nascimento

11/02/2005

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
&nbsp &nbsp quant := strtofloat(copy(edit.text,1,pos(´*´,edit.text)-1));
except
&nbsp &nbsp 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;


GOSTEI 0
Emerson Nascimento

Emerson Nascimento

11/02/2005

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;


GOSTEI 0
POSTAR