|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Обработка ошибок в БД
Все здравствуйте, не могу допереть как обработать ошибку на удаление элемента в таблице, пишу так
Код:
procedure TDM.Table1DeleteError(DataSet: TDataSet; E: EDatabaseError; var Action: TDataAction); begin try Table1.Delete; except on E: Exception do begin ShowMessage ('Ошибка удаления'+E.Message); exit; end end; end; |
#2
|
||||
|
||||
Цитата:
Код:
... except on E : Exception do begin progressbar1.State:=pbsError; messageDlg('Ошибка!'+#13+E.Message, mtError, [mbOK], 0); exit; end; ... Я за здоровый экстрим! Спасибо за "спасибо") |
Этот пользователь сказал Спасибо Mrak за это полезное сообщение: | ||
sandysman (22.05.2013)
|
#3
|
||||
|
||||
В uses добавить надо dialogs вроде.
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
Этот пользователь сказал Спасибо M.A.D.M.A.N. за это полезное сообщение: | ||
sandysman (22.05.2013)
|
#4
|
||||
|
||||
Да, bro M.A.D.M.A.N. прав, добавьте модуль Dialogs в uses формы.
Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
Этот пользователь сказал Спасибо Alegun за это полезное сообщение: | ||
sandysman (22.05.2013)
|
#5
|
|||
|
|||
Спасиб помогло, но сообщения все равно толком не выводится, пишет sql ошибку. В еще такой вопрос, как при помощи Table сделать автоматический ввод пароли и логина БД? а то задалбливает постоянно вводить их)
|
#6
|
||||
|
||||
Цитата:
можно посмотреть про udl файлы Я за здоровый экстрим! Спасибо за "спасибо") |
Этот пользователь сказал Спасибо Mrak за это полезное сообщение: | ||
sandysman (22.05.2013)
|
#7
|
|||
|
|||
Еще такой вопрос, пытаюсь сделать
Код:
Table1.Refresh; |
#8
|
||||
|
||||
Датасет по новой походу вытягивать надо.
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#9
|
|||
|
|||
Это значит, надо писать
Код:
Datasource.dataset.fieldbyname(); |
#10
|
||||
|
||||
может так заработает
Код:
table.close; table.open; Я за здоровый экстрим! Спасибо за "спасибо") |
Этот пользователь сказал Спасибо Mrak за это полезное сообщение: | ||
sandysman (23.05.2013)
|
#11
|
|||
|
|||
Еще такой вопрос, функция lookup, не до конца понимаю как пользоваться. в Table создаю новое поле в котором пишу key, lookupkey, dataset, result, первые два поля должны совпадать вроде по ключевым полям, датасет, как я понял, должен содержать второй table который настроен на таблицу в которой есть ключевое поле из первого table. Подскажите правильно я мыслью?
|
#12
|
|||
|
|||
С эти разобрался, теперь такой вопрос появился, как Lookup поле создать программно, просто если использовать только одни тайблы это полный ппц, сколько их надо.
|
#13
|
||||
|
||||
Я за здоровый экстрим! Спасибо за "спасибо") |
Этот пользователь сказал Спасибо Mrak за это полезное сообщение: | ||
sandysman (30.05.2013)
|
#14
|
|||
|
|||
Вылетает ошибка на дбедит поэтому такой вопрос как его правильно закрыть? пишут так
Код:
dbedit1.dataset:=nil; dbedit1.tablename:=''; |
#15
|
||||
|
||||
оригинально
Код:
adoquery.close; Я за здоровый экстрим! Спасибо за "спасибо") |