Дабл Клик На Поле

[Nenado]

Здравствуйте.
Есть 2 таблицы(ACCESS), связанные между собой. В гриде одной формы отображаются данные 1 таблицы, в гриде 2-й формы - данные 2-й таблице. на событие даблклик 1-го грида прописал код:

procedure TForm1.DBGridEh1DblClick(Sender: TObject);
begin
if DBGridEh1.SelectedField.FieldName='Count' then
form2.ADOQuery1.Filtered:=false;
Form2.ADOQuery1.Filter:='count ='''+form1.ADOQuery1.FieldByName('count').AsString +'''';
Form2.ADOQuery1.Filtered:=true;
Form2.ShowModal;
end;

т.е. при клике на поле "Count" должна открытся 2-я форма с гридом в котором отображаются данные таблицы 2(которая связана с 1-й таблицей).... но почему то это не работает, и у меня при нажатии на любое поле открывается 2-я форма...обьясните как это исправить?

 

[nayke]

Здравствуйте.
Есть 2 таблицы(ACCESS), связанные между собой. В гриде одной формы отображаются данные 1 таблицы, в гриде 2-й формы - данные 2-й таблице. на событие даблклик 1-го грида прописал код:

procedure TForm1.DBGridEh1DblClick(Sender: TObject);
begin
if DBGridEh1.SelectedField.FieldName='Count' then
form2.ADOQuery1.Filtered:=false;
Form2.ADOQuery1.Filter:='count ='''+form1.ADOQuery1.FieldByName('count').AsString +'''';
Form2.ADOQuery1.Filtered:=true;
Form2.ShowModal;
end;

т.е. при клике на поле "Count" должна открытся 2-я форма с гридом в котором отображаются данные таблицы 2(которая связана с 1-й таблицей).... но почему то это не работает, и у меня при нажатии на любое поле открывается 2-я форма...обьясните как это исправить?

1. После then пропустили begin и соответственно end; после Form2.ShowModal;
2. Поле count текстовое?