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さん。アドバイス有難うございます。自分のやりたい事が無事できまいた。今後もよろしくお願いします。
ツイート | ![]() |