Ok, ho risolto così:
codice:
punti := FloatToStr(round(StrToCurr(F_incrementopunti.Edit1.Text) / DataModule1.T_valorepuntiValore.value));
dichiarando punti come string.
Ora un altro piccolo problema, dovrei arrotondare il risultato sempre per difetto. Con round ho visto che arrotonda per difetto se i valori dopo la virgola sono inferiori a 0,5 mentre se sono superiori arrotonda per eccesso.
C'è una funzione che fa questo o devo impostare dei calcoli io in base ai numeri decimali?