Eder

OLá.....Colegas... A gente quando quer somar um determinado campo de uma tabela paradox basta inserir um Qrexp e mudar o expression para SUM(query1.PESO) e ele soma o peso que aparece no relatorio. só que agora eu tenho um Campo na tabela paradox chamado KM. no quickreport eu teria que fazer uma formula que ele pegue o ultimo registro do KM (kmfinal) (-)menos o primeiro registro do KM(kminicial). para saber a km percorrida. alguém poderia me dar uma dica de como ficaria a formula??? Grato

Cara......é quase isto, ou melhor nem precisa tanto: ex: o carro A rodou 15000 km no dia 15... no dia 20 ele esta com 25000...passou ai 10000 km... Acho q você deve comparar esses 10000 km, com a kilometragem da troca de óleo! Ou seja , sempre guardar o último km de troca! É isso?? ele nem vai precisar pegar 25000 - 15000 = 10000 porque o usuario já vai digitar no dbedit o 10000 direto... Então eu colocaria o codigo no Onexit deste Dbedit para comparar estes 10000 com o REGISTRO da Table2(oleo.db) campo PLACA E KMOLEO. Espero não ter confundido!!!!

Ola Kiko...beleza?? Cara...na verdade em tenho lançado na tabela table2 (oleo.db) a kilometragem quando devo trocar o oleo. na tabela de abastecimento a Table1 a medida que vou abastecendo tem um campo que vou jogando a km atual...ai ele compara essa kilometragem com a km do table2(oleo.db). Se for igual ou superir ele aparece uma mensagem na tela "Gasolina é Igual ou Superior a Km Óleo" ai você me pergunta: você troca o óleo a cada qtos quilometros rodados? Resposta: depende de cada carro, pois isso que existe ba table2(oleo.db) um campo para o usuario preencher quando é para trocar o oleo. Este codigo abaixo que fiz funciona legal só que tenho este problema quando a kilometragem de troca do oleo é tipo 2000 kms e o abastecimento ainda esta no 999.000, a mensagem acaba aparecendo....mas não é verdade porque não é hora de trocar ainda. procedure TForm3.Button1Click(Sender: TObject); begin if Table2.Locate('placa',table1placa.Value,[]) then if Table1kmgas.Value >= Table2kmoleo.Value then ShowMessage('KM Gasolina é Igual ou Superior a Km Óleo') else ShowMessage('KM Gasolina é Menor que Km do Óleo'); end; Agora eu teria que adaptar o meu codigo acima para este problema, só que não to achando saída.. Fico no aguardo de uma ajuda. Grato

Olá...Pessoal.....eu tenho este código abaixo: procedure TForm3.Button1Click(Sender: TObject); begin if Table2.Locate('placa',table1placa.Value,[]) then if Table1kmgas.Value >= Table2kmoleo.Value then ShowMessage('KM Gasolina é Igual ou Superior a Km Óleo') else ShowMessage('KM Gasolina é Menor que Km do Óleo'); end; A table2 é a tabela de oleo motor e a table1 é a tabela de abastecimento, ou seja a medida que vai abastecendo o veiculo ele vai comparando, e quando chegar a km de nova troca de oleo ele avisa se é igual ou maior ai joga a mensagem na tela. Como a gente sabe a Km de um véiculo não é infinita e acaba chegando por exemplo a 999.999 depois ele zera e começa tudo de novo. Neste caso eu pederia aos nosso colegas...como é que ficaria o meu código....caso eu tenha cadastrado na tabela TABLE2 campo KMOLEO =2.000 e na table1 campo KMGAS eu estiver ainda lançando 999.000 ??? Neste caso o programa vai dizer que ShowMessage('KM Gasolina é Igual ou Superior a Km Óleo') É UMA RESPOSTA ATÉ CERTO POSTO MENTIROSA porque ainda não chegou a gora de trocar o óleo. Algum colega poderia me dizer como ficaria o meu código neste caso?? muito Grato