Problema con Consulta

[Salnhack]

Hola soy yo otra ves con otro problem,

my problem es que cuando ejecuto un consulta de seleccion y la muestro en un DBGrid, me muestra repetido eje

tengo tres tablas relacionadas Mes(id_mes,descmes), Planventa(id_plventa,id_mes,id_concventa,plventa,), Conceptoventa(id_concventa,concventa).
cuando seleciono mes me debe mostrar en el DBGrid los concepto venta (concventa) con los Planes que le corresponde de la tabla Planventa, me lo muestra pero repetidos aunue en la base dato esta bien (no esta doble),

este es el codigo que utilizo

Código Delphi [-]
var 
  id_mes:Integer; 
begin
   with DataModule4.Query1 do
     begin
      close;
      SQL.Clear;
      SQL.Add('Select (id_mes) from mes where descmes=:mes');
      ParamByName('mes').AsString:=suiDBLookupComboBox2.Text;
      Open;
      id_mes:=FieldByName('id_mes').AsInteger;
    end;
   with datamodule4.Query4 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('Select Conceptoventa.concventa,Planventa.plventa from Conceptoventa,Planventa where Planventa.id_mes=:mes');
      ParamByName('mes').AsInteger:=id_mes;
      Open;
    end;
    suiDBGrid1.Refresh;
end;

Please Help,