Fórum Capturar um valor de um atabela Me ajudem... #153113

Caro Marcelo,
seja mais claro na descrição de sua duvida, pois nao consegui entender a mesma, sendo assim nao consigo ajuda-lo

sds,
Rafael Helm
rafaelhelm@yahoo.com.br

[quote:d5f595ef35=´Rafael Helm´]Caro Marcelo,
seja mais claro na descrição de sua duvida, pois nao consegui entender a mesma, sendo assim nao consigo ajuda-lo

sds,
Rafael Helm
rafaelhelm@yahoo.com.br[/quote:d5f595ef35]


PC, PI, PE São trez campos de uma tabela e cada Campo tem um único valor
Eu queria Capturar o valor que esta no campo PC
Depois eu iria multiplicar esse valor capturado por um que eu digitasse na Dbedit1.text
PC Significa Passe Coletivo (valor de uma passagem de circular)

Caro Marcelo,
- Supondo que sua tabela se chama TARIFA;
- Supondo também que a mesma tenha três campos do tipo INTEGER: PC, PI, PE;
- Supondo que esta tabela JÁ TENHA um registro com os seguintes valores: 2.50, 1.50 e 0.00;
- Supondo que vc Tenha um formulário (form1) que contém quatro edits (Edit1, Edit2, Edit3, Edit4), um Button (Button1) e uma query (Query1);

Na propriedade SQL da query1, digite o texto: ´SELECT * FROM TARIFA´;

No evento ONCREATE do form1, digite:
Query1.Open;

No evento ONCLICK do Botão, digite;
Edit2.Text := FloatToStr( StrToInt(Edit1.Text)*Query1.FieldByName(´PC´).Value);
Edit3.Text := FloatToStr( StrToInt(Edit1.Text)*Query1.FieldByName(´PI´).Value);
Edit3.Text := FloatToStr( StrToInt(Edit1.Text)*Query1.FieldByName(´PE´).Value);

onde o Edit1 conterá a quantidade e os edits Edit2,Edit3 e edit4 conterão o resultado da multiplicação da quantidade pelo valor...

Espero ter ajudado!

Testa aí:

Edit2.Text:=tabelaNomedocampo.value * Valor;

ou

tabelacamponovovalor.value:=tabelaNomedocampo.value * Valor;



dli