|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Помогите сделать поиск по фамилии в DBGrid
Помогите сделать поиск по фамилии. Столбец присоединен из другой таблицы и выведен в DBGrid.
Вообще у меня код работает, но для присоединённого столбца нет. Присоединенный столбец из Использую ADOConnection1, DataSource4, ADOTable4. Код:
procedure TForm1.Action16Execute(Sender: TObject); begin if form1.PageControl1.ActivePage=tabsheet4 then begin if Action16.Caption ='Посмотреть историю болезни' then begin if Form9.ShowModal=mrOK then begin datamodule2.ADOTable4.Filter:='(Фамилия='+''''+Form9.Edit1.Text+''''+')'; datamodule2.ADOTable4.Filtered:=true; Action16.Caption:= 'Отмена'; end else begin datamodule2.ADOTable4.Filtered:=false; Action16.Caption:= 'Посмотреть историю болезни'; end; end else begin datamodule2.ADOTable4.Filtered:=false; Action16.Caption:= 'Посмотреть историю болезни'; end; end; Последний раз редактировалось Admin, 06.12.2008 в 13:52. |
#2
|
|||
|
|||
Поиск по фамилее нужно не через ДВ ГРИД а через ADOTable4
|
#3
|
|||
|
|||
ну если в гриде вот ссилка
http://www.delphikingdom.com/asp/vie...talogid=907#01 |