[Help] Conversão de variaveis Delphi

[bironet]

Olá pessoal preciso fazer essa conversão em Delphi ... Se alguém puder me ajudar. Todos os campos são N no Bd


dm_controle.tb_lanc_pardiaKmRodados:=StrToFloat(dm_controle.tb_lanc_pardiaKmFinal)-(dm_controle.tb_lanc_pardiaKmInicial);

Alguém me da uma luz ai que tô é passando raiva.

[Anonymous]

vc pode criar um jogo de variaveis por exemplo

a:=strtoflot(ovalor1);
b:=strtofloat(ovalor2);
c:=a-b;

[Hacker Xtreme]

var
A, B, C: Real;
begin
A := StrToFloat('10');
B := StrToFloat('15');
C := A - B;
ShowMessage(FloatToStr(C));

(;

[TGA]

VAr

 Resultado : Double;
begin
resultado := StrToFloat(dm_controle.tb_lanc_pardiaKmFinal) - StrToFloat(dm_controle.tb_lanc_pardiaKmInicial);

//SE O CAMPO DA TABELA FOR DO TYPO STRING (VARCHAR) USE ISSO
dm_controle.tb_lanc_pardiaKmRodados := FloAtToStr(resultado);

//SE FOR DO TIPO INTEGER  (NUMERICO) USE ISSO
dm_controle.tb_lanc_pardiaKmRodados := resultado;

END;


Só uma abservações na linha abaixo:

Code Select Expand

dm_controle.tb_lanc_pardiaKmRodados:=StrToFloat(dm_controle.tb_lanc_pardiaKmFinal)-(dm_controle.tb_lanc_pardiaKmInicial);
dm_controle.tb_lanc_pardiaKmRodados  Se não estou enganado é uma Tabela dentro do DataModule, você tem que especificar o campo tb.. Vlw.. abraços...   

TGA