Ordenar un DBGrid por columna

[DOS]

Gracias ecfisa, recien hoy pude ponerme a trabajar, el asunto es que lo voy a realizar con un Query y dataSource por medio del combobox, el codigo que realice es el siguiente.

Código SQL [-]
procedure TForm17.Button2Click(Sender: TObject);
begin
if combobox1.Text = 'Servicio' then
begin    
  Query1.Close;    
  Query1.SQL.Clear;
  Query1.SQL.ADD('SELECT * FROM servicio.DB ORDER BY Servicio ASC');
  Query1.Active:=true;
  Query1.Open;  
end;

if combobox1.Text = 'Codigo' then
  begin    
  Query1.Close;    
  Query1.SQL.Clear;
  Query1.SQL.ADD('SELECT * FROM servicio.DB ORDER BY Codigo ASC');
  Query1.Active:=true;
  Query1.Open;  
end;

El asunto es que lo que hace es poner los campos de arriba para abajo o de abajo para arriba, pero no los ordena alfabeticamente, solo gira las tablas. Faltará configurar algun dato en elgun lado?
Gracias por su ayuda.