AlphaControls 對 NoteBook 非首頁未開啓皮膚問題解決

AlphaControls 是 著名的 Delphi 第三方皮膚組件,使用很是方便，只需加一個 TsSkinManager 組件，再指定所用皮膚名，便可對 Delphi 開發的程序進行美化。但使用中發現有一個組件 NoteBook， TsSkinManager僅對其首頁 進行了美化，當 NoteBook有多個頁面時，轉到其餘頁面，發現其中的控件都沒有美化，目前最新版是 13.19, 全部版本這個問題一直存在。這裏給出瞭解決的辦法：

if btn1.Tag = 0 then // 若是還沒有 美化，則美化處理
  begin
    sknmngr1.BeginUpdate;
    nb1.pageindex := 0;
    sknmngr1.EndUpdate(True);
    btn1.Tag := 1;
  end else // 已經處理過，直接轉到相應頁面便可
    nb1.pageindex := 0;