panel: show centered text like Delphi

1 files changed, 6 insertions, 0 deletions

diff --git a/alf/alfnotebook.cpp b/alf/alfnotebook.cpp
index d60ea6b..705d314 100644
--- a/alf/alfnotebook.cpp
+++ b/alf/alfnotebook.cpp
@@ -208,6 +208,12 @@ ALF__NotebookWindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
         return TRUE;
     } else if (uMsg == WM_SETFONT) {
         SendMessage(priv->hwndTabCtrl, WM_SETFONT, wParam, lParam);
+
+        int n = ALF_Notebook_InternalTabCount(hwnd, priv->hwndTabCtrl);
+        for (int i = 0; i < n; ++i) {
+            HWND p = ALF_Notebook_InternalTabPanel(hwnd, priv->hwndTabCtrl, i);
+            SendMessage(p, WM_SETFONT, wParam, lParam);
+        }
     } else if (uMsg == ALF_WM_QUERYSIZE) {
         int n = ALF_Notebook_InternalTabCount(hwnd, priv->hwndTabCtrl);
         RECT r = { 0, 0, 0, 0 };