Frage zu Pascal script

[citybreaker]

Delphi-Quellcode:

program test;
var frm: TForm;
    btn: TButton;
begin

  // Button procedure
  procedure BtnClick(Sender: TObject);  // Identifier expected hier kommt der Fehler
  begin
    //
  end;

  // Form erzeugen
  Frm := TForm.Create(self);
  Frm.Caption := 'Test Window';
  Frm.Name := 'Frm1';
  Frm.Position := poDesktopCenter;

  // Button1 erzeugen
  btn := TButton.Create(frm);
  with Btn do begin
    Caption := 'Klick Mich';
    Left := 10;
    Height := 23;
    Name := 'Button1';
    Parent := Frm;
    Width := 75;
    Top := 10;
    OnClick := BtnClick;
  end;

  Frm.Show;
end.

So jetzt klappts leider noch immer nicht. Ich bekomm ein
Identifier expected.