TComboBox无法设置Font.

红鱼儿

我放了全局的StyleBook,使用的Style,默认设置的字的大小为18，我想改成12，即默认大小，同时改一下显示颜色。

结果是找了半天，竟没找到在哪里设置，这和TEdit，TLabel不一样。
以TEdit为例，虽然使用了全局的StyleBook,但通过设置TEdit.StyledSettings,将里面的勾全去掉，就可以通过TextSettings来设置Font了。
TComboBox没有这个属性，所以只能去StyleBook中查设置

在StyleBook,我找到了ComboBoxStyle,重新设置里面字的大小为12，运行，还是18的大小。
奇了怪，ComboBox用的哪个Style呢？

drifer

ComboEdit是可写的。如果你不让客户写，只让他选，就只能用ComboBox。
以下是控制ComboBox的例子：
   with ComboBox1 do
   begin
     Enabled := CanModify;
     for i := 0 to Count - 1 do
     begin
       ListItems.FontColor := TAlphaColorRec.Gray;
       ListItems.Font.Size := FSize;
       ListItems.StyledSettings := [];
     end;
   end;

红鱼儿

多谢网友支持，改用ComboEdit搞定！

ComboEdit,ComboBox,为什么要做成两个控件呢？填乱，此处省略10000字感慨...

drifer

这里网站有问题，中括号+i显示不出来。

红鱼儿

drifer 发表于 2015-6-16 15:18
ComboEdit是可写的。如果你不让客户写，只让他选，就只能用ComboBox。
以下是控制ComboBox的例子：
   with ...

多谢帮助！！！