[Alegun]

Пропишите её в секции Type:

Код:

type
  TForm1 = class(TForm)
    btn1: TrkGlassButton;
    btn2: TrkGlassButton;
     _sg1: TStringGrid;
    ImEmblem: TImage;
    img1: TImage;
    edt1: TEdit;
    lbl1: TLabel;

    procedure btn2Click(Sender: TObject);
    procedure btn1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);

    procedure TablD;


   private
    { Private declarations }

   public
    { Public declarations }
    FileName: string; 
   end;

А затем выполните комплит класс эт курсор