Me ajudem Capturar Valor de um campo da Tabela.....

Delphi

08/04/2003

Eu tenho uma tabela chamada Tarifa, la existe 3 tipos de Tarifa cada uma com um valor
PC = Passe Coletivo;
PE = Passe Escolar;
PI= Passe Idoso; Todos Numérico;

PC,PI,PE São Campos Numerico da Tabela cada um tem um unico valor

Estou querendo pegar somente o valor da tarifa PC, para multiplicar polo valor da minha Dbedit1.Text

Que comando eu uso? se possivel descreva o exemplo;

Muito Obrigado;


Marcelototini

Marcelototini

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

08/04/2003

Eu tenho uma tabela chamada Tarifa, la existe 3 tipos de Tarifa cada uma com um valor PC = Passe Coletivo; PE = Passe Escolar; PI= Passe Idoso; Todos Numérico; PC,PI,PE São Campos Numerico da Tabela cada um tem um unico valor Estou querendo pegar somente o valor da tarifa PC, para multiplicar polo valor da minha Dbedit1.Text Que comando eu uso? se possivel descreva o exemplo; Muito Obrigado;


var Resultado: Currency;
begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(´Select sum(PC) As Total from NomeTabela´)
Query1.Open;

Resultado := Query1.FieldByName(´TOTAL´).AsCurrency * StrToCurr(dbEdit1.Text);
end;



GOSTEI 0
POSTAR