поиск по фамилиям и вывод результатов в DBGrid

[Explosion]

Подскажите пожалуйста.
Я осуществляю поиск по фамилиям и вывожу результат в DBGrid.
Вот код:

With datamodule2 do
  begin
    ADOQueryPoiskSotrudnika.Close;
    ADOQueryPoiskSotrudnika.SQL.Clear;
    ADOQueryPoiskSotrudnika.SQL.Add('select * from Sotrudnik where Familiya=:et');
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('et').Value:=edit5.Text;
    ADOQueryPoiskSotrudnika.Open;
  end;

Всё прекрасно работает. Но назрели следующие вопросы:

1) Если я в 3 строчке кода ставлю %, то эта функция не работает

ADOQueryPoiskSotrudnika.SQL.Add('select * from Sotrudnik where Familiya=:et%');

Хотя вроде как должен выводить все фамилии начинающиеся с тех символов, которые хранятся в параметре et.



2)Мне кажется у меня запутанная связь между компонентами в датамодуле... Есть компонент ADOConnection1, который связывается с БД. Есть компонент DataSet1, в котором хранится таблица по которой осуществляется поиск. Есть компонент DataSource1, который связан с DataSet1. Есть компонент ADOQueryPoiskSotrudnika, в котором осуществляется запрос, и который связан с DataSource1. Есть DataSourcePoiskSotrudnika, который связан ADOQueryPoiskSotrudnika, чтоб в дальнейшем этот датасурс привязать к ДБГриду, так как ДБГрид связывается только по дата сурсам и напрямую с ADOQuery его не связать.
Скажите можно ли как-нибудь упростить связку или так оно и делается?
На 2 вопрос уже ответил. Только дошло, что ADOQueryPoiskSotrudnika достаточно связать с ADOConnection1 и все работает =ъ

3) Можно ли как-нибудь сделать, чтоб при поиске выделялась найденная запись в ДБГриде? И какой командой обращаться к выделенной записи в ДБГриде?

4) А еще слышал про такую структуру как LookupResult, может проще искать лукапризалтом? Если да то не подскажите как примерно с этим работать.

5) Подскажите пожалуйста текст запроса: поиск по фамилии, имени, отчеству, но так чтоб если задана фамилия, то имя и отчество учитывалась с учетом заданной фамилии.

[soleil@mmc]

 ADOQueryPoiskSotrudnika.SQL.Add('select * from Sotrudnik where Familiya like:et');
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('et').Value:=edit5.Text + '%';

искать запись можно локейтом по датасету
датасет.locate('field', value, [LocateOptions])
все подробности по кнопке F1

[Explosion]

Спасибо огромное! А как насчет 3 вопроса?

[soleil@mmc]

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

Спасибо огромное! А как насчет 3 вопроса?

это и есть по 3му вопросу

Сообщение от soleil@mmc

искать запись можно локейтом по датасету
датасет.locate('field', value, [LocateOptions])
все подробности по кнопке F1

а к записи обращаются не в дбгриде, а в датасете

[dron-s]

3) Можно ли как-нибудь сделать, чтоб при поиске выделялась найденная запись в ДБГриде? И какой командой обращаться к выделенной записи в ДБГриде?

необходимо отрисовывать в самом гриде

[Serge_Bliznykov]

необходимо отрисовывать в самом гриде

не, не надо ничего ручками отрисовывать!
soleil@mmc, в пост #4 уже полностью ответил на этот вопрос!

[Explosion]

Спасибо всем большое!
А не могли бы вы привести пример кода

датасет.locate('field', value, [LocateOptions])

. В фиелде мы через запятую прописываем поля которые будут выделяться, а что вписывать впараметре value и какие бывают LocateOptions?

А еще подскажите пожалуйста текст запроса. Я осуществляю поиск по фамилии, имени, отчеству:

With datamodule2 do
  begin
    ADOQueryPoiskSotrudnika.Close;
    ADOQueryPoiskSotrudnika.SQL.Clear;
    ADOQueryPoiskSotrudnika.SQL.Add('select * from Sotrudnik where (Familiya like :etFamiliya) and (Imya like :etImya) and (Otchestvo like :etOtchestvo)');
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etFamiliya').Value:=edit5.Text+'%';
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etImya').Value:=edit6.Text+'%';
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etOtchestvo').Value:=edit7.Text+'%';
    ADOQueryPoiskSotrudnika.Open;
  end;

У меня все работает. А теперь надо сделать, чтобы поиск осуществлялся кроме ФИО еще и по "статусу сотрудника", "организации" и "должности". Пробую так ничего не выходит (ругается на неверно заданный параметр):

With datamodule2 do
  begin
    ADOQueryPoiskSotrudnika.Close;
    ADOQueryPoiskSotrudnika.SQL.Clear;
    ADOQueryPoiskSotrudnika.SQL.Add('select * from Sotrudnik where (Familiya like :etFamiliya) and (Imya like :etImya) and (Otchestvo like :etOtchestvo) and (FK_StatusSotrudika = :etStatus) and (FK_Organization = :etOrganization) and (FK_Dolzhnost = :etDolzhnost)');
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etFamiliya').Value:=edit5.Text+'%';
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etImya').Value:=edit6.Text+'%';
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etOtchestvo').Value:=edit7.Text+'%';
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etStatus').Value:=DBLookupComboBox1.KeyValue;
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etOrganization').Value:=DBLookupComboBox2.KeyValue;
    ADOQueryPoiskSotrudnika.Parameters.ParamByName('etDolzhnost').Value:=DBLookupComboBox3.KeyValue;
    ADOQueryPoiskSotrudnika.Open;
  end;

