Показать сообщение отдельно
  #11  
Старый 18.09.2016, 13:37
s2000 s2000 вне форума
Прохожий
 
Регистрация: 19.07.2016
Сообщения: 9
Версия Delphi: Delphi Seattle
Репутация: 10
По умолчанию

Здравствуйте. У меня в запросе участвуют 3 таблицы. Запрос работает, но в результате почему, то возникают дубликаты значений. Пытался сделать через UNION - не получилось... В чем моя ошибка?

Код:
DataModule1.DataSource2.DataSet:=Datamodule1.FDQuery2;
TehRezStart.DBGrid5.DataSource:=Datamodule1.DataSource2;
Datamodule1.FDQuery2.Close;
Datamodule1.FDQuery2.SQL.Clear;
Datamodule1.FDQuery2.SQL.Add('SELECT DISTINCT ProtokolStartTeh.NumRecID,ProtokolStartTeh.SportSoName,');
Datamodule1.FDQuery2.SQL.Add('SportHorses.HorseName,TehRezSupport.TehRezStartID');
Datamodule1.FDQuery2.SQL.Add('FROM ProtokolStartTeh,SportHorses,TehRezSupport');
Datamodule1.FDQuery2.SQL.Add('WHERE ProtokolStartTeh.HorseID=SportHorses.ID');
Datamodule1.FDQuery2.SQL.Add('AND   ProtokolStartTeh.DataProved=TehRezSupport.TehRezData');//+DateToStr(TehRezSTART.DateTimePicker1.Date)+  //"2016-09-14"
Datamodule1.FDQuery2.SQL.Add('AND   ProtokolStartTeh.NazvaZmag=:NazZMG');
Datamodule1.FDQuery2.SQL.Add('AND   ProtokolStartTeh.NumMarsh=TehRezSupport.TehRezMarshNum');
Datamodule1.FDQuery2.SQL.Add('ORDER BY TehRezSupport.TehRezStartID');
Datamodule1.FDQuery2.ParamByName('NazZMG').AsString:=TehRezStart.ComboBox2.Text;
Datamodule1.FDQuery2.Prepare;
Datamodule1.FDQuery2.Open;

Во вложении - скрин дубликатов.
Изображения
Тип файла: png 1.png (19.8 Кбайт, 4 просмотров)
Ответить с цитированием