В чем ошибка?

[jahongir007]

Помогите пожалуйста у меня постоянно дает ошибка.
Я не могу отфильтровать.
И еще место ComboBox можно поставит CheckListBox и выбрать несколько стран и показатели.

procedure TForm1.N6Click(Sender: TObject);
begin
close;
end;

procedure TForm1.N7Click(Sender: TObject);
begin
panel1.Visible:=true;
begin
ComboBox1.Items.Clear;
ComboBox2.Items.Clear;
ComboBox3.Items.Clear;
ComboBox4.Items.Clear;
 with Table1 do
  begin
   First;
   while not Eof do
    begin
     ComboBox1.Items.Add(Table1.FieldByName('strana').Value);
     Next;
    end; //while
  end; //with
  with Table2 do
  begin
   First;
   while not Eof do
    begin
     ComboBox2.Items.Add(Table2.FieldByName('pokazateli').Value);
     Next;
    end; //while
  end; //with
  with Table3 do
  begin
   First;
   while not Eof do
    begin
     ComboBox3.Items.Add(Table3.FieldByName('God').Value);
     Next;
    end; //while
  end; //with
  with Table3 do
  begin
   First;
   while not Eof do
    begin
     ComboBox4.Items.Add(Table3.FieldByName('God').Value);
     Next;
    end; //while
  end; //with
end;
end;

procedure TForm1.Button2Click(Sender: TObject);

var Filtr3: string;
begin
Filtr3:= ComboBox1.Text;
{Filtr5:= ComboBox4.Text;}
with Table3 do
 begin
  CancelRange;
  SetRange([Filtr3], [Filtr3]);  ---Ошибка 
 end; //with
end;

end.

Помогите пожалуйста.

[fbus]

странно, что тему еще не закрыли с таким названием.
так не спрашивают. это не паскаль.
N7Click - это что? откуда? к чему привязано?
извини, ясновидящий в отпуске

[Stilet]

jahongir007

На какой строке ошибка?

[jahongir007]

N7Click это на maimmenu кнопка. Когда нажимаю открывается panel. Ошибка дает на фильтрации. var Filtr3: string;
begin
Filtr3:= ComboBox1.Text;
{Filtr5:= ComboBox4.Text;}
with Table3 do
begin
CancelRange;
SetRange([Filtr3], [Filtr3]); ---Ошибка
end; //with
end;

вот здесь. Не знаю кок фильтрации использовать. Помогите. Combobox3 и Combobox4 года. Выбераю например с 1965 и по 2005 . Программа должна показать выбранную страну и выбранную показатель по этим годам.

[jahongir007]

N7Click это на maimmenu кнопка. Когда нажимаю открывается panel. Ошибка дает на фильтрации. var Filtr3: string;
begin
Filtr3:= ComboBox1.Text;
{Filtr5:= ComboBox4.Text;}
with Table3 do
begin
CancelRange;
SetRange([Filtr3], [Filtr3]); ---Ошибка
end; //with
end;

вот здесь. Не знаю кок фильтрации использовать. Помогите. Combobox3 и Combobox4 года. Выбераю например с 1965 и по 2005 . Программа должна показать выбранную страну и выбранную показатель по этим годам.