[Serge_Bliznykov]

не могли бы вы привести пример кода

типа так:

if YourDataset.Locate('Familiya;Imya;Otchestvo' VarArrayOf([Edit5.Text,Edit6.Text,Edit7.Text]),[loCaseInsensitive]) then
   // тут код, если запись нашлась
else
  // нет таких данных в выборке!

А нажать на Locate F1 ?!!!
из хелпа:

TLocateOption = (loCaseInsensitive, loPartialKey);

loCaseInsensitive	Key fields and key values are matched without regard to case.
loPartialKey	Key values can include only part of the matching key field value; for example, 'HAM' would match both 'HAMM' and 'HAMMER.'

А теперь надо сделать, чтобы поиск осуществлялся кроме ФИО еще и по "статусу сотрудника"

А типы данных совпадают?!
Какого типа поля (FK_StatusSotrudika, FK_Organization, FK_Dolzhnost ) ?
А с какой таблицей связаны DBLookupComboBox 1 2 3 ?
А Вы не забыли Выбрать все три величины?! (при Вашем подходе все ComboBox-ы должны иметь выбранное значение параметра!

[Explosion]

А нажать на Locate F1 ?!!!

На ф1 конечно же нажимал, но перевести не смог... Получается loPartialKey работает аналогично тому как в запросах like?
Спасибо за пример, сча попробую... А вот еще такой вопрос, допустим поиск дал 2 результата, 2 записи, а выделилась первая запись, есть ли какая нибудь команда, перебросить локейт на следующую запись?

А типы данных совпадают?!
Какого типа поля (FK_StatusSotrudika, FK_Organization, FK_Dolzhnost ) ?
А с какой таблицей связаны DBLookupComboBox 1 2 3 ?
А Вы не забыли Выбрать все три величины?! (при Вашем подходе все ComboBox-ы должны иметь выбранное значение параметра!

FK_StatusSotrudika, FK_Organization, FK_Dolzhnost типа интежер, это внешние поля служащие для связи со справочниками. В DBLookupCombobox'ы как раз хранятся значения справочников.
DBLookupCombobox.Key value это как раз тоже интережер, поэтому с FK_StatusSotrudika, FK_Organization, FK_Dolzhnost типы данных совпадают... При добавлении все работает прекрасно.

Вы правы при моем раскладе все 3 величины надо чтоб были выбраны, я когда тестил не выбрал все 3, так как написал одно а хотел совсем другое... Если не сложно подскажите как написать запрос для не стрингового типа, чтоб по ним можно было осуществлять поиск. Если допустим один комбобокс не выбран осуществляется поиск по двум другим и т.д. У меня все работает с фамилией, именем, отчеством как задумано. Вот теперь хочется очень хочется, чтоб по ДБЛукапкомбобоксам результаты поиска фильтровались.
А еще мне кажется с такой проблемой столкнусь: когда у DBCombobox'a не выбрано значение, то по умолчанию KeyValue равно нулю и поэтому он наверно будет левые результаты выдавать...

[Explosion]

А нажать на Locate F1 ?!!!

На ф1 конечно же нажимал, но перевести не смог... Получается loPartialKey работает аналогично тому как в запросах like?
Спасибо за пример, сча попробую... А вот еще такой вопрос, допустим поиск дал 2 результата, 2 записи, а выделилась первая запись, есть ли какая нибудь команда, перебросить локейт на следующую запись?

А типы данных совпадают?!
Какого типа поля (FK_StatusSotrudika, FK_Organization, FK_Dolzhnost ) ?
А с какой таблицей связаны DBLookupComboBox 1 2 3 ?
А Вы не забыли Выбрать все три величины?! (при Вашем подходе все ComboBox-ы должны иметь выбранное значение параметра!

FK_StatusSotrudika, FK_Organization, FK_Dolzhnost типа интежер, это внешние поля служащие для связи с первичными ключами в справочниках. В DBLookupCombobox'ы как раз хранятся значения справочников.
DBLookupCombobox.Keyvalue это как раз тоже числовой тип, поэтому с FK_StatusSotrudika, FK_Organization, FK_Dolzhnost типы данных думаю совпадают... Тем более при добавлении все работает прекрасно.

Вы правы при моем раскладе все 3 величины надо чтоб были выбраны, я когда тестил не выбрал все 3, так как написал одно а хотел совсем другое... Если не сложно подскажите как написать запрос для не стрингового типа, чтоб по ним можно было осуществлять поиск. Если допустим один комбобокс не выбран осуществляется поиск по двум другим и т.д. У меня все работает с фамилией, именем, отчеством как задумано. Вот теперь очень хочется, чтоб по ДБЛукапкомбобоксам результаты поиска тоже фильтровались как по заданной фамилии, имени, отчеству.
А еще мне кажется с такой проблемой столкнусь: когда у DBCombobox'a не выбрано значение, то по умолчанию KeyValue равно нулю и поэтому он наверно будет левые результаты выдавать...

Locate попробовал. Запускаю делфи ругается что не знает, что такое loPartialKey.

if Datamodule2.ADODataSetSotrudnik.Loc ate('Familiya;Imya;Otchestvo', VarArrayOf([Edit5.Text,Edit6.Text,Edit7.Text]), [loPartialKey]) then
begin
end
else
begin
end;