請教一下 我要如何在DBGrid 這裡 點選一筆記錄 然後我在Button內 就可以將這筆記錄刪除呢 目前我的做法是 點選MonthCalendar 再按下Button 就可以找到資料 並且做刪除 可是 若是點選DBGrid 這一部份 該如何下手 會比較好呢 尚請指教 謝謝 附上 frrday:=0; DM.Query1.close; DM.Query1.SQL.Clear; try DM.Query1.SQL.ADD('SELECT count(fday) AS CNT from freeday where fday=''' datetostr(MonthCalendar1.Date) ''''); DM.Query1.Prepare; DM.Query1.open; DM.TBfday.close; dm.TBfday.Open; except on E: Exception do begin ShowMessage(E.Message); end; end; if DM.Query1.FieldByName('CNT').Asinteger > 0 then frrday:=1; DM.Query1.SQL.Clear; if frrday=1 then begin if MessageDlg('Do you want to del', mtConfirmation,mbOKCancel,0) = mrOk then begin DM.Query1.close; DM.Query1.SQL.Clear; try DM.Query1.SQL.ADD('delete from freeday where fday=''' datetostr(MonthCalendar1.Date) ''''); DM.Query1.Prepare; DM.Query1.ExecSQL; except on E: Exception do begin ShowMessage(E.Message); end; end; end; end else showmessage('Sorry'); DM.Query1.close; DM.Query1.SQL.Clear; try DM.Query1.SQL.ADD('SELECT * from freeday order by fday DESC'); DM.Query1.Prepare; DM.Query1.open; DM.TBfday.close; dm.TBfday.Open; except on E: Exception do begin ShowMessage(E.Message); end; end; BitBtnFAdd.Enabled:=false; BitBtnFDel.Enabled:=false;

1.將 TDBGrid 的 Options 屬性中的 MultiSelect 設為 True 就可以選取 TDBGrid 內的 record 2.參考 TDBGrid 的 SelectedRows 屬性的解說與範例 就知道如何對選取的 record 做刪除或其它動作了    -- Everything I say is a lie.