Fórum Erro Invalid Variant type Conversion? No onCellClick DbGrid! #336809

IF DM.QRYLIMPA.FIELDBYNAME(´MES´).ASINTEGER = 3 THEN BEGIN edtMARCO.text:=floattostr( dm.qrylimpa.fieldbyname(´valor´).Value ); edtMARCO.Text := stringreplace(edtMARCO.text, ´.´, ´´, [rfReplaceAll]); edtMARCO.text := FormatFloat(´#,0.00;(,0.00)´,StrToFloat(edtMARCO.Text)); END ELSE BEGIN EDTMARCO.TEXT:= NULL; [color=blue:696c7b323a][i:696c7b323a]{retorna o edit em branco caso nao use este if acima}[/i:696c7b323a][/color:696c7b323a] END;