2Pascal-新时代的Pascal

标题: TComboBox无法设置Font. [打印本页]

---

作者: 红鱼儿    时间: 2015-6-2 16:51
标题: TComboBox无法设置Font.
我放了全局的StyleBook,使用的Style,默认设置的字的大小为18，我想改成12，即默认大小，同时改一下显示颜色。

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

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

---

作者: 红鱼儿    时间: 2015-6-2 17:38
多谢网友支持，改用ComboEdit搞定！

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

---

作者: drifer    时间: 2015-6-16 15:18


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;

---

作者: drifer    时间: 2015-6-16 15:21
这里网站有问题，中括号+i显示不出来。

---

作者: 红鱼儿    时间: 2015-7-7 14:52

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

多谢帮助！！！

---

欢迎光临 2Pascal-新时代的Pascal (http://2pascal.com/)

Powered by Discuz! X3