第一步：在要實現快捷鍵的窗體中更改屬性「keypreview」為true；
第二步：在要實現快捷鍵的窗體中的onkeypress事件中填入乙個過程名稱（在object inspector中），填寫好後回車就可轉入事件**填寫部分；
第三步：填寫事件處理過程，下面給出乙個例子：
procedure tfrmmain.keypress(sender: tobject; var key: char);
begin
if key in [' '] then
begin
b_play_pause.click;
end;
end;
case key of
0: to do something one;
1: to do something two;
當鍵盤輸入0時執行to do something one語句，當鍵盤輸入1時執行to do something two語句，相當於c語言中的switch語句。
Delphi 全域性熱鍵註冊 使用
rad studio 10.2.3 測試 全域性變數 var mhotkey01,mhotkey02 integer 1 在程式建立的時候或者窗體顯示的時候註冊熱鍵 begin 原子 mhotkey01 mhotkey01 globaladdatom xiaoyin hotkey ctrl f1 c...
Delphi全域性熱鍵的註冊
1.在窗啟動時建立atom aatom atom 定義在private中 1 if findatom zwxhotkey 0 then 2begin 3 aatom globaladdatom zwxhotkey 4end 5 if registerhotkey handle,aatom,mod a...
在Delphi程式中操作登錄檔
32位delphi程式中可利用tregistry物件來訪問登錄檔檔案中的資訊。一 建立和釋放tregistry物件 1.建立tregistry物件。為了操作登錄檔，要建立乙個tregistry物件 aregistry tregistry.create 2.釋放tregistry物件。對登錄檔操作結束...