Меню сайта
Мини-чат
Чтобы добавить сообщение, необходимо авторизоваться.
Главная » Статьи » Не стандартные примеры на Delphi » Базы Данных

Стандартный запрос на удаление записи в таблице


    procedure DelRec(inSet:TDataSet);
begin
if
(NotEmptySet(inSet)) and // если таблица пуста - незачем выводить запрос
(Application.MessageBox('Удалить запись?','Внимание!!!',
mb_YesNo+mb_Iconquestion)=idYes) then
inSet.Delete;
end
Категория: Базы Данных | Добавил: DelphiAiX (20.05.2012)
Просмотров: 1055 | Рейтинг: 0.0/0
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]