фильтр в DBGrid

[ГОСЕАН]

в DBGrid необходимо реализовать возможности Access.:
1. Где стоит курсор, при нажатии фильтр, фильтруются записи по этому значению.
2. Над какой колонкой был произведен вызов всплывающего меню при вводе значение в контестном меню (Edit должен быть в контестном меню) фильтруется по этому значению, т.е если над колонкой ФИО то фильтруется по фамилии, или если над колонкой Дата, то по значению дата.

[mihali4]

Фильтр применяется не к DBGrid, а к DataSet, чьи данные он отображает.
Смотрите это свойство - FILTER у DataSet (что у вас там - Table или Query)...

[ГОСЕАН]

Сообщение от mihali4

Фильтр применяется не к DBGrid, а к DataSet, чьи данные он отображает.
Смотрите это свойство - FILTER у DataSet (что у вас там - Table или Query)...

query. как вообще такой эффект делается, если можно код

[dron-s]

читаешь значение поле где стоит курсор и делаешь фильт по этому полю (значению)...
если кверик, то запросом через order by...

[ГОСЕАН]

Сообщение от dron-s

читаешь значение поле где стоит курсор и делаешь фильт по этому полю (значению)...
если кверик, то запросом через order by...

Вы посмотрите Access пожалуйста внимательно! Вопрос ведь простой!

Над полем нажимаешь правую кнопку мыши, всплывает контестное меню. В этом меню есть строка ввода, набираешь значение и фильтруется в по этому значению. Вопрос в том как это эффект делается?

[dron-s]

у меня допусим даже не установлен акцесс...
но по твоим описанием понял что открывается не то дополнительное поле (Еdit) в котором вводятся значения и по этому значению моментально производится поиск... если же так, то делай простую выборку на OnChange того же едита...

[ГОСЕАН]

Сообщение от dron-s

у меня допусим даже не установлен акцесс...
но по твоим описанием понял что открывается не то дополнительное поле (Еdit) в котором вводятся значения и по этому значению моментально производится поиск... если же так, то делай простую выборку на OnChange того же едита...

а как вообще это поле во всплывающем меню появляется?

[dron-s]

посмотри "девок" там вроде есть такие компоненты...
или можешь ручка поэксперементировать

[Rik]

//В свойстве Caption элемента меню, просто напиши "фильтр по выбранному".

procedure TForm1.N1Click(Sender: TObject);
var
FieldName: string;
begin
FieldName := ExDDBGrid1.SelectedField.FieldName;
ExDDBGrid1.DataSource.DataSet.Filte r := FieldName + '=''' + ExDDBGrid1.SelectedField.AsString + '''';
ExDDBGrid1.DataSource.DataSet.Filte red := True;
end;

Или Для примера нужен TEdit на форме. При изменении значения в Edit1 будет обновляться фильтр для DataSet. Этот примр работат только для текстовых полей.

procedure TForm1.Edit1Change(Sender: TObject);
begin
Query1.Filter := ExDDBGrid1.SelectedField.FieldName + '=''' + Edit1.Text + '*''';
Query1.Filtered := True;
end;

[ГОСЕАН]

Сообщение от Rik

//В свойстве Caption элемента меню, просто напиши "фильтр по выбранному".

procedure TForm1.N1Click(Sender: TObject);
var
FieldName: string;
begin
FieldName := ExDDBGrid1.SelectedField.FieldName;
ExDDBGrid1.DataSource.DataSet.Filte r := FieldName + '=''' + ExDDBGrid1.SelectedField.AsString + '''';
ExDDBGrid1.DataSource.DataSet.Filte red := True;
end;

Или Для примера нужен TEdit на форме. При изменении значения в Edit1 будет обновляться фильтр для DataSet. Этот примр работат только для текстовых полей.

procedure TForm1.Edit1Change(Sender: TObject);
begin
Query1.Filter := ExDDBGrid1.SelectedField.FieldName + '=''' + Edit1.Text + '*''';
Query1.Filtered := True;
end;

Спасибо огромное, но я хотел еще реализовать дополнительную возможность: именно чтобы Edit1 был встроен во всплывающее меню! когда кликнешь над конкретным полем в DBGrid правой кнопкой и наборе во всплывающем меню значении фильтрация производится именно по набранному значению и именно в конкретном поле