добавления нескольких записей в MS Acces

[фЁдОр]

выложите код кнопки, где учавствует удаление. сейчас нет возможноти скачать и посмотреть.

[Mitriy08]

To Sm1Le:
Я хочу, чтобы другие люди учились не на своих ошибках, а на ошибках других........

Что касается самой темы я все таки рад, что opel.omega не забил на свою прогу и решил ее доделать

Ну начнем с того, что у тебя кнопка вернуть товар работает не правильно
у тебя не правильно обновляется количество товара
тебе сначала надо найти товар на складе, а потом уже прибавлять количество товара.
Говорю самый быстрый способ как найти запись.
И так, чтобы сильно не менять структуру базы, просто добавь одно поле в заявки и оно будет соответсвовать idsklad из таблицы sklad, это поле показыватьне обязательно но это есть ключ с таблицей sklad!!!
К примеру добавленное поле ты назовеш "IDSklad".
И добавляеш код принажатии на кнопку вернуть товар
В самое начало!!!!

DataModule1.ADOQuery1.Locate('IDSkl ad',DataModule1.zaiavkiQuery.FieldB yName('IDSklad').AsInteger,[]);

Либо ищи уникальные поля, но тут уже будут учавствовать несколько полей что ни есть хорошо.....

По поводу:

while not DataModule1.zaiavkiQuery.eof do

Эта запись означает пока не будет достигнут конец таблицы - что то делать
Либо надо перед этим поставить курсор на первую запись:

DataModule1.zaiavkiQuery.First;

либо написать:

while not DataModule1.zaiavkiQuery.IsEmpty do

Что означает пока таблица не будет пустой- что то делаем...

Забыл написать:
сделай еще одну проверку на кнопке вернуть товар, если в корзине нету записей выйти из процедуры.....
можеш сам глянуть, что происходит по нажатию кнопки когда там нету записей

[opel.omega]

Эта запись означает пока не будет достигнут конец таблицы - что то делать
Либо надо перед этим поставить курсор на первую запись:
Код:

DataModule1.zaiavkiQuery.First;

вы были правы исправил заработал как миленький
что касается

Забыл написать:
сделай еще одну проверку на кнопке вернуть товар, если в корзине нету записей выйти из процедуры.....
можеш сам глянуть, что происходит по нажатию кнопки когда там нету записей

я поставил защиту для дураков если грид пустой то кнопка недоступна если же добавили запись то доступна
что скажите???

[Mitriy08]

я поставил защиту для дураков если грид пустой то кнопка недоступна если же добавили запись то доступна
что скажите???

Принципе, разницы нету, главное, чтобы эта кнопка была не активной когда нада А так проверка одна и таже..

if DataModule1.zaiavkiQuery.IsEmpty then.....

[opel.omega]

я так и сделал
вот мои код

if  DataModule1.zaiavkiQuery.IsEmpty then
  SpeedButton12.Enabled:=False;

[opel.omega]

и так ребят следующий вопрос
как сделать чтоб если на складе нет нужного количества определенной детали то программа говорила екскюзьми но нет такой детали в данном количестве есть только вот столько
я вобще не имею представления как это сделать???

[Mitriy08]

Я уже про это писал, прогартни чутка назад...

[Sm1Le]

мде ... Тебе надо считать количество товара на складе(думаю это ты уже умеешь делать), и считать введенное количество товара, далее просто Иф Зен, и показать пользователю к примеру ShowMessage, msgBox, а для программы исп. вспомогательную переменную, а другой способ это просто при вводе проверять на то, что введеное значение не должно быть больше Полученного из БД( для это в У поля ввода(edit) Есть свойство OnChange)

[opel.omega]

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

if Edit1.Text>DBEdit4.Text then //если больше тогда
               begin
                 ShowMessage('такого  количества нет на складе');//показываем окошко
                 Edit1.Text:='1';// возвращаем количество к 1

               end;

[фЁдОр]

попробуйте преобразоват Edit1.Text в числовой тип, т.е. StrToInt(Edit1.Text) И зачем возвращаем количество к 1?