NOVAMENTE, multiplicação de campos

Delphi

02/11/2003

Eu tenho tres campos, um q eh a quantidade, e os outros dois um eh o valor unitário e o outro eh o valor total, estes dois campos estão no modo de currency, como fazer para multiplicar o valor do preço unitário com o valor da quantidade dando o resultado no dbedit do total. Eu estou usando uma tabela e DBEdit.

Obs.: todas as informações parecidas com a abaixo não funciona!!!!

DBEdit13.text:= Floattostr(strtofloat(DBedit3.text)* strtofloat(DBEdit4.text));

É URGENTEEE!!!


Franck.c

Franck.c

Curtidas 0

Respostas

Ltres

Ltres

02/11/2003

Pode far algo do tipo!


  dbEditResult.text := CurrToStr(StrToInt(dbEditQuant.text) * StrToCurr(dbEditVlrUnit.text));


Apesar de naum ser o correto.

O bom seria pegar o valor direto da tabela.

  Tabela[´TOTAL´] := Tabela.FieldByName(´QUANT´).AsInteger * Tabela.FieldByName(´VLRUNIT´).AsCurrency;


Desse modo já fica direto no campo.. Só q claro a tabela tem q estar em modo de edição!


GOSTEI 0
POSTAR