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

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

Проверка обязательных полей базы данных отображенных на форме [D5, IB6.x]

Apolon ©   (2003-07-15 11:29:00) 

Как осуществить проверку обязательных полей базы данных отображенных на форме при помощи различных элементов TDBEdit, TDBLookupComboBox и т.п. на заполнение их значениями? Данная проверка должна осуществляться перед сохранением значений в базе данных. В случае, если имеется не заполненное поле, сохранение прервать и установить фокус на первый не заполненный элемент в форме. Такая функция проверки должна работать на любых формах и с разным набором контролов отображающих данные из нескольких таблиц.

---

Johnmen   (2003-07-15 11:51:00) [1]

см. BeforePost

---

Жук   (2003-07-15 11:41:00) [2]

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if (ModalResult=mrOk)
then begin
if DBEdit1.DataSource.DataSet.FieldByName[DBEdit1.DataField].IsNull
then begin
CanClose:=false;
ShowMessage("Warning... !");
DBEdit1.SetFocus;
end;
..................
end;
end;
Примерно так...

---

Наверх