==Combobox的显示问题==

Question

不会把
不出现，那你让数据暗示在什么地方啊
难道让combo那么长，不太美观

Answer 1

没有楼上兄台说的这么夸张了，比如就10项数据，how to do?
...
who can tell me?
use API?

Answer 2

那你好不如用list呢，可以把list弄长些

Answer 3

你试试重载它的createparams，去掉WS_EX_RIGHTSCROLLBAR这个风格棋标看看。

Answer 4

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
   ComboBox1.DropDownCount:=ComboBox1.Items.count;
end;

Answer 5

对不起写错了。应该是
procedure TForm1.ComboBox1DropDown(Sender: TObject);
begin
  ComboBox1.DropDownCount:=ComboBox1.Items.count;
end;
但要是太长了超出屏幕那可就......

Answer 6

设计期：
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.DropDownCount:=ComboBox1.Items.Count;
end;动态期：
当给它给值时，写上上边的语句；但是，如果它真的超出屏幕的话，就没有办法了
你试一试

Answer 7

不好意思，刚刚写错了，我想起来了，它不存在超不超出屏幕的问题，其实，你不可能有那么多的数据而且还要全部显示，如果下端超出，那么它会在上端显示，相反则反；
还有：
TO： wr960204(武稀松) 
=======================================================
procedure TForm1.ComboBox1DropDown(Sender: TObject);
begin
  ComboBox1.DropDownCount:=ComboBox1.Items.count;
end;
但要是太长了超出屏幕那可就......
========================================================
这种方法不可行；  
 

Answer 8

楼上的几位大侠，不好意思这篇文章是关于vb的combobox的，
vb中的combobox.listCount属性就相当于DropDownCount属性，
可是listcount属性是只读的……
最后UP一次了，thx all