代码之家 › 专栏 › 技术社区 › Alister

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

intraweb delphi javascript

0

Alister · 技术社区 · 14 年前

下面的代码几乎可以工作,但我想我需要一些东西来重新呈现页面。

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

1 回复 | 直到 14 年前

1

Alister 14 年前

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

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

但是如果有更好的方法。。。