两个简单的问题

Question

1、在dbgrid中用上下键移动记录指针到最后一条记录时如果继续下移，则指向一条尚未添加的空记录从而可能引起一系列错误，而用滚动条则不存在这个问题，有没有办法让下键不能移动到那条不存在的记录上？（我用的是access）.
2、当用鼠标托动窗体时应该响应哪个事件？

Answer 1

1、去掉DbGrid的自动添加功能 
procedure TForm1.DataSource1Change(Sender: TObject; Field: 
TField);
begin
if TDataSource(Sender).DataSet.Eof then 
TDataSource(Sender).DataSet.Cancel;
end;

Answer 2

谢谢lihuasoft，问题2呢？没人回答吗！