Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 22.05.2011, 22:57
Аватар для RusSTEEL
RusSTEEL RusSTEEL вне форума
Новичок
 
Регистрация: 10.03.2011
Сообщения: 53
Репутация: 10
По умолчанию Запрос на добавление в таблицу с условием

Есть таблица ITOG нужно чтобы при появлении в edit1.text='1' в таблицу заносились данные из edit2.text при edit1.text='0' данные их edit3.text.
НО при ЭТОМ есть запрос на добавление:
Код:
Query3.Close;
Query3.SQL.Clear;
Query3.SQL.Add ('insert into itog '+
                '(name_c, Den, Vpemya, frst, dva, tri, etr, Pyat) values' +
                '('+#39+edit12.Text+#39+', '+#39+edit10.Text+#39+', '+#39+edit11.Text+#39+', '+#39+edit3.Text+#39+','+#39+edit6.Text+#39','+#39+edit7.Text+#39','+#39+edit8.Text+#39','+#39+edit9.Text+#39')');
Query3.execSQL;
Query3.Close;
close;
прописав запрос указанный ниже добавляется только данные из едит1 из остальные остаются пустые.
Код:
Query3.SQL.Clear;
Query3.SQL.Add ('insert into itog '+
                '(danger) values' +
                '('+#39+edit1.Text+#39+')');
Query3.execSQL;
Query3.Close;
прошу совета как объединить 2 запроса на добавление и второй с условием.
__________________
не спрашивайте у меня, ЗДЕСЬ СПРАШИВАЮ Я!!!
Ответить с цитированием
  #2  
Старый 23.05.2011, 01:14
Vocabulary Vocabulary вне форума
Новичок
 
Регистрация: 17.09.2009
Сообщения: 85
Репутация: 9
По умолчанию

Код:
var S : string;
begin
  ...
  S := Edit2.Text;
  if Edit1.Text = '0' then
    S := Edit3.Text;
  Query3.SQL.Clear;
  Query3.SQL.Add ('insert into itog '+
         '(danger, name_c, Den, Vpemya, frst, dva, tri, etr, Pyat) values' +
         '('+QuotedStr(S)+', '+...
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 14:29.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter