Delphi - function power en delphi

hola a todos tengo problemas con la compilacion cuando uso functions y procedures,
aqui les mando un ejemplo para que me digan que esta mal y que debo hacer.

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);

private

{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

function Power(const Base, Exponent: Extended): Extended;

begin
Edit2.Text := FloatToStr(
Power(StrToFloat(Edit1.Text),(1/2)));
end;

end.

La funcion power ya está definida, no hace falta poner su sintaxis (la cual creo copiaste de la ayuda), lo correcto sería así:

NOTA: Hay que agregar la unidad MATH en el uses

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, math;

type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);

private

{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit2.Text := FloatToStr(
Power(StrToFloat(Edit1.Text),(1/2)));
end;

end.

gracias sos un capo!!
me rompi la cabeza pensando y era una boludez jeje. gracias.