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]










Responder a