单击Intraweb(VCL for Web)中的代码中的按钮

时间:2010-08-18 01:51:36

标签: javascript delphi intraweb

假设我有一个带有iwEdit(称为iweLookup)和iwButton(iwbSearch)的intraweb应用程序(用Delphi 2010编写)。当在iwEdit中按下enter时,我想点击iwButton。

以下代码几乎可以使用,但我认为我需要重新渲染页面。

procedure TiwfLookupListing.iweLookupAsyncKeyDown(Sender: TObject;
  EventParams: TStringList);
begin
  if EventParams.Values['which'] = '13' then
  begin
    iwbSearchClick(Sender);
  end;
end;

然而,这需要往返服务器(这是可以接受但不可取的)。理想情况下,我想在Javascript中使用它的一种方式 - 大概是在iwedit的ScriptEvents中(但我的Javascript技能目前,嗯,有限)

有人能指出我正确的方向吗?

1 个答案:

答案 0 :(得分:1)

我已经解决了这个问题,在按钮的ScriptEvents中,对于onKeyDown,我使用了以下代码:

if (event.which == 13) {
  IWBSEARCH_onclick(event);
  return false;
} else {
  return true;
}

但如果有更好的方法可以做到这一点......