Tenho o seguinte código
var
Valor1: string;
Valor2: Double;
begin
Valor1 := '150.15';
Valor2 := 150.15;
If StrToFloat(Valor1) = Valor2 then
ShowMessage('Iguais');
end;
Nesta situação, as vezes o Delphi entende que os valores são diferentes, porém, se utilizo o código abaixo eles são considerados iguais
var
Valor1: string;
Valor2: Double;
Valor2: Double;
begin
Valor1 := '150.15';
Valor2 := 150.15;
Valor3 := StrToFloat(Valor1);
If Valor3 = Valor2 then
ShowMessage('Iguais');
end;
Observação: Nono exemplo citado estou definindo os valores diretamente para a variável, porém, o problema que eu tive ocorria da leitura de um dado da serial, mas mesmo que eu utiliza-se a função FormatFloat
isso continuava ocorrendo, e se eu desse um Debugdebug nas variáveis os valores estavam iguais, e ainda assim não eram considerados iguais no if