DBGridEh如何执行程序代码调出[查找对话框](DialogFind),目前只能在运行时用ctrl+f调出(50分)

如题求助,最好是知道有现成的调用方法

有DBGridEh的源码就可以.
修改DBGridEh.pas
TCustomDBGridEh = class(..)
...
public
procedure OpenFindDlg;
//增加查找功能
...
end;

procedure TCustomDBGridEh.OpenFindDlg;
begin
if DataSource.DataSet.Active then
begin
Self.SetFocus;
ExecuteDBGridEhFindDialogProc(Self, '', '', nil, Self.IsFindDialogShowAsModal);
end;
end;

在你的程序中调用即可
DBGridEh1.OpenFindDlg;