DbGridの削除について

---

DbGridの複数選択をしたレコードを一括で削除したいと考えています。
下記の文法は複数選択をしてlistboxに表示するようになっていますが、
本当であればDBgridで複数選択をして、ボタンを押せば選択データを
Deleteするように組みたいと思います。
よろしくお願いします

環境    WindowsXP Delphi5 

begin
with Table1 do
begin
disablecontrols;
bk:=bookmark;
listbox1.Items.Clear;
for i := 0 to dbgrid1.SelectedRows.Count-1 do
begin
bookmark :=dbgrid1.SelectedRows[i];
listbox1.Items.Add(fieldbyname('key').asstring);
end;
bookmark:=bk;
enablecontrols;
end;
end;

編集    削除

---

dbgrid1.DataSorce.Dataset.BookMark :=
   dbgrid1.SelectedRows[i];
dbgrid1.DataSorce.Delete;

で選択行を削除します。

編集    削除

---

HOtaさん。アドバイス有難うございます。自分のやりたい事が無事できまいた。今後もよろしくお願いします。

編集    削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。