Показать сообщение отдельно
  #11  
Старый 05.12.2013, 17:33
YuliyaKar YuliyaKar вне форума
Прохожий
 
Регистрация: 13.11.2013
Сообщения: 37
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Ну и опять все к тому же. Ну никак не получается у меня сделать эту вставку строки в столбец
Выбивает ошибку Type mistmach in expression
Я разбила и сделала вот так
Код:
Query3.Active:=false;
 query3.SQL.Clear;
 query3.SQl.Text:='INSERT INTO DSO.db (KN)';
 query3.SQL.Text:='SELECT (10) FROM Stab.db WHERE DRAFT ='''+edit8.Text+''' UNION select (20) FROM Stab.db WHERE DRAFT ='''+edit8.Text+''' UNION select (30)FROM Stab.db WHERE DRAFT ='''+edit8.Text+''''; //FROM Stab.db WHERE DRAFT ='''+edit8.Text+'''';
 query3.ExecSQL;
 if Query3.IsEmpty then
  raise Exception.Create('Ничего не найдено')
else edit10.Text:= Query3.FieldByName('10').AsString;
 table5.Close;
 table5.Open;
Решил проверить выбирает ли он вообще хоть что-то и решил запистаь результат в поле edit10,но и оно выбивает ошибку "Что запись не найдена". Что его делать? Непонятно ... подскажите что-то ((
Ответить с цитированием