| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Записи в таблице

Страницы:   < 1 2 3 4 5 >

Муслик ©   (2008-06-27 13:48:00) 

Помогите разобратся с проблемой.
Есть три таблицы.

С первой таблицы я по двойному клику добавляю во вторую позиции и количество(позиции все разные) после того как всё сделано мне нужно в третью добавить данные из второй(это без проблем)
Проблема:
после я таблицу очищаю и заполняю новую, как мне добавить кол-во товара к существующему товару если товар из второй таблицы равен третьей, если товара не существует в третьей таблице добавить новый

---

Игорь Шевченко   (2008-06-30 17:02:00) [1]

Предлагаю автору почитать правила данного сайта и научиться их уважать.

---

Поросенок Винни-Пух   (2008-06-30 16:54:00) [2]

Удалено модератором

---

Dennis I. Komarov   (2008-06-30 16:52:00) [3]

Удалено модератором

---

Муслик   (2008-06-30 16:49:00) [4]

Удалено модератором

---

Поросенок Винни-Пух   (2008-06-30 16:45:00) [5]

Удалено модератором

---

Муслик   (2008-06-30 16:44:00) [6]

Удалено модератором

---

Поросенок Винни-Пух   (2008-06-30 16:41:00) [7]

например здесь:

   while not Eof do
         edit;
         fields[2].Value:=form1.Table3.Fields.Fields[2].Value;
         fields[4].Value:=form1.Table3.Fields.Fields[4].Value;
         next;
         post;

---

Муслик   (2008-06-30 16:40:00) [8]

скажите где в коде проблема ошибка

---

Dennis I. Komarov   (2008-06-30 16:23:00) [9]

Удалено модератором

---

Поросенок Винни-Пух   (2008-06-30 16:17:00) [10]

ты спрашиваешь - мы отвечаем.

---

Муслик   (2008-06-30 16:09:00) [11]

Удалено модератором

---

Anatoly Podgoretsky   (2008-06-30 16:08:00) [12]

Зря ты это спрашиваешь, вдруг кто то ответит.

---

Поросенок Винни-Пух   (2008-06-30 16:08:00) [13]

где у меня ошибка?

Вот здесь, причем много:

ВСЁ заработало только к отдельно позиции щаз ваще ошабка вышеприведённая

---

Муслик   (2008-06-30 16:04:00) [14]

Удалено модератором

---

Dennis I. Komarov   (2008-06-30 15:58:00) [15]

Удалено модератором

---

Игорь Шевченко   (2008-06-30 15:55:00) [16]

http://ln.com.ua/~openxs/articles/smart-questions-ru.html

читать до полного и окончательного просветления.

---

Муслик   (2008-06-30 15:52:00) [17]

Удалено модератором

---

Dennis I. Komarov   (2008-06-30 15:43:00) [18]

Удалено модератором

---

Муслик   (2008-06-30 15:37:00) [19]

ВСЁ заработало только к отдельно позиции щаз ваще ошабка вышеприведённая


   if form6.Table1.Locate('Naimen', table3.Fields.Fields[2].Value, [loPartialKey]) then
  begin
   with form6.Table1 do
     begin
     if form6.Table1.Fields.Fields[2].IsNull then
      exit
      else
      begin
          ShowMessage('Åñòü òàêàÿ çàïèñü');
          edit;
          fields[4].Value:=IntToStr(StrToInt(form1.Table3.Fields.Fields[4].Value)+StrToInt(fields[4].value));
          post;
          end;
   end;
   end
   else
         with form6.Table1 do
   begin
          first;
          while not Eof do
          edit;
          fields[2].Value:=form1.Table3.Fields.Fields[2].Value;
          fields[4].Value:=form1.Table3.Fields.Fields[4].Value;
          next;
          post;

    while not eof do
   begin
          ShowMessage('Èùó ýòî:' + form1.table3.Fields.Fields[2].Value + #13#10 + 'à òàì ýòî :' + FieldByName('Naimen').AsString);
          Next;
   end;
   end
   end;



---

Dennis I. Komarov   (2008-06-30 15:07:00) [20]

> dataset not in edit insert mode всё равно

И кто в этом виноват?

---

Страницы:   < 1 2 3 4 5 >

Наверх