Einfaches Potenzieren

[shmia]

Also ich würde empfehlen, für die eigentliche Rechenarbeit eine eigene Funktion vorzusehen:

Delphi-Quellcode:

function Potenzieren(Base, Exponent: Extended): Extended;
begin
  // hier rechnen
end;

procedure TForm1.Button1Click(Sender: TObject);
var 
  base, exp, res : Extended;
begin
  base := strtofloat(edit1.text);
  exp := strtofloat(edit2.text);
  res := Potenzieren(base, exp);
  Edit3.Text := FloatToStr(res);
end;