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

  • Автор темы Nenado
  • Дата начала
Статус
Закрыто для дальнейших ответов.
N

Nenado

#1
Здравствуйте.
Есть 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

Well-known member
04.08.2010
310
0
#2
Здравствуйте.
Есть 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 текстовое?
 
Статус
Закрыто для дальнейших ответов.