自动打开ComboBox的下拉列表

                            procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
SendMessage(combobox1.Handle,CB_SHOWDROPDOWN,1,1);
end;
                                

查看回复