prova così:
dichiara da qualche parte (giusto per farlo un po' figo :D)
function iif(exp: boolean; ValueTrue, ValueFalse: string): string;
begin
if exp then
result := ValueTrue
else
result := ValueFalse;
end;
e poi usalo così:
value := 7.3;
ShowMessage( FormatFloat( iif(value = trunc(value), ',.##', ',.00') ,
value )
);
value := 80;
ShowMessage( FormatFloat( iif(value = trunc(value), ',.##', ',.00') ,
value )
);
che poi...
la cosa corretta sarebbe
iif(value = trunc(value), '0', ',.00')
ShowMessage( FormatFloat( iif(value = trunc(value), '#,##0;-#,##0;0', '#,##0.00;-#,##0.00;0') ,
value )
);