Fehler bei Eintrag unter "Interface"

[Die Muhkuh]

Delphi-Quellcode:

unit unit1;

interface

uses
   Windows, Messages, etc....

type
   TForm1 = class(TForm)
   Button1: TButton;
   procedure Button1.click(Sender: TObject);

private
   {Private-Deklarationen}
public
   {Public-Deklarationen}
  procedure ordner; //<-- Hierhin die Procedure verschieben
end;

var
  Form1: TForm1;

implementation

uses unit2;

{$R *.DFM}

procedure Form1.ordner; //<-- Hier noch Form1. hinschreiben!
begin
  {Quelltext der Prozedur}
end;

procedure TForm1.Button1.Click(Sender:TOBject);
begin
   {Quelltext des Buttons}
end;

end.