[MoDEus]

вот так выглядит код запроса, но что то неправильно написано понять немогу , помогите!!!

Код:

1 2 3 4 5 6 7 8

procedure TForm18.Button1Click(Sender: TObject); begin Form18.Query1.Close; Form18.Query1.SQL.Add ('SELECT a.KOD_ZAPISI, a.DATA_ZAPIS, b.NAZVANIE_M, c.MARKA_AVTO, d.NAIMENOVAN, d.CENA'); Form18.Query1.SQL.Add ('FROM PUTEV_ZH.DBF a, MARSHRUT.DBF b, AVTOMOBI.DBF c, GSM.DBF  '); Form18.Query1.SQL.Add (' where (a .KOD_MARSHR = d .KOD_MARSHR)  and  (a .KOD_AVTO = c .KOD_AVTO) and (d .KOD_GSM = c .KOD_GSM)  and (MARKA_AVTO = '+edit1.Text+')'); Form18.Query1.Open; end;

Admin: Используем теги!

[AlexSku]

Перед FROM нужен пробел.

[MoDEus]

Спасибо, я уже сделал этот запрос, не подскажите как его теперь вывести в отчет???
правильный код

Код:

1 2 3 4 5 6

Form18.Query1.Close; Form18.Query1.SQL.Clear; Form18.Query1.SQL.Add ('SELECT a.KOD_ZAPISI, a.DATA_ZAPIS, b.NAZVANIE_M, c.MARKA_AVTO, d.NAIMENOVAN, d.CENA'); Form18.Query1.SQL.Add ('FROM PUTEV_ZH.DBF a, MARSHRUT.DBF b, AVTOMOBI.DBF c, GSM.DBF d '); Form18.Query1.SQL.Add (' where (a .KOD_MARSHR = b.KOD_MARSHR)  and  (a .KOD_AVTO = c .KOD_AVTO) and (d .KOD_GSM = c .KOD_GSM)  and (MARKA_AVTO = '+edit1.Text+')'); Form18.Query1.Open;