Potenz

[Sharan_]

Delphi-Quellcode:

implementation
    uses math;

{$R *.dfm}

procedure TFAnwendung.BBeendenClick(Sender: TObject);
begin
close;
end;

procedure TFAnwendung.BPotenzierenClick(Sender: TObject);



  var Basis,Exponent,Ergebnis : Integer;
Begin
    Basis:= StrToInt(EZahl.Text);
  Exponent:= StrToInt(EPotenz.Text);
  EErgebnis.Text:= IntToStr(Power(basis, exponent));
  EErgebnis.Text := FloatToStr(power(basis, exPonent));

end;

Bitteschön.

[DeddyH]

Lass die Zeile

Zitat:

EErgebnis.Text:= IntToStr(Power(basis, exponent));

mal ganz weg.

[Sharan_]

Zitat von DeddyH:

Lass die Zeile

Zitat:

EErgebnis.Text:= IntToStr(Power(basis, exponent));

mal ganz weg.

juhu es klappt du bist mein Held ich würd dir auf der stelle ein bier spendieren

Vielen Vielen Dank an alle.

[DeddyH]

Na Hauptsache, Du verstehst, was los war.

[Sharan_]

Zitat von DeddyH:

Na Hauptsache, Du verstehst, was los war.

oh ja ich habe hier viel gelernt.