線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1836
推到 Plurk!
推到 Facebook!

ComboBox 問題

尚未結案
larrytyan
一般會員


發表:51
回覆:38
積分:17
註冊:2004-08-11

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-09-12 19:04:26 IP:211.74.xxx.xxx 未訂閱
請問各位大大... 請問在 ComboBox 中如何取消按下 上,下 鍵時, 值會自動加減的功能... Tks.
Vicen
高階會員


發表:13
回覆:145
積分:151
註冊:2005-03-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-09-12 20:51:20 IP:221.226.xxx.xxx 未訂閱
ComboBox 有这样的功能吗?    不过一般控件都可以通过编写 KEYDOWN 事件屏蔽相应按键,以下是ComboBox屏蔽上下键。    
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key=38) Or (Key=40) then
    Key := 0;
end;
larrytyan
一般會員


發表:51
回覆:38
積分:17
註冊:2004-08-11

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-09-13 09:22:50 IP:211.74.xxx.xxx 未訂閱
Dear Sir. 我試過了, 不行耶..還有別的方法嗎??    謝謝..    
引言: ComboBox 有这样的功能吗? 不过一般控件都可以通过编写 KEYDOWN 事件屏蔽相应按键,以下是ComboBox屏蔽上下键。
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key=38) Or (Key=40) then
    Key := 0;
end;
h@visli
資深會員


發表:103
回覆:429
積分:431
註冊:2004-02-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-09-13 09:54:14 IP:222.248.xxx.xxx 未訂閱
引言: Dear Sir. 我試過了, 不行耶..還有別的方法嗎?? 謝謝..
引言: ComboBox 有这样的功能吗? 不过一般控件都可以通过编写 KEYDOWN 事件屏蔽相应按键,以下是ComboBox屏蔽上下键。
procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key=38) Or (Key=40) then
    Key := 0;
end;
試過可以的哦!
---------------------------- 於Delphi K.Top之上 博采眾家之長, 奉獻綿薄之力 ---------------------------
------
------------------------
博采眾家之長,奉獻綿薄之力
------------------------
Vicen
高階會員


發表:13
回覆:145
積分:151
註冊:2005-03-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-09-13 10:00:07 IP:221.226.xxx.xxx 未訂閱
................. 不知道方便把代码发点上来,怎么可能不行呢? 你到底用的什么元件啊?是COMBOBOX吗?COMBOBOX根本没有通过上下键加减数值的功能,除非你自己写了这方面的代码,不妨放上来研究一下。
larrytyan
一般會員


發表:51
回覆:38
積分:17
註冊:2004-08-11

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-09-13 10:56:04 IP:211.74.xxx.xxx 未訂閱
Dear Sir. 我用 DOSMove + infopower4000 wwdbcomboBox    我後來改用一般的 ComboBox 元件, 現在已經可以了.. 謝謝各位熱心的邦忙....        
引言: ................. 不知道方便把代码发点上来,怎么可能不行呢? 你到底用的什么元件啊?是COMBOBOX吗?COMBOBOX根本没有通过上下键加减数值的功能,除非你自己写了这方面的代码,不妨放上来研究一下。
Vicen
高階會員


發表:13
回覆:145
積分:151
註冊:2005-03-14

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-09-14 21:19:15 IP:221.226.xxx.xxx 未訂閱
一些第三方控件为了增加一些其它功能或效果,可能截取一些消息自己处理,所以可能导致一些常规方法无法使用。 如果你有原始代码可以看看,大多修改不是很难。
系統時間:2024-04-27 10:38:16
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!