Скачать: CL | DM;

Проверка обязательных полей базы данных отображенных на форме   Найти похожие ветки 

← →
Apolon   (2003-07-15 11:29) [0]

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

---

← →
Жук ©   (2003-07-15 11:41) [1]

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;
Примерно так...

---

← →
Johnmen ©   (2003-07-15 11:51) [2]

см. BeforePost

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c