Сортировка в DBGridEh

[rombler69]

Есть программа, работающая с базой access. В DBGridEh выводятся результаты поиска фамилий(like),
для примера:
Петрова
Петров
Петровичев
Петров
Хотелось бы, чтобы при нажатии на заголовок колонки, фамилии сортировались

Как выходит:
В свойствах нужной колонки DBGridEh1.Columns[2].Title.TitleButton = true, SotrMarker=smdowneh
В событии грида OnTitleBtnClick пишу

procedure TForm1.DBGridEh1TitleBtnClick(Sender: TObject; ACol: Integer;
  Column: TColumnEh);
begin
     DBGridEh1.Columns[2].Title.SortMarker:=smdownEh;
     ADOQuery1.Active:=false;
     ADOQuery1.SQL.Clear;
     ADOQuery1.SQL.Add('SELECT *');
     ADOQuery1.SQL.Add('FROM Table');
     ADOQuery1.SQL.Add('ORDER BY '+ DBGridEh1.Columns[2].FieldName);
     ADOQuery1.Active:=true;
end;

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

[quit]

ну так правильно, у вас же запрос так и записан

SELECT * FROM Table 
ORDER BY + DBGridEh1.Columns[2].FieldName;

а LIKE то нету Поэтому у вас все записи и выводит

[rombler69]

Подскажите тогда пожалуйста, как добавить LIKE в эту строку ?

[quit]

ADOQuery1.SQL.Add('SELECT *');
ADOQuery1.SQL.Add('FROM Table');
ADOQuery1.SQL.Add('WHERE surname LIKE ' + Edit1.Text);//откуда берете условие, например из Edit 
ADOQuery1.SQL.Add('ORDER BY '+ DBGridEh1.Columns[2].FieldName);

[Stilet]

     ADOQuery1.SQL.Add('SELECT *');
     ADOQuery1.SQL.Add('FROM Table');
     ADOQuery1.SQL.Add('WHERE '+ DBGridEh1.Columns[2].FieldName+' LIKE '+QuotedStr('Петр')+'%');
     ADOQuery1.SQL.Add('ORDER BY '+ DBGridEh1.Columns[2].FieldName);

Типа такого.

[rombler69]

quit, Stilet спсибо большое, а я все пытался в одну строку разместить
Вам ++