Ciao Denis,

ho fatto come mi hai consigliato:


codice:
except
    on e: Exception do

      ShowMessage(e.message);

    on ECONVERTERROR do
      ShowMessage('Assicurarsi di aver inserito correttamente i valori');
    on EDivByZero do
      ShowMessage('Attenzione stai dividendo per zero!');

  end;
Mi esce : '''' is invalid float

Le uniche caselle che non vengono scritte sono :


codice:
    totale_rimborsi.Text := Floattostr(b);
    //scrivo nella casella di testo e riconverto la variabile
    Spese_Auto.Text := Floattostr(a);
    //scrivo nella casella di testo e riconverto la variabile
    Totale.Text := Floattostr(c);
    //scrivo nella casella di testo e riconverto la variabile
Ma aspettano il risultato

Vi ringrazio