我是这样作的,写一个openpage的事件
procedure TForm1.OpenPage(ReqURL: String);
begin
ShowURL(ReqURL);
Webbrowser1.Navigate(ReqURL);
end;
再写回车事件:
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = vk_return then
openpage(ComboBox1.Text);
end;
我做过这个简单的,上面的可能不全,你先试试。