Question

我的窗口中有一个ADOdata控件和DATAGRID控件，当按下键盘delete键时它会删除DATAGRID里被选中的那一行，现

我的窗口中有一个ADOdata控件和DATAGRID控件，当按下键盘delete键时它会删除DATAGRID里被选中的那一行，现在点击按钮或按下delete键都不执行任何结果？？？

Answer 1

额，不知道，不清楚代码，不好说，你可以试试这样：在按钮事件加入（1）：
void CWaDlg::OnOK()
{
PostMessage(WM_KEYDOWN, VK_DELETE, 0);

return;
CDialog::OnOK();
}
这样行了，如果不行，再试试这样（2）：
把postmessage换成：
::PostMessage(GetDlgItem(IDC_DataGrid)->m_hWnd, WM_KEYDOWN, VK_DELETE, 0);
其中IDC_DataGrid是你的DataGrid控件，GetDlgItem(IDC_DataGrid)->m_hWnd是你的DataGrid的句柄
-----------------------------------------------------------------------------------------------------------------------
估计是发送的虚拟键盘消息发送到了窗口，没有传递到控件，（2）方法应该有效了

追问

我试了，还是不行啊，我把DataGrid的ID属性换了，它的句柄知道怎么换

追答

能发些源码片段吗？没源码不清楚什么地方出问题。。。
你的句柄有值吗？
可以先屏蔽掉添加的代码，先试试Delete键是否有用，再加上代码试试，多加断点，看变量值。

追问

我不知道我的句柄是什么，没有别的代码，我就是新建工程，用ADOdata控件连得数据库代码就是用你的这些了，我现在有个答辩，我先去一下，可能四点钟后回来，我等你消息，谢谢你啦，是在太麻烦你啦，完了给你高分！谢谢！！！！

追答

你能把工程发过来吗？只要用Delete键的工程
我自己这里新建了工程，不清楚你说的删除什么的。
百度了一下，发现操作时同样要自己写代码的。。。

是Ado data control 6.0吗？

追问

我的数据库SQL 2008EXPRESS 对话框里就有三个控件，Ado data control 6.0还有DataGrid control 6.0 和一个button按钮，想实现的功能：点击按钮，删除DataGrid 里选中的某一行数据，因为直接按键盘上的delete键它可以删除，我就想通过按钮实现，你的邮箱号？？

追答

453743739@qq.com

你有编好的程序吗？我这边sql没有配过，不会，先看看你的程序啊。
是不是选中某一行，选定值变蓝，然后按Delete就删除了？

如果用按钮，那么在按下按钮的时候DataGrid的选定行仍然是选定状态吗？

你按下button1时不要放下，看看DataGrid是否选中，告诉我一下。

还有一种办法，就是模拟输入鼠标键盘，先闪了，有点事，晚上再谈

追问

好，麻烦你啦

追答

在1Dlg.h中加入：
public:
CWeweDlg(CWnd* pParent = NULL); // standard constructor
CPoint pt, resultPoint; //加在public下
在1Dlg.cpp中加入：
BOOL CWeweDlg::OnInitDialog()
{
// TODO: Add extra initialization here
resultPoint.x = 1;
resultPoint.y = 1;
添加按钮消息。加入如下代码：
void CWeweDlg::OnOK()
{
// TODO: Add extra validation here

SendMessage(WM_LBUTTONDOWN, MK_LBUTTON, MAKELONG(resultPoint.x, resultPoint.y));
SendMessage(WM_LBUTTONUP, MK_LBUTTON, MAKELONG(resultPoint.x, resultPoint.y));
::PostMessage(GetDlgItem(IDC_DATAGRID1)->m_hWnd, WM_KEYDOWN, VK_DELETE, 0);

return;
CDialog::OnOK();
}
预处理函数这样写：
BOOL CWeweDlg::PreTranslateMessage(MSG* pMsg)
{
if (pMsg->message == WM_LBUTTONUP)
{
CRect rect;
::GetWindowRect(GetDlgItem(IDC_DATAGRID1)->m_hWnd, &rect);
ScreenToClient(&rect);

GetCursorPos(&pt);
ScreenToClient(&pt);

if (pt.x>=rect.left && pt.x=rect.top && pt.ymessage==WM_KEYDOWN && pMsg->wParam==VK_DELETE)
// {
// CString a, b;
// a.Format("%d ", resultPoint.x);
// b.Format("%d ", resultPoint.y);
// a = a + b + "KEYBOARD";
// AfxMessageBox(a);
// }

return CDialog::PreTranslateMessage(pMsg);
}
测试过了，鼠标和键盘消息都发出去了
发你邮箱了，例子