快捷键问题？？

我有个COMBOBOX里有两个下拉的制，如何可以当我按数字键1的时候就显示第一个值，按2的时候就显示第二个值 问题点数：20、回复次数：6Top

1 楼cdsgajxlp（起名很难）回复于 2005-08-13 10:30:44 得分 10

procedure   TForm1.ComboBox1KeyPress(Sender:   TObject;   var   Key:   Char);  
  begin  
      if   key='1'   then  
      Combobox1.ItemIndex:=0   ;  
      if   key='2'   then  
      Combobox1.ItemIndex:=1;  
  end;Top

2 楼shanliqun（珍惜）回复于 2005-08-13 12:10:16 得分 0

来晚了，楼上说的就是答案哦Top

3 楼mytown98（mytown）回复于 2005-08-15 11:21:40 得分 0

还有情况是；假如我想在任何时候按下‘*’键就将其他的窗体显示出来该如何Top

4 楼xielaixiangjx（谢香）回复于 2005-08-15 11:48:53 得分 0

if   key   in   [0..9]   then  
      combobox1.itemindex   :=   key   -   1;Top

5 楼hellolongbin（一个人(自从扩充话题改版，再也不去灌水乐园了)）回复于 2005-08-15 12:09:29 得分 10

form1的keyprview:=true;  
   
  procedure   TForm1.FormKeyPress(Sender:   TObject;   var   Key:   Char);  
  begin  
  if   key='*'   then   Form2.Show;  
  end;Top

6 楼syfly739（飞仔）回复于 2005-08-15 14:42:04 得分 0

跟进学习！！Top

相关问题

• combobox
• itemindex
• 值
• key
• tobject
• procedure tform
• 时候就显示
• sender
• then
• form

• 帖主：mytown98
• cdsgajxlp
• hellolongbin

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载