我用过:
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中。
答案 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中选择。