![]() |
|
|
#1
|
|||
|
|||
|
вот так выглядит код запроса, но что то неправильно написано понять немогу , помогите!!!
Код:
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: Используем теги! Последний раз редактировалось Admin, 16.05.2008 в 12:08. |
|
#2
|
|||
|
|||
|
Перед FROM нужен пробел.
|
|
#3
|
|||
|
|||
|
Спасибо, я уже сделал этот запрос, не подскажите как его теперь вывести в отчет???
правильный код Код:
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; |