1 Topic by vi

  • vi
  • New member
  • Offline
  • Registered: 2015-03-10
  • Posts: 3

Topic: Пустые поля

Как можно избавиться от добавления пустых в полей в базу?  Сильно не пинайте: только начинаю; сделал свой небольшой проект по аналогии с первым уроком на сайте, и там при попытке добавить пустую запись(все поля пустые) - она легко добавляется. Как избежать?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Пустые поля

При создании полей в таблицах базы данных, вы можете установить это поле как обязательное.
http://myvisualdatabase.com/forum/misc.php?action=pun_attachment&item=704&download=0



что приведет к возникновению ошибки, при попытке сохранить запись не заполнив данное поле.

Post's attachments

Attachment icon req.png 68.65 kb, 246 downloads since 2015-03-10 

Dmitry.

3 Reply by vi

  • vi
  • New member
  • Offline
  • Registered: 2015-03-10
  • Posts: 3

Re: Пустые поля

Спс, но, возможно, ли сделать, чтобы лишь при всех пустых полях - запись не добавлялась? Всего 7 полей, и категория таблицы такова, что даже если заполнены всего лишь 2 поля, или даже одно - то это норм и можно на добавление.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Пустые поля

В таком случае вы можете воспользоваться скриптом, в котором можете проверить заполненность компонентов на форме, для этого необходимо создать событие OnClick у кнопки, отвечающую за сохранение записи (с действием Сохранить запись)
пример:

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin
    if (Form1.Edit1.Text='') AND (Form1.Edit2.Text='') AND (Form1.Edit3.Text='') then
    begin
        ShowMessage('Вы не ввели какие либо данные на форме.');
        Cancel := True; // прерываем действие по сохранению записи
    end;
end;

если не получится, можете приложить свой проект (zip файл без exe и dll), постараюсь помочь.

Dmitry.

5 Reply by vi

  • vi
  • New member
  • Offline
  • Registered: 2015-03-10
  • Posts: 3

Re: Пустые поля

Большое Вам спасибо! Все получилось.