Форум: "Базы";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
ВнизПроверка обязательных полей базы данных отображенных на форме Найти похожие ветки
← →
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 вся ветка
Форум: "Базы";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c