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');
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.
