Änder mal testweise das Button-Event so ab:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
x, c : real;
begin
x := StrToFloat (Edit1.text);
c := StrToFloat (Edit2.text);
pformel (x, c);
ShowMessage('2* '+Edit1.text+'² +'+Edit2.text+' = '+FloatToStr (y));
end;
Wird nun ein Dialog angezeit?
Was zeigt der?