Ordenar un DBGrid por columna

[DOS]

Nop, sigue sin funcionar, le agregue ordenar por importe y ese si lo ordena bien, parece que no tuviera problemas con campos numericos pero no sabe bien el abecedario

[Casimiro Noteví]

Empezado por DOS

Nop, sigue sin funcionar, le agregue ordenar por importe y ese si lo ordena bien, parece que no tuviera problemas con campos numericos pero no sabe bien el abecedario

A ver, pon aquí algún resultado de esos que no te salen ordenados, que lo veamos.

[DOS]

ja ja ja, no lo puedo creer era algo muy tonto, cuando empieza con mayusculas primero lo ordena por estas, luego ordena las minusculas, creo que debere ponerle una restricion al campo para que sea todo minuculas, no?
Muchas Gracias

[DOS]

Antes de dar por cerrado el tema y abusando de sus conocimientos de mi parte, he decidico complicarlo poniendo 4 tablas
Mascotas
Cod_mascota*
Cod_prop
nombre
raza
fecha_nac

Propietario
Cod_prop*
Nombre
Apellido
Direccion
Localidad

Peluquero
Cod_peluquero
Nombre
Apellido
Direccion

Turnos de peluqueria
Cod_turno
Cod_masc
Cod_prop
Cod_pelu
Fecha

El DBGrid tien los sig. campos
Fecha
Hora
Cliente //campo creado mediante la union con propietario
Mascota //campo creado mediante la union con mascota
Peluquero //campo creado mediante la union con peluquero

y el codigo del boton es el siguiente

Código Delphi [-]
procedure TForm16.Button8Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Text:= 'SELECT * FROM turnopelu.DB ';
  Query1.SQL.Add('INNER JOIN peluquero.DB ON Cod_pelu = Cod_peluquero');
  Query1.SQL.Add('INNER JOIN propietario.DB ON Cod_cli = Cod_prop');
  Query1.SQL.Add('INNER JOIN mascota.DB ON Cod_masc = Cod_mascota');
  //Query1.SQL.Add('GROUP BY turnopelu.DB');

if combobox1.Text = 'Fecha' then
begin    
  Query1.SQL.ADD(' ORDER BY Fecha ASC');
  Query1.Active:=true;
end
else

if combobox1.Text = 'Peluquero' then
  begin    
  Query1.SQL.ADD(' ORDER BY Cod_pelu ASC');
  Query1.Active:=true;
end
else

if combobox1.Text = 'Mascota' then
  begin    
  Query1.SQL.ADD(' ORDER BY Cod_masc ASC');
  Query1.Active:=true;
end;
end;

El problema es que no me muestra los datos de los campos agregados solo la fecha.