くだすれDelphi(超初心者向け) Part3
■ このスレッドは過去ログ倉庫に格納されています
0458デフォルトの名無しさん
NGNGWM_KEYDOWNで送られてくるmessageを調べれば、オートリピート中か調べられる。例えば
procedure TForm1.WMKeyDown(var message: TWMKeyDown);
begin
if message.KeyData and $40000000 = 0 then inherited;
end;
ってやれば、オートリピート中はOnKeyDownが発生しなくなる。
■ このスレッドは過去ログ倉庫に格納されています