Hola
Tal vez usando un DISTINCT, creo que necesitaras un group by.
Algo asi:
Código Delphi
[-]
begin
dm.Query.Close;
dm.Query.SQL.Clear;
dm.Query.SQL.Add('Select a.cedula, b.cedula From Empleados a, Turno_Temporal b');
dm.Query.SQL.Add('Where a.turno = :turno and ((b.turno_temp = :turno) and (b.estado =:estado))');
dm.Query.SQL.Add('Group by a.cedula, b.cedula');
DM.Query.Parameters.ParamByName('estado').DataType:=ftString;
dm.Query.Parameters.ParamByName('estado').Value:='activo';
DM.Query.Parameters.ParamByName('turno').DataType:=ftString;
DM.Query.Parameters.ParamByName('turno').Value:=ComboBox1.Text;
dm.Query.Open;
while not dm.Query.Eof do
Begin
SetLength(Arreglo, n+1);
Arreglo[n]:=dm.Query.fieldbyname('cedula').AsString;
Inc(n);
dm.Query.Next;
end;
end;
Es solo una idea, no te fies mucho.
Saludos