Сортировка полей в DBGrid по клику на заголовок?

← →
ev © (2004-04-15 12:42) [0]

Пишу такой код выдает ошибку в чем дело?
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;

← →
A_N_D © (2004-04-15 12:46) [1]

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;

← →
serge35 (2004-04-15 12:47) [2]

form1.Query1.Active:=false;
form1.Query1.SQL.Text:=("select * from events order by "+ column.FieldName);
form1.Query1.Active:=true;

← →
serge35 (2004-04-15 12:48) [3]

После order by - пробел.

← →
ev © (2004-04-15 12:55) [4]

Я пробовал не получаеться!

← →
Reindeer Moss Eater © (2004-04-15 12:56) [5]

form1.Query1.Active:=false;
form1.Query1.SQL.Text:=("select * from events order by "+ column.FieldName);
form1.Query1.Active:=true;

А если нет ни колонок созданных в DesignTime ни экземпляров TField?

← →
Ozone © (2004-04-15 12:57) [6]

Что за ошибка?

← →
Vlad © (2004-04-15 13:01) [7]

var FName: string; .... FName:=column.FieldName; form1.Query1.SQL.Text:=("select * from events order by "+ FName); // После этого Query.Active само станет false form1.Query1.Active:=true;

← →
ev © (2004-04-15 13:02) [8]

Вот ошибкак какая

Invalid use of keyword
Token:BY
Line number: 1

← →
Reindeer Moss Eater © (2004-04-15 13:08) [9]

...
ShowMessage(form1.Query1.SQL.Text);
form1.Query1.Active:=true;
...

← →
ev © (2004-04-15 13:12) [10]

ShowMessage(form1.Query1.SQL.Text);
Эта команда дает:
select * from events order by
А почему не добовляеться "column.FieldName"??

← →
Reindeer Moss Eater © (2004-04-15 13:13) [11]

Оно как раз добавляется.
Оператор "+" работает как надо. Делай выводы....

← →
ev © (2004-04-15 13:19) [12]

Пробую явно указать:
form1.Query1.SQL.Text:=("select * from events order by "+ "eventno");
Работает, а как хотелось бы нет!

← →
Johnmen © (2004-04-15 13:26) [13]

>Работает, а как хотелось бы нет!

Это просто восторг !
А выводы как же ??? см. Reindeer Moss Eater © (15.04.04 13:13) [11]

← →
ev © (2004-04-15 13:28) [14]

Помогите диплом горит :(

← →
Danilka © (2004-04-15 13:29) [15]

[14] ev © (15.04.04 13:28)
Туши скорее!

← →
ev © (2004-04-15 13:32) [16]

Я все делал так же как:
http://www.sources.ru/delphi/db/sort_dbgrid_on_column_click.shtml
Но чтото видимо там не так (кроме while)!

← →
ev © (2004-04-15 13:40) [17]

Что то не кому тут мой вопрос не интересен?

← →
Reindeer Moss Eater © (2004-04-15 13:49) [18]

Ты стал неинтересен.
А не вопрос твой

← →
Ozone © (2004-04-15 13:54) [19]

TO Reindeer Moss Eater ©[18]

Ни фига себе выводы ты делаешь... Нельзя так человека обижать.

А тут вопросы обсуждаются или что то еще?
Я конечно не настаиваю, и на этом спасибо!

> Ozone
Спасибо за поддержку!

Всем спасибо! Вроде как работает! Если надо могу послать код!
Извините за навязчивость!

Ozone вот видишь - была куча постов и не было никакого прогесса и была стагнация.
Потом был пост 18 и спустя 11 минут была удача.
И сказал бы я, что это хорошо.

> Reindeer Moss Eater Философ :)

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

мой прогноз след. поста - как поменять порядок сортировки? :)

Да не я это уже на этом форуме выяснил :)!

Удалено модератором
Примечание: Тебе мало своей ветки, решил и в чужих помусорить

Удалено модератором
Примечание: Ищи его ветку и там отвечай

Сортировка полей в DBGrid по клику на заголовок? Найти похожие ветки