Luiz, basta fazer: Edit1.Text := FormatFloat('###,##0.00',Exp(soma * Ln(StrToFloat(label27.Caption))));
[]s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: whitesock...@hotmail.com SKYPE: WalterChagasJr Em 23/03/2009 12:22, Luiz de Lima Lopes escreveu: Pessoal Bom Dia, Estou tendo o seguinte problema estou fazendo uma função para um calculo, porem esta dando [Error] (1314): Incompatible types: 'String' and 'Extended'; Porem esta com o mesmo tipo nas duas variaveis...o que pode estar ocorrendo... Segue o codigo 1308 var 1309 soma : real; 1310 1311 begin 1312 1313 soma := StrToFloat('1') + StrToFloat(label1.Caption); 1314 Edit1.Text := Exp(soma * Ln(StrToFloat(label27.Caption))); Obrigado [As partes desta mensagem que não continham texto foram removidas]