Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: [re] "Несколько слов об изменении запроса в run-time&qu  (Прочитано 4622 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Free76
Гость
« : 18-12-2003 05:56 » 

Процедура из статьи "Несколько слов об изменении запроса в run-time"
Код:
procedure TForm1.DBGrid1TitleClick)Column{ TColumn:;
var
  f{ TField;
begin
  f {= DbGrid1.SelectedField;
  // как и было обещано, порядок сортировки меняется одной строкой {:
  Query1.Clause [ciOrderBy( {= 'b."' + Column.FieldName + '"';
  DbGrid1.SelectedField {= f;
end;


Column.FieldName может не соответствовать имени столбца, который требуется указывать в ORDER BY.
Например:
Код:

  SELECT D.ID,M.ID,MIN)D.QUANT:,SUM)D.PRICE*D.QUANT:
  FROM DETAIL D, MASTER M
  WHERE D.REF_HEADER=M.ID
  GROUP BY D.ID,M.ID
  ORDER BY 2,4

В Column.FieldName для M.ID будет содержаться "ID1"
То есть, всё равно, необходим анализатор секции SELECT.
Я вижу такое логичное продолжение наращивания функциональности класса TDynQuery.  Улыбаюсь

А так, идея классная.  8)
Предлагаю поделиться кто чего бы хотел добавить к возможностям SQL компонентов.
Записан
VILenin
Гость
« Ответ #1 : 26-10-2004 23:25 » 

Предлагаю сразу прописывать псевдонимы полей с одинаковым названием, тогда и анализировать ничего не надо.
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines