Quadratische Funktionen Rechner + Source

[Cooter]

Für den Anfang ist das doch nicht schlecht
Aber es wäre vielleicht elleganter, wenn du MessageDlg anstatt ShowMessage für die Fehlermeldung nimmst:

Bsp.:

MessageDlg('Fehler: Negativer Radikant', mtError, [mbOk], 0);