Hi,
die Meldung Gleitkommadivision durch 0 bedeutet eigentlich exakt das was da steht. Du dividierst an einer Stelle durch 0, was bekanntlich nicht funktioniert.
Delphi-Quellcode:
R :=StrToFloat(Edit1.Text);
[...]
{Stromberechnung}
I:= (1/R) * (U-(C*n));
Vermutlich steht in Edit1 eine Null.
Abfangen kannst du das mit
try .. except
.
Delphi-Quellcode:
try
I:= (1/R) * (U-(C*n));
except
Showmessage('Fehlerbeschreibung');
exit;
end;
Sinnvoll ist es auch die Eingaben vor den Berechnungen zu prüfen.