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

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

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 01.12.2013, 20:13   #1
ch_dark
Пользователь
 
Регистрация: 28.03.2013
Сообщений: 11
По умолчанию вычитание полей

помоготи пожалуйста! Существует 2 формы на каждой форме есть DBGRid, Table,DataSours. Первая табл склад. вторая подажи. Как сделать, чтобы когда вводишь данные в табл продажи (Form2) по нажатию кнопки сохранить вычислялось кол-во из первой таблицы (Form1)склада. Наименование товара у меня совпадает т к я сделал выпадающий список.
ch_dark вне форума Ответить с цитированием
Старый 01.12.2013, 21:12   #2
ch_dark
Пользователь
 
Регистрация: 28.03.2013
Сообщений: 11
По умолчанию

помоготи пожалуйста! Существует 2 формы на каждой форме есть DBGRid, Table,DataSours. Первая табл склад. вторая подажи. Как сделать, чтобы когда вводишь данные в табл продажи (Form2) по нажатию кнопки сохранить вычислялось кол-во из первой таблицы (Form1)склада. Наименование товара у меня совпадает т к я сделал выпадающий список.

1. x:=Form2.Table1.FieldByName('Kol'). AsInteger;
2. y:=Form3.Table1.FieldByName('Kol'). AsInteger;
3. Form2.Table1.FieldByName('Kol').AsS tring:=IntToStr(x-y) ;
выходит ошибка "Project Project1.exe raised exception class EDatabaseError with message `Table1 Dataset not in edit or insert mode` Process stopped."
ch_dark вне форума Ответить с цитированием
Старый 01.12.2013, 21:34   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Form2.Table1.append или Form2.Table1.edit перед внесением в таблицы, в зависимости от того что ты хочешь сделать.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 03.12.2013, 15:53   #4
ch_dark
Пользователь
 
Регистрация: 28.03.2013
Сообщений: 11
По умолчанию

Спасибо все получилось. Только как теперь сделать чтобы у всех записей вычитывалось кол-во, а то у меня только у первой вычитывается
1.if Form2.Table1.FieldByName('Name').te xt=Form3.Table1.FieldByName('Name') .text
2.then begin
3.Form2.Table1.edit;
4.x:=Form2.Table1.FieldByName('Kol' ).AsInteger;
5.y:=Form3.Table1.FieldByName('Kol' ).AsInteger;
6.Form2.Table1.FieldByName('Kol').A sString:=IntToStr(x-y) ;
7.Form2.table1.Post; end;
ch_dark вне форума Ответить с цитированием
Старый 03.12.2013, 15:53   #5
ch_dark
Пользователь
 
Регистрация: 28.03.2013
Сообщений: 11
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Form2.Table1.append или Form2.Table1.edit перед внесением в таблицы, в зависимости от того что ты хочешь сделать.
Спасибо все получилось. Только как теперь сделать чтобы у всех записей вычитывалось кол-во, а то у меня только у первой вычитывается
1.if Form2.Table1.FieldByName('Name').te xt=Form3.Table1.FieldByName('Name') .text
2.then begin
3.Form2.Table1.edit;
4.x:=Form2.Table1.FieldByName('Kol' ).AsInteger;
5.y:=Form3.Table1.FieldByName('Kol' ).AsInteger;
6.Form2.Table1.FieldByName('Kol').A sString:=IntToStr(x-y) ;
7.Form2.table1.Post; end;
ch_dark вне форума Ответить с цитированием
Ответ


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

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ВЫЧИТАНИЕ ПОЛЕЙ ИЗ РАЗНЫХ БД ggod БД в Delphi 14 06.05.2012 22:24
Вычитание полей с разных таблиц! RSmile Microsoft Office Access 6 25.04.2010 13:54
При удалении записей значения полей с type:=Autoincrement (т.е+) в оставшихся полей не изменяются kenta БД в Delphi 2 29.10.2009 08:28
Объеденение полей запроса в для отображения нескольких полей в одном списке mrCreator Microsoft Office Access 3 08.08.2009 00:53
Вычитание avnsanto Microsoft Office Excel 0 24.07.2009 02:33