按下旋钮相当于 按了 Ctrl+F3建 功能
按下按钮相当于 按了 Ctrl+F3建 功能
按下某个按钮相当于 按了 Ctrl+F3建 功能，搜索了下，没有搞定。
------解决方案--------------------
TDBGridEh表格的Ctrl + F功能應用
日期:2007-12-17 类别:控件使用 作者: 推荐:本站 人气:4469
TDBGridEh組件的OptionsEh選項中有一項：dghDialogFind,默認值爲True。此屬性使表格在運行狀态下，用戶隻需按下 Ctrl + F熱鍵，即可調出一個現成的查找對話框來，而無須程序員寫其他任何查找相關的代碼了。
EhLib提供的這個功能實在巧妙，它可省了程序員的不少功夫，而且用來在表格中對數據定位，其功能也相當完善。
有些時候，開發者還可能需要用代碼來實現Ctrl + F熱鍵的調用。大緻可有二種可行的方法：
1、笨方法--模拟Ctrl + F按鍵事件，使用Windows API函數Keybd_Event()如下所示：
Keybd_Event(VK_CONTROL,Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),KeyEventF_KEYUP,0);
Keybd_Event(VK_CONTROL,Byte(0),KeyEventF_KEYUP,0);
2、引用EhLib包的DBGridEhFindDlgs單元提供的标準方法ExecuteDBGridEhFindDialog():
調用示例：ExecuteDBGridEhFindDialog(TDBGridEh組件名,'','',nil,True);
該方法聲明如下：
procedure ExecuteDBGridEhFindDialog(Grid: TCustomDbGridEh; Text, FieldName: String; ColumnFields: TColumnFieldsArrEh; Modal: Boolean);
參數Grid用以指定一個特定的TDBGridEh組件；Text用以指定一個特定查找文本（可爲空串''）；FieldName用以指定一個特定的查找字段名(可爲空串'')；ColumnFields用以指定一個查找字段列表的動态數組（可置爲nil,表示默認爲全部Columns）；Modal用以指定對話框是否以模态打開。
*********************
网上搜来了，我用第一种方法实现过。
------解决方案--------------------
上面看错要求了，看了中间的内容。。。。
//以下四行语句组合形成快捷键
keybd_event(VK_Control,0,0,0); //按下Ctrl键
keybd_event(VK_F3,0,0,0); //按下F3键
keybd_event(VK_Control,0,KEYEVENTF_KEYUP,0); //松开Ctrl键
keybd_event(VK_F3,0,KEYEVENTF_KEYUP,0); //松开F3键
按下某个按钮相当于 按了 Ctrl+F3建 功能，搜索了下，没有搞定。
------解决方案--------------------
TDBGridEh表格的Ctrl + F功能應用
日期:2007-12-17 类别:控件使用 作者: 推荐:本站 人气:4469
TDBGridEh組件的OptionsEh選項中有一項：dghDialogFind,默認值爲True。此屬性使表格在運行狀态下，用戶隻需按下 Ctrl + F熱鍵，即可調出一個現成的查找對話框來，而無須程序員寫其他任何查找相關的代碼了。
EhLib提供的這個功能實在巧妙，它可省了程序員的不少功夫，而且用來在表格中對數據定位，其功能也相當完善。
有些時候，開發者還可能需要用代碼來實現Ctrl + F熱鍵的調用。大緻可有二種可行的方法：
1、笨方法--模拟Ctrl + F按鍵事件，使用Windows API函數Keybd_Event()如下所示：
Keybd_Event(VK_CONTROL,Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),0,0);
Keybd_Event(Byte(70),Byte(0),KeyEventF_KEYUP,0);
Keybd_Event(VK_CONTROL,Byte(0),KeyEventF_KEYUP,0);
2、引用EhLib包的DBGridEhFindDlgs單元提供的标準方法ExecuteDBGridEhFindDialog():
調用示例：ExecuteDBGridEhFindDialog(TDBGridEh組件名,'','',nil,True);
該方法聲明如下：
procedure ExecuteDBGridEhFindDialog(Grid: TCustomDbGridEh; Text, FieldName: String; ColumnFields: TColumnFieldsArrEh; Modal: Boolean);
參數Grid用以指定一個特定的TDBGridEh組件；Text用以指定一個特定查找文本（可爲空串''）；FieldName用以指定一個特定的查找字段名(可爲空串'')；ColumnFields用以指定一個查找字段列表的動态數組（可置爲nil,表示默認爲全部Columns）；Modal用以指定對話框是否以模态打開。
*********************
网上搜来了，我用第一种方法实现过。
------解决方案--------------------
上面看错要求了，看了中间的内容。。。。
//以下四行语句组合形成快捷键
keybd_event(VK_Control,0,0,0); //按下Ctrl键
keybd_event(VK_F3,0,0,0); //按下F3键
keybd_event(VK_Control,0,KEYEVENTF_KEYUP,0); //松开Ctrl键
keybd_event(VK_F3,0,KEYEVENTF_KEYUP,0); //松开F3键