請問如何檢測到鍵盤

發文回覆瀏覽次數：1057

推到 Plurk!

推到 Facebook!

尚未結案

joon
一般會員

發表：35
回覆：41
積分：14
註冊：2004-01-02

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-06-02 10:29:20

IP:218.0.xxx.xxx 未訂閱

請問如何檢測到鍵盤是否按過？我想實現memo顯示"按任意鍵"，然後檢測，按隨意鍵就自動退出程式。請各位幫忙，謝謝發表人 - taishyang 於 2004/06/02 13:47:23

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-06-02 10:43:13

IP:203.73.xxx.xxx 未訂閱

引言: 請問如何檢測到鍵盤是否按過？我想實現memo顯示"按任意鍵"，然後檢測，按隨意鍵就自動退出程式。請各位幫忙，謝謝

joon 你好: 請參考以下的做法 < class="code"> bool gbExit=false; void __fastcall TForm1::Button1Click(TObject *Sender) { KeyPreview=true; Memo1->Lines->Clear(); Memo1->Lines->Add("按任意鍵結束程式"); gbExit=true; } void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift) { if(gbExit) { Application->Terminate(); } }

-- Enjoy Researching & Developing --

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

系統時間：2024-04-23 14:54:03

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！