[dexter711]

Здравствуйте!!!Возникла проблема, которую не могу решить.Есть таблица товары, при добавлении нового вводится его код(PK) вручную.Вопрос в том как при добавлении сделать проверку на наличие уже имеющихся кодов товаров из грида и выдавать ошибку что такие данные уже существуют??В делфи7 буквально неделю.

[lmikle]

Поставить уникальный констрейнт на нужное поле - пусть база сама все проверяет. Если очень уж хочется сделать все руками, то можно вычитать все коды в список TStringList, потом перед вставкой просто делать IndexOf. Только не забудь после успешной всатвки довабить в список введенный код.

[dexter711]

про констрейнт можете подробнее рассказать?

[NumLock]

Первичный ключ

[M.A.D.M.A.N.]

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

[lmikle]

Сообщение от M.A.D.M.A.N.

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

Зачем? Я, вообще-то, имел в виду UNIQUE на конкретное поле, что обеспечит гарантированную уникальность (особенно в купе c NOT NULL, что еще и обязательность обеспечит) значения в конкретном поле. При этом первичный ключ (да, я знаю, что UNIQUE являестя частью PRIMARY KEY), может быть любой другой (INTEGER, по которому JOIN'ы делать гораздо эффективнее, чем по текстовому полю).

[Bargest]

(INTEGER, по которому JOIN'ы делать гораздо эффективнее, чем по текстовому полю).

Сдается мне, что "код товара" из оригинального поста

вводится его код(PK) вручную.Вопрос в том как при добавлении сделать проверку на наличие уже имеющихся кодов товаров

и есть Integer.

[M.A.D.M.A.N.]

Сообщение от lmikle

Зачем? Я, вообще-то, имел в виду UNIQUE на конкретное поле, что обеспечит гарантированную уникальность (особенно в купе c NOT NULL, что еще и обязательность обеспечит) значения в конкретном поле. При этом первичный ключ (да, я знаю, что UNIQUE являестя частью PRIMARY KEY), может быть любой другой (INTEGER, по которому JOIN'ы делать гораздо эффективнее, чем по текстовому полю).

Просто СУБД не указана.

[Alegun]

Для базы акцесса можно и такое делать, в данном случае с текстовыми полями, текст вводится в отдельный едит

Код:

...
if Length(Edit1.Text) = 0 then exit;
tbl.Locate('поле', Edit1.Text, [loPartialKey]);
if Edit1.Text = dbgrid1.Fields[0].Text then // есть такое слово
else // его нет в базе
...

З.Ы. Ведь при совпадении на первичном ключе будет ошибка выскакивать от ядра, а так - нет, лишь своё сообщение или действие, смотря что задать при сравнении