[Sotrono]

Hola, conozco dos metodos, yo utilizo el primero.

Código Delphi [-]
   With Query1 do
   begin
     Active:= false;
     SQL.Clear;
     SQL.Add('SELECT Alquileres.IdAlquiler,' +
                    'Peliculas.Nombre,' +
                    'Alquileres.Fecha_Alquiler,' +
                    'Alquileres.Fecha_Devolucion ' +
                    'FROM Socios INNER JOIN (Alquileres INNER JOIN Peliculas '+
                    'ON Alquileres.IdPelicula = Peliculas.IdPelicula) ' +
                    'ON Alquileres.IdSocio = Socios.IdSocio;'
            );
     Active:= true;
   end;

Código Delphi [-]
  Query1.Active:= false;
   with Query1.SQL do
   begin
     Clear;
     Add('SELECT Alquileres.IdAlquiler,');
     Add('Peliculas.Nombre,');
     Add('Alquileres.Fecha_Alquiler,');
     Add('Alquileres.Fecha_Devolucion ');
     Add('FROM Socios INNER JOIN (Alquileres INNER JOIN Peliculas ');
     Add('ON Alquileres.IdPelicula = Peliculas.IdPelicula) ');
     Add('ON Alquileres.IdSocio = Socios.IdSocio;');
   end;
   Query1.Active:= true;