intraweb - AsyncKeyDown 按下的键值

Question

在 Delphi 中使用 Intraweb，

有没有办法找到 AsyncKeyDown 按下的键值？

我知道它在 EventParams: TStringList 中的某种方式，但我只能在运行时通过局部变量列表看到它，字符串 = 'char = i'，除非我做一个特殊的函数，否则我不能真正从那里把它作为一个字符取出从那里拉它，所以我在想是否有一种简单的方法可以从 AsyncKeyDown 将按下的键作为字符获取？

Answer 1

我知道这个问题被问到已经很久了。但这对那些仍然需要它的人来说是件好事。我使用它并工作。您可以将其作为 char 获取，如下所示：

http://www.devsuperpage.com/search/Articles.aspx?G=2&ArtID=52557

procedure TfrmLHasta.edSuzAsyncKeyDown(Sender: TObject;
  EventParams: TStringList);
var
  lKey: char;
begin
  lKey := Chr(StrToInt(EventParams.Values['which']));
  //  WebApplication.ShowMessage(lKey);
  if lKey = #13 then DoSomething;
end;