掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
GetAsyncKeyState等で複数同時押しするには？ (ID：12191)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
2〜3つ位なら問題ないですが、複数のキーを押すと反応しない物が出てきます。 例えば下記のソースだと ZとXとCとVとB をおしても反応しない物があります。 procedure TForm1.Timer1Timer(Sender: TObject); begin //Timer1.Interval := 60; //Memo1.ReadOnly:=True; Memo1.Clear; if GetAsyncKeyState(Ord('Z')) <0 then Memo1.Lines.Add('Z-ON') else Memo1.Lines.Add('Z-OFF'); if GetAsyncKeyState(Ord('X')) <0 then Memo1.Lines.Add('X-ON') else Memo1.Lines.Add('X-OFF'); if GetAsyncKeyState(Ord('C')) <0 then Memo1.Lines.Add('C-ON') else Memo1.Lines.Add('C-OFF'); if GetAsyncKeyState(Ord('V')) <0 then Memo1.Lines.Add('V-ON') else Memo1.Lines.Add('V-OFF'); if GetAsyncKeyState(Ord('B')) <0 then Memo1.Lines.Add('B-ON') else Memo1.Lines.Add('B-OFF'); end; きちんと反応させるにはどうしたらいいのでしょうか？ 環境：Win98se del6Per
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.