combox空间中用鼠标点击 "倒三角" 的事件是什么? 怎么用代码实现>?

Question

combox空间中用鼠标点击 "倒三角" 的事件是什么? 怎么用代码实现>?
我想展开combox ,可是除了用鼠标点机 "倒三角" 以外,可以用代码实现吗?例如对一个button 我要调用他的click事件可以
  button1.click;
而对combox 有没有什么
combox.*** 让他展开下来框呢?

Answer 1

它是OnDropDown事件不过没有相应的方法,可以发消息来实现:
SendMessage(ComboBox1.Handle,CB_SHOWDROPDOWN,1,1);

Answer 2

procedure TForm1.ComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
if not combobox1.DroppedDown then
begin
if key=#13 then
begin
sendmessage(combobox1.handle,cb_showdropdown,1,0);
key:=#0;
end;
end;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
form1.KeyPreview:=true;
end;