組合鍵如何用

發文回覆瀏覽次數：1030

推到 Plurk!

推到 Facebook!

答題得分者是：Fishman

guohua_fu
一般會員

發表：44
回覆：50
積分：18
註冊：2003-06-19

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-07-07 09:17:37

IP:211.96.xxx.xxx 未訂閱

各位大大：我想按Ctrl U則光標跳到Edit1進行輸入賬號； Ctrl P則光標跳到Edit2進行輸入密碼；感謝！ ====================== ^_^ 相信自己，你是最棒的！ jacky ======================

------
jacky

Fishman
尊榮會員

發表：120
回覆：1949
積分：2163
註冊：2006-10-28

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-07-07 09:46:06

IP:210.65.xxx.xxx 未訂閱

Hi guohua_fu, 請參考 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=52723

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  IF (Shift = [ssCtrl]) AND (KEY = 85) THEN
    Edit1.SetFocus
  ELSE
    IF (Shift = [ssCtrl]) AND (KEY = 80) THEN
      EDIT2.SetFocus;
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

系統時間：2024-07-04 5:05:03

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

本站聲明

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