Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.024 c
1-3963
Vint45
2003-09-20 12:13
2003.10.02
Приостановка программы


1-3849
Брат
2003-09-19 11:04
2003.10.02
Дочерние окна


1-3992
GhostDog
2003-09-11 20:42
2003.10.02
Фильтры


1-3919
tsarev
2003-09-22 08:11
2003.10.02
DateUtils


14-4044
gg
2003-09-15 21:53
2003.10.02
Обработчик событий в паскале