Текущий архив: 2003.10.02;
Скачать: CL | DM;

Вниз

Как удалить выделенные записи?   Найти похожие ветки 

← →
Gorn   (2003-09-14 17:43) [0]

В DBGrid"е выделено несколько записей (MultiSelect). Как перебором записей удалить только выделенные? Что-то типа
if gdSelected in State then ... Подскажите.

---

← →
mfender ©   (2003-09-15 04:35) [1]

А if Key = VK_DELETE then DBGrid1.SelectedRows.Delete; не подойдет? Или надо именно перебирать?

---

← →
mfender ©   (2003-09-15 05:02) [2]

Тогда вот такую конструкцию попробуй:

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;


---

Страницы: 1 вся ветка

Текущий архив: 2003.10.02;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.036 c