Проблема с идентификатором

[Tonik_A]

Здравуйте, делаю программу, которая работает с таблицой умножения.
Для запроса координат создал два поля LabeledEdit. При компиляции возникла ошибка [Error] Unit1.pas(58): Undeclared identifier: 'Label2' и [Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'.
Позже я указал в разделе описания переменных Label1,Label2:variant; но программа не работает всё равно - invalid variant operation, кто знает подскажите, в чём тут дело?
Код программы:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, Grids, StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    MainMenu1: TMainMenu;
    N3: TMenuItem;
    N4: TMenuItem;
    N5: TMenuItem;
    StringGrid1: TStringGrid;
    Button1: TButton;
    LabeledEdit1: TLabeledEdit;
    LabeledEdit2: TLabeledEdit;
    procedure Button1Click(Sender: TObject);
    procedure LabeledEdit1Change(Sender: TObject);
    procedure LabeledEdit2Change(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
Form1: TForm1;
Label1,Label2:variant;
var a,b,err: integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var i,j:integer;
begin
for i:= 1 to StringGrid1.ColCount do StringGrid1.Cells[i,0]:=IntToStr(i);
for j:= 1 to StringGrid1.RowCount do StringGrid1.Cells[0,j]:=IntToStr(j);
for i:= 1 to StringGrid1.ColCount do
for j:= 1 to StringGrid1.RowCount do StringGrid1.Cells[i,j]:=IntToStr(i*j);
end;


procedure TForm1.LabeledEdit1Change(Sender: TObject);
var   Label1:variant;
begin
val(LabeledEdit1.Text,a,err);
if err=0 then Label1.caption:=StringGrid1.Cells[a,b];
end;


procedure TForm1.LabeledEdit2Change(Sender: TObject);
begin
val(LabeledEdit2.Text,b,err);
if err=0 then Label2.caption:=StringGrid1.Cells[a,b];
end;

end.

[Пепел Феникса]

ну у вас нет Label на форме
а вы пишете их..может вы имели в виду чтото иное?

[Tonik_A]

А что нужно что бы они были? Я вроде установил на форму этот компонент.

[W0LF]

Как можно "вроде" установить компонент и наверняка незнать об этом? Вы не установили Label1 и Label2...

[Tonik_A]

А как установить?
Где и что нужно дописать?

[RAZOR3]

Добавить из закладки Standart