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

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

intraweb delphi javascript

Alister · 技术社区 · 14 年前

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

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

1 回复 | 直到 14 年前

Alister 14 年前

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

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

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

推荐文章

Some1Else · 函数在Delphi中重新创建TForm

3 年前

MarkoZaaz · Delphi TwebuUpdate E2003未声明的标识符_WIN32_FIND_数据

3 年前

Agmcz · Delphi安卓库。so未安装(AAB)

3 年前

nader · 如何使用delphi在web上提交表单

7 年前

Freddie Bell · Delphi中的位补码。(翻译C#运算符)

7 年前

kwadratens · Delphi中的卡方分布函数代码

7 年前

user9672569 · 如何从确定的点向ListView的第三列添加数据?

7 年前

user9672569 · 如何在完整的位图图像中绘制阴影效果?

7 年前

mmmm · MSBuild(用于Delphi)Make-like功能

7 年前

Den · TabTip的大小和位置。Windows 10上的exe(虚拟键盘)?

7 年前