TabBar其样式可以根据JvTabBar动态更改

Question

我尝试了许多不同的库，但都没有出现。 如果不在画家中引入自己的风格，则不能指定它们。 我需要能够快速和动态地更改样式选项卡。

作为回应，我展示了自己的发展。

如果有人有类似的发展 - 写回应。

Answer 1

我决定升级他们的简单：JVCL的TJvTabBar（最新修订：13415）

下面是结果。

之前（默认值）

后

风格源（从PNG文件导入具有透明度的所有图形）

轻松将任何个人风格，以任何JvTabBar

var tmp:TStrings; 
begin  
    tmp:=TStringList.Create; 
    tmp.Values['TOP_background']:=    ExtractFileDir(Application.ExeName)+'\skins\default\tabs-TOP_background.png'; 
    tmp.Values['TOP_active_left_side']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-TOP_active_left_side.png'; 
    tmp.Values['TOP_active_right_side']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-TOP_active_right_side.png'; 
    tmp.Values['TOP_active_center']:=    ExtractFileDir(Application.ExeName)+'\skins\default\tabs-TOP_active_center.png'; 

    tmp.Values['BOTTOM_background']:=    ExtractFileDir(Application.ExeName)+'\skins\default\tabs-BOTTOM_background.png'; 
    tmp.Values['BOTTOM_active_left_side']:=  ExtractFileDir(Application.ExeName)+'\skins\default\tabs-BOTTOM_active_left_side.png'; 
    tmp.Values['BOTTOM_active_right_side']:=  ExtractFileDir(Application.ExeName)+'\skins\default\tabs-BOTTOM_active_right_side.png'; 
    tmp.Values['BOTTOM_active_center']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-BOTTOM_active_center.png'; 

    tmp.Values['CLOSEBUTTON_normal']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_normal.png'; 
    tmp.Values['CLOSEBUTTON_selected']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_selected.png'; 
    tmp.Values['CLOSEBUTTON_disabled']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_disabled.png'; 
    tmp.Values['CLOSEBUTTON_closing']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_closing.png'; 
    tmp.Values['CLOSEBUTTON_modified']:=   ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_modified.png'; 
    tmp.Values['CLOSEBUTTON_closing_modified']:= ExtractFileDir(Application.ExeName)+'\skins\default\tabs-CLOSEBUTTON_closing_modified.png'; 

    JvTabBar1.StyleImages:=tmp; 

    tmp.Values['BOTTOM_background']:=    ExtractFileDir(Application.ExeName)+'\skins\default\MYMOD_tabs-BOTTOM_background.png'; 

    JvTabBar2.StyleImages:=tmp; 

主业变更

• 新增能力指定他们自己的风格（JvTabBar1.St yleImages）
• 新增移动关闭按钮右侧的能力（JvTabBar1.CloseButtonRight：= true或false）
• 许多修复的大小和文本/图标/按钮的位置/滚动

我JvTabBar.pas国防部您可以在这里下载http://pastebin.com/JmbufHy0

和实例源码风格+ JvTabBar.pas http://www.sendspace.com/file/shhuzr