![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сортировка полей в DBGrid по клику на заголовок?
ev © (2004-04-15 12:42:00)Пишу такой код выдает ошибку в чем дело?
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
form1.Query1.SQL.Clear;
form1.Query1.SQL.Text:=('select * from events order by'+ column.FieldName);
form1.Query1.Active:=true;
end;
ev (2004-04-15 13:02:00) [21]Вот ошибкак какая
Invalid use of keyword
Token:BY
Line number: 1
Vlad (2004-04-15 13:01:00) [22]
var
FName: string;
....
FName:=column.FieldName;
form1.Query1.SQL.Text:=('select * from events order by '+ FName);
// После этого Query.Active само станет false
form1.Query1.Active:=true;
Ozone (2004-04-15 12:57:00) [23]Что за ошибка?
Reindeer Moss Eater (2004-04-15 12:56:00) [24]form1.Query1. Active:=false;
form1.Query1.SQL.Text:=('select * from events order by '+ column.FieldName);
form1.Query1.Active:=true;
А если нет ни колонок созданных в DesignTime ни экземпляров TField?
ev (2004-04-15 12:55:00) [25]Я пробовал не получаеться!
serge35 (2004-04-15 12:48:00) [26]После order by - пробел.
serge35 (2004-04-15 12:47:00) [27]form1.Query1.Active:=false;
form1.Query1.SQL.Text:=('select * from events order by '+ column.FieldName);
form1.Query1.Active:=true;
A_N_D (2004-04-15 12:46:00) [28]procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
form1.Query1.SQL.Clear;
form1.Query1.SQL.Text:=('select * from events order by '+ column.FieldName);
form1.Query1.Active:=true;