在dbgrid1cellclick事件尾部加入
formname.focuscontrol(webbrowser1);
例如下：
procedure form1.dbgrid1cellclick(column: tcolumn)
var
oldcur:tcursor;
begin
oldcur := screen.cursor;
screen.cursor :=crhourglass;
form1.focuscontrol(webbrowser1);
screen.cursor:=oldcur;
end;
关键字词:
