JOIN BANYAK TABEL

  with dm.UniQuery3 do

  begin

    if  edtautolube.Text='' then

    begin

      ShowMessage('Please Choose Type Brand');

    end

    else

    begin

      Close;

      SQL.Clear;

      SQL.Add('select B.*,M.*,C.*,PA.*');

      //  SQL.Add('  Select  B.brand,M.modelbrand,C.IdCategory,PA.PartNumb,PA.Description,PA.Uom,PA.Total');

      SQL.Add('from  TBrand B');

      SQL.Add(' LEFT OUTER JOIN Tcategory C  on PA.Idcategory=C.id ');

      SQL.Add(' LEFT OUTER JOIN PartALL2 PA on M.Id=PA.IdModel ');

      SQL.Add(' LEFT OUTER JOIN TModel M on B.Id=M.IdBrand');

     // SQL.Add(' LEFT OUTER JOIN table01 PA on M.Id=PA.IdModel ');

      // SQL.Add(' LEFT OUTER JOIN TTYPE T on V.IdType=T.id');

      //  SQL.Add(' LEFT OUTER JOIN Tvalue V on B.IdBrand=V.idbrand ');

      //   SQL.Add('where M.id BETWEEN M.Id=:idT AND T.Id=:idM ' );

      SQL.Add('where M.Id=:idT');

      ParamByName('idT').AsString:=trim(lblidtype1.Caption);

      // ParamByName('idm').AsString:=trim(lblmodel1.Caption);

      Open;

      DBGrid6.Columns[0].Width:=0;

      DBGrid6.Columns[1].Width:=0;

      DBGrid6.Columns[2].Width:=0;

      DBGrid6.Columns[3].Width:=0;

      DBGrid6.Columns[4].Width:=0;

      DBGrid6.Columns[5].Width:=0;

      DBGrid6.Columns[6].Width:=0;

      DBGrid6.Columns[7].Width:=0;

      DBGrid6.Columns[8].Width:=0;

      DBGrid6.Columns[9].Width:=180;

      DBGrid6.Columns[10].Width:=270;

      DBGrid6.Columns[11].Width:=30;

      DBGrid6.Columns[12].Width:=30;

      DBGrid6.Columns[13].Width:=0;

      DBGrid6.Columns[14].Width:=0;

    end;

  end;