下面的代码几乎可以工作,但我想我需要一些东西来重新呈现页面。
procedure TiwfLookupListing.iweLookupAsyncKeyDown(Sender: TObject; EventParams: TStringList); begin if EventParams.Values['which'] = '13' then begin iwbSearchClick(Sender); end; end;
我已经基本解决了这个问题,在按钮的ScriptEvents中,对于onKeyDown,我使用了以下代码:
if (event.which == 13) { IWBSEARCH_onclick(event); return false; } else { return true; }
但是如果有更好的方法。。。