[rasamaha]

Выдает ошибку " Unsigned Inditifier 'QyerySQL' ".
Какие нужно подключить библиотеки для работы с квери, если проблема в них?

Код:

procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
 with Query1 do 
  begin
    DisableControls;
    Close; 
    SQL.Clear; 
    SQL.Add(QuerySQL);
    SQL.Add('ORDER BY ' + Column.FieldName); 
    Open; 
    // Восстанавливаем настройки заголовка, иначе всё станет синим
    DBGrid1.Columns.RestoreDefaults; 
    Column.Title.Font.Color := clBlue; 
    EnableControls; 
  end; 
end;

[TOJluK]

А что есть QuerySQL? Тут SQL.Add(QuerySQL) в скобках должен быть SQL код. Либо пишем код в скобках, либо задаем переменную QuerySQL типа string и записываем в нее код.

[rasamaha]

Эх...чайник я еще)))
Спасибо за заданное направление, буду "грызть" дальше!