Показать сообщение отдельно
  #2  
Старый 27.11.2012, 11:04
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Пропишите её в секции 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;
А затем выполните комплит класс эт курсор
Ответить с цитированием