![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как удалить выделенные записи? [D6, WinME]
Gorn © (2003-09-14 17:43:00)
В DBGrid"е выделено несколько записей (MultiSelect). Как перебором записей удалить только выделенные? Что-то типа
if gdSelected in State then ... Подскажите.
mfender (2003-09-15 05:02:00) [1]
Тогда вот такую конструкцию попробуй:
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var n: Integer;
begin
if Key = VK_DELETE then begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for n:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[n]));
if Table1 ....... <какое-то условие для удаления>
end;
end;
end;
mfender (2003-09-15 04:35:00) [2]
А
if Key = VK_DELETE then DBGrid1.SelectedRows.Delete;не подойдет? Или надо именно перебирать?