Firemonkey TComboBox 下拉菜单字型修改方法 D10

本篇文章主要介绍了"Firemonkey TComboBox 下拉菜单字型修改方法 D10"，主要涉及到方面的内容，对于Delphijrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播感兴趣的同学可以参考一下： 在 FMX 下的 TComboBox 下拉菜单字型修改有二种方法：使用 Style，需先设定好 Style 后，再指定预设项的 Style，方法如下：proce...

在 FMX 下的 TComboBox 下拉菜单字型修改有二种方法：

1. 使用 Style，需先设定好 Style 后，再指定预设项的 Style，方法如下：
   

   procedure TForm1.FormCreate(Sender: TObject);
   var i: Integer;
   begin     ComboBox2.DropDownKind := TDropDownKind.Custom;
        Combobox2.ListBox.DefaultItemStyles.ItemStyle := 'listboxitemstyle1';
   end;

   
   
2. 使用代码修改字型，方法如下：
   

   procedure TForm1.FormCreate(Sender: TObject);
   var i: Integer;
   begin     ComboBox2.DropDownKind := TDropDownKind.Custom;
   
        for i:=0to ComboBox2.Count - 1dobegin          ComboBox2.ListBox.ListItems[i].StyledSettings :=  ComboBox2.ListBox.ListItems[i].StyledSettings - [TStyledSetting.Family, TStyledSetting.Size, TStyledSetting.FontColor];
             ComboBox2.ListBox.ListItems[i].TextSettings.Font.Size := 16;
             ComboBox2.ListBox.ListItems[i].TextSettings.FontColor := claRed;
             ComboBox2.ListBox.ListItems[i].TextSettings.Font.Family := '字型名称';
             ComboBox2.ListBox.ListItems[i].Height := 22;
        end;
   end;

效果示例： 

以上就介绍了Firemonkey TComboBox 下拉菜单字型修改方法 D10，包括了方面的内容，希望对Delphijrs看球网直播吧_低调看直播体育app软件下载_低调看体育直播有兴趣的朋友有所帮助。

本文网址链接：http://www.codes51.com/article/detail_277363.html