Komponenten in Prozedur nicht erkannt

[IckyWolf]

Delphi-Quellcode:

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Grids,
  StdCtrls, ExtCtrls, Menus, Buttons, ActnList,
  test;

type

  { TForm1 }

  TForm1 = class(TForm)
    BitBtn_c: TBitBtn;
    BitBtn10: TBitBtn;
    BitBtn9: TBitBtn;
    BitBtn_d: TBitBtn;
    BitBtn_v: TBitBtn;
    BitBtn_fh: TBitBtn;
    BitBtn_ks: TBitBtn;
    BitBtn_gs: TBitBtn;
    BitBtn_k: TBitBtn;
    BitBtn_eins: TBitBtn;
    BitBtn_zwei: TBitBtn;
    BitBtn_drei: TBitBtn;
    BitBtn_vier: TBitBtn;
    BitBtn_fuenf: TBitBtn;
    BitBtn_sechs: TBitBtn;
    BitBtn_Versuche: TBitBtn;
    BitBtn2: TBitBtn;
    CheckBox1: TCheckBox;
    CheckBox2: TCheckBox;
    CheckBox3: TCheckBox;
    CheckBox4: TCheckBox;
    CheckBox5: TCheckBox;
    Edit_d: TEdit;
    Edit_v: TEdit;
    Edit_fh: TEdit;
    Edit4: TEdit;
    Edit5: TEdit;
    Edit6: TEdit;
    GroupBox1: TGroupBox;
    Image1: TImage;
    Image2: TImage;
    Image3: TImage;
    Image4: TImage;
    Image5: TImage;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    Label8: TLabel;
    MainMenu1: TMainMenu;
    MenuItem1: TMenuItem;
    MenuItem10: TMenuItem;
    MenuItem11: TMenuItem;
    MenuItem12: TMenuItem;
    MenuItem13: TMenuItem;
    MenuItem14: TMenuItem;
    MenuItem15: TMenuItem;
    MenuItem2: TMenuItem;
    MenuItem3: TMenuItem;
    MenuItem4: TMenuItem;
    MenuItem5: TMenuItem;
    MenuItem6: TMenuItem;
    MenuItem7: TMenuItem;
    MenuItem8: TMenuItem;
    MenuItem9: TMenuItem;
    Panel1: TPanel;
    StringGrid1: TStringGrid;
    procedure BitBtn10Click(Sender: TObject);
    procedure BitBtn2Click(Sender: TObject);
    procedure BitBtn9Click(Sender: TObject);
    procedure BitBtn_dClick(Sender: TObject);
    procedure BitBtn_VersucheClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);

  private
    procedure Neu;

  public



  var
  Form1: TForm1;

  end;

ist das "end;" vielleicht an der falschen stelle?...ohne funktioniert es jedenfalls nicht