Изменения текущей записи
Перед редактированием текущей записи НД необходимо перевести в состояние dsEdit методом Edit.
Пример (кнопка изменить)
If DBGrid1.DataSource = Dm.DataSourse then
Begin
Form4.Edit1.Text := inttоstr (Dm.Table1.FieldByName (‘Nommang’).Value;
…
DM.Table1.Edit;
Form4.Show
End;
Удаление текущей записи из таблицы осуществляется методом Delete, перед удалением необходимо проверить, что НД находится в состоянии dsBrowse (используя MessageDlg)
№44
……
Function FindKey (const KeyValue: array of const): Boolean;
Параметр называемый ключом поиска, описывает список знаечний для каждого из полей указанных с свойстве IndexName, IndexFieldNames. Метода FindKey возвращает false если не удалось найти подходящую запись.
Procedure FindNearest ( const KeyValues : array of const); - этот метод пытается найти запись значение соответсвующего поля которой если и не совпадает точно с параметром KeyValues, то ближе всего к нему.
№45. Компонен1т TDBNavigator.
Данный компонент обычно размещается на форме под компонентом TDBGrid и привязывается к нему через свойство DataSource, значение которого должно совпадать со значением такого же свойства компонента TDBGrid. Навигатор позволяет перемещаться по набору записей вперёд и назад, переходить к первой и последней записи и т.д. Функции навигатора доступны не только при щелчках на его кнопках, но и программно.
10 кнопок компонента (слева направо):
| Кнопка | Назначения |
| First | Перемещение к первой записи в НД |
| prior | Перемещение к предыдущей записи в НД |
| Next | Перемещение к следующей записи в НД |
| Last | Перемещение к последней записи в НД |
| Insert | Вставка новой записи перед текущей |
| Delete | Удаление текущей записи |
| Edit | Редактирование текущей записи |
| Post | Сохранение изменений внесенных в таблицу БД |
| Cancel | Отмена внесенных изменений |
| Refresh | Обновление таблицы путём считывания данных из БД |
Если свойство ConfirmDelete имеет значение true, то будет отображаться диалоговое окно с запросом на подтверждение удаления записи. Если значение свойства Flat имеет значения true, то кнопки у навигатора будут плоскими. В свойстве Hints указывается массив всплывающих подсказок. В свойстве VisibleButtons указывается перечень видимых кнопок.
Метод SetBounds позволяет задать нестандартные размеры панели навигатора, метод ButtonClick программно имитирует щелчок на одной из его кнопок.
Событие BeforeAction генерируется если пользователь щелкнул на кнопке, но соответствующее действие ещё не выполнено. Событие OnClick – выполнено одно из действий навигатора.
Дата добавления: 2017-02-20; просмотров: 387;