Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.05.2014, 17:36   #11
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
можно через Post эти операторы проверок добавить
В ADO метод Post скорее абстрактный чем действительный. ExecSQL должен по умолчанию и внести в БД и сохранить ее (заCOMMITитися). Post ИМХО морально устарел. Он по-моему только в BDE применим.
Цитата:
нужно все эти операторы тоже добавлять в таблицу
Какие операторы?
Эти?:
Цитата:
if (DBEdit3.Text='') then
ShowMessage('Количество') else
if (DBEdit5.Text='') then
ShowMessage('Дата') else
if (DBEdit6.Text='') then
ShowMessage('Номер столика') else
if (DBComboBox2.Text='') then
ShowMessage('Статус') else
Если да то - нет. Это операторы проверки, и не относятся к базе данных в принципе никак.

Сделай то что сказал Аватар, и пройдись по шагам. Или просто скажи вылазит ли у тебя сообщение, как я просил выше.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 14.05.2014, 16:56   #12
курбанниязов
Пользователь
 
Регистрация: 29.09.2013
Сообщений: 59
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Код:
 if DataModuleMenu.AdoTableZakazy.Modified then
Зачем это?

Я щас сделал немного подругому но незнаю продолжение что написать кода чтоб это все записовалось и сохранялась в БД подскажите что можно дописать в продолжение кода.


procedure TForm16.Button1Click(Sender: TObject);
var s:String;
begin
DataModuleMenu.ADOQuery4.Close;
DataModuleMenu.ADOQuery4.SQL.Clear;
DataModuleMenu.ADOQuery4.SQL.Add('I NSERT INTO Заказы ([Наименование], [Цена на 1 ед], [Вес/Объем], [Количество])VALUES ('+QuotedStr(dbLookUpComboBox1.Text )+', '+(DBEdit1.Text)+', '+(DBEdit2.Text)+','+(DBEdit3.Text) +')';
DataModuleMenu.ADOQuery4.ExecSQL;
DataModuleMenu.ADOQuery5.Close;
DataModuleMenu.ADOQuery5.SQL.Clear;
DataModuleMenu.ADOQuery5.SQL.Add('I NSERT INTO Заказы ([Номер столика], [Официант])VALUES ('+(dbLookUpComboBox2.Text)+', '+(DBEdit6.Text)+')';
DataModuleMenu.ADOQuery5.ExecSQL;

?????????
?????????

Последний раз редактировалось курбанниязов; 14.05.2014 в 17:14.
курбанниязов вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
С++. ошибка в коде iris_ka Помощь студентам 11 23.09.2012 22:12
Где ошибка в этом исходном коде на языке Си? Или ошибка в Excel? ArchiCurtis Помощь студентам 2 07.04.2012 14:16
Ошибка в коде zhilkinson Visual C++ 3 11.02.2012 18:41
Ошибка в коде, ошибка в css или это проблема с совместимостью с браузерами? ankris HTML и CSS 5 23.11.2010 16:58
Ошибка в коде Cronos20 PHP 3 09.07.2010 23:31