DBGridh 按Del时 可否模拟 Ctrl+del 功能 急！！！

[phprun]

void __fastcall TFypjd::DBGridEh2KeyDown(TObject *Sender, WORD &Key,
TShiftState Shift)
{

//delete 46
if (Key==46)
{
//模拟 ctrl+del ， GridEh中 按Ctrl +del 可以删除一个区域内的单元格数据，现用户想直接按Del实现。
keybd_event(17,0,0,0);
keybd_event(46,0,0,0);
keybd_event(46,0,KEYEVENTF_KEYUP,0);
keybd_event(17,0,KEYEVENTF_KEYUP,0);
}
}

现在这样模拟后，是可以清空选择区域内的数据，但同时，她好像进入了死循环，执行一下，就不停下来了。
烦请大家看看，可否有办法解决，或有其它代替方法。

[宝龙哥]

不要用 //模拟 ctrl+del ， GridEh中 按Ctrl +del 可以删除一个区域内的单元格数据，现用户想直接按Del实现。 keybd_event(17,0,0,0); keybd_event(46,0,0,0); keybd_event(46,0,KEYEVENTF_KEYUP,0); keybd_event(17,0,KEYEVENTF_KEYUP,0); 这些，直接用查询控件的删除当前行的属性