![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
![]() Здравствуйте. Есть GridEh который заполняется данными из базы по запросу. Как сделать так, чтобы выделенные строки можно было удалить (на удаление будет запрос). Может быть поделитесь готовым кодом или ссылкой.
P.S. Если еще и подскажите как сделать не выделение, а "чеканье" тех строк которые нужно удалить, счастье мое не будет знать предела ![]() |
#2
|
||||
|
||||
![]() delete from TABLE where ID = foo or ID = bar
ID - первичный ключ. как-то так. — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#3
|
|||
|
|||
![]() Цитата:
а что значит foo и bar |
#4
|
||||
|
||||
![]() смотри свойство SelectedRows у TDBGrid. в справке и пример есть.
Пишу программы за еду. __________________ |
#5
|
|||
|
|||
![]() Справки нет. Вот так пытаюсь удалить, соответственно удаляет только 1 строку.
Код:
procedure Tf_ABP.N11Click(Sender: TObject); var myQ: TADOQuery; begin myQ := TADOQuery.Create(nil); myQ.Connection := DataModule1.ADOConnection1; myQ.SQL.Clear; myQ.Parameters.Clear; myQ.sql.Text := 'Delete From AVR_List Where ID = :ID_AVR_List'; myQ.Parameters.ParamByName('ID_AVR_List').Value := Q_AVR_List.FieldByName('ID').Value; myQ.ExecSQL; myQ.Close; Q_AVR_List.Requery(); end; |
#6
|
||||
|
||||
![]() Ну так запрос на удаление одной строки, оно и будет одну строчку удалять.
На удаление можно TADOCommand пользовать. — Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |