从cxLookAndFeelPaintersmanager中删除外观

时间:2016-11-03 01:04:05

标签: delphi devexpress

我用过:

procedure TMain_Form.FormActivate(Sender: TObject);
var I:integer;
begin
for I := 0 to cxLookAndFeelPaintersmanager.Count -1 do
dxBarCombo1.Items.Add(cxLookAndFeelPaintersmanager.items[i].lookandfeelname);
end;

procedure TMain_Form.dxBarCombo1Change(Sender: TObject);
begin
Data_Module.dxskincontroller1.SkinName:= dxBarCombo1.Text;
end;

工作正常但是......

但是有些皮肤我不喜欢,所以如何删除它们呢? 消除它们列在dxBarCombo1中。

3 个答案:

答案 0 :(得分:5)

转到IDE中的“项目 - >修改外观选项”。在那里,您可以选择要包含在应用程序中的皮肤。这些选项也可以在TdxSkinController组件的上下文菜单中找到。

答案 1 :(得分:2)

可能有一种方法可以防止它们首先被添加到项目中; DevEx没有制作他们文档的在线版本,我也无法在他们的论坛中找到任何关于它的内容。但即使没有这些信息,也会想到几个选项。

您可以在组合框中删除它们

dxBarCombo1.Items.Delete(Index);

或者如果你喜欢,在他们到达之前抓住他们:

for I := 0 to cxLookAndFeelPaintersmanager.Count -1 do
begin
  if cxLookAndFeelPaintersmanager.Items[i].lookandfeelname <> 'NameYouDontWant' then
    dxBarCombo1.Items.Add(cxLookAndFeelPaintersmanager.Items[i].lookandfeelname);
end;

答案 2 :(得分:0)

使用dxSkinController1加载皮肤只是问题的一部分。不完整。如果按照Ken的建议加载皮肤,您仍然会得到dxSkinController1组件(Flat,Native,Office ...)中未选择的一些不需要的皮肤。 要避免它们,只需在dxBarCombo1的items属性中添加所需的皮肤即可。只需确保名称与真实皮肤名称相同并在dxSkinController1中选择。