
24.05.2010, 00:06
|
 |
Местный
|
|
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
|
|
Напиши заброс, типа:
Код:
Query1.Sql.Text:='select * from z1.db where vopros = :x1'
Query1.ParamByName('x1').AsString := x1;
Query1.Open;
If Query1.RecordCount>0 then // если нашелся Х1 то берем из таблицы Х2
x2:=Query1.FieldByName('otvet').Asstring;
|