▲▲▲在Form窗口Show显示时如何让ComboBox中条目自动向下弹出？？？▲▲▲

Question

在Form窗口Show显示时如何让ComboBox中条目自动向下弹出？？？，并且焦点在ComboBox的第一个条目上,代码应如何写！！！

Answer 1

begin 
combobox1.DroppedDown:=true;
 ComboBox1.ItemIndex:=0;
end;

Answer 2

这样做：
procedure TForm1.FormShow(Sender: TObject);
begin
  ComboBox1.DroppedDown:=True;
  ComboBox1.ItemIndex:=0;
end;window98,delphi5上调试通过！

Answer 3

combobox1.SetFocus;
ComboBox1.DroppedDown:=True;

Answer 4

不会一闪而过的，你的之所以一闪而过是以为窗体打开是的焦点定位在combobox1上了:你可以如下处理:
procedure TForm1.FormShow(Sender: TObject);
begin
  ComboBox1.DroppedDown:=True;
  ComboBox1.ItemIndex:=0;
  edit1.setfocus;
end;
窗体打开时实际的焦点还是在combobox1上你可以实验一下

Answer 5

两种选择，就是上面所说的把焦点定格在combobox上。这种好像也不是完全适合。另一种方法就是移动鼠标，把鼠标指针的坐标，移动到combobox下面。