#include <windows.h>
#include <commctrl.h>
#include <tchar.h>
#include <uxtheme.h>
#include "resource.h"

#define IDC_TAB  50

typedef HRESULT (WINAPI * ENABLETHEMEDIALOGTEXTURE)(HWND, DWORD);

HRESULT WINAPI MyEnableThemeDialogTexture(HWND hWnd, DWORD dwFlags)
{
  ENABLETHEMEDIALOGTEXTURE pfnETDT;
  HINSTANCE                hDll;
  HRESULT                  hr;

    hr = HRESULT_FROM_WIN32(ERROR_CALL_NOT_IMPLEMENTED);

    if(NULL != (hDll = LoadLibrary(TEXT("uxtheme.dll"))))
    {
        if(NULL != (pfnETDT = (ENABLETHEMEDIALOGTEXTURE)GetProcAddress(hDll, "EnableThemeDialogTexture")))
        {
            hr = pfnETDT(hWnd, dwFlags);
        }
        FreeLibrary(hDll);
    }

  return(hr);
}

INT_PTR CALLBACK DlgProc1(HWND, UINT uMsg, WPARAM, LPARAM)
{
    switch(uMsg)
    {
        case WM_INITDIALOG:
             return(TRUE);
        default:
             break;
    }

  return(FALSE);
}

INT_PTR CALLBACK DlgProc2(HWND, UINT uMsg, WPARAM, LPARAM)
{
    switch(uMsg)
    {
        case WM_INITDIALOG:
             return(TRUE);
        default:
             break;
    }

  return(FALSE);
}

LRESULT CALLBACK WndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
  TCITEM item;
  HWND*  phDlg;
  HWND   hWndTemp;
  RECT   rc;
  int    nCurSel;

    switch(uMsg)
    {
        case WM_CREATE:
             hWndTemp = CreateWindowEx(0, WC_TABCONTROL, TEXT(""), WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_CLIPSIBLINGS | TCS_FOCUSNEVER | TCS_SINGLELINE, 0, 0, 0, 0, hWnd, (HMENU)IDC_TAB, ((LPCREATESTRUCT)lParam)->hInstance, NULL);

             ZeroMemory(&item, sizeof(item));
             item.mask    = TCIF_TEXT;

             item.pszText = TEXT("Dialog 1");
             TabCtrl_InsertItem(hWndTemp, 0, &item);
             item.pszText = TEXT("Dialog 2");
             TabCtrl_InsertItem(hWndTemp, 1, &item);

             phDlg    = new HWND[2];
             phDlg[0] = CreateDialog(((LPCREATESTRUCT)lParam)->hInstance, MAKEINTRESOURCE(IDD_DIALOG1), hWnd, DlgProc1);
             phDlg[1] = CreateDialog(((LPCREATESTRUCT)lParam)->hInstance, MAKEINTRESOURCE(IDD_DIALOG2), hWnd, DlgProc2);

             if(SendMessage(hWndTemp, CCM_GETVERSION, 0, 0) >= 6)
             {
                 MyEnableThemeDialogTexture(phDlg[0], ETDT_ENABLETAB);
                 MyEnableThemeDialogTexture(phDlg[1], ETDT_ENABLETAB);
             }

             SetWindowLongPtr(hWnd, GWLP_USERDATA, (LONG_PTR)phDlg);
             ShowWindow(phDlg[0], SW_SHOW);
             return(0);
        case WM_ERASEBKGND:
             return(1);
        case WM_NOTIFY:
             switch(((LPNMHDR)lParam)->code)
             {
                 case TCN_SELCHANGING:
                      phDlg   = (HWND*)GetWindowLongPtr(hWnd, GWLP_USERDATA);
                      nCurSel = TabCtrl_GetCurSel(((LPNMHDR)lParam)->hwndFrom);

                      if(0 == nCurSel)
                          ShowWindow(phDlg[0], SW_HIDE);
                      else if(1 == nCurSel)
                          ShowWindow(phDlg[1], SW_HIDE);

                      return(FALSE);
                 case TCN_SELCHANGE:
                      phDlg   = (HWND*)GetWindowLongPtr(hWnd, GWLP_USERDATA);
                      nCurSel = TabCtrl_GetCurSel(((LPNMHDR)lParam)->hwndFrom);

                      if(0 == nCurSel)
                          ShowWindow(phDlg[0], SW_SHOW);
                      else if(1 == nCurSel)
                          ShowWindow(phDlg[1], SW_SHOW);

                      return(0);
                 default:
                      break;
             }
             break;
        case WM_SIZE:
             phDlg    = (HWND*)GetWindowLongPtr(hWnd, GWLP_USERDATA);
             hWndTemp = GetDlgItem(hWnd, IDC_TAB);

             SetRect(&rc, 0, 0, LOWORD(lParam), HIWORD(lParam));
             MoveWindow(hWndTemp, 0, 0, rc.right, rc.bottom, TRUE);

             SendMessage(hWndTemp, TCM_ADJUSTRECT, (WPARAM)FALSE, (LPARAM)&rc);
             MoveWindow(phDlg[0], rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top, TRUE);
             MoveWindow(phDlg[1], rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top, TRUE);

             return(0);
        case WM_NCDESTROY:
             phDlg = (HWND*)GetWindowLongPtr(hWnd, GWLP_USERDATA);
             delete [] phDlg;
             PostQuitMessage(0);
             return(0);
        default:
             break;
    }

  return(DefWindowProc(hWnd, uMsg, wParam, lParam));
}

int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE, LPTSTR, int nCmdShow)
{
  INITCOMMONCONTROLSEX iccex;
  WNDCLASSEX           wc;
  HWND                 hWnd;
  MSG                  msg;

    iccex.dwSize = sizeof(iccex);
    iccex.dwICC  = ICC_TAB_CLASSES;
    InitCommonControlsEx(&iccex);

    wc.cbSize        = sizeof(wc);
    wc.style         = 0;
    wc.lpfnWndProc   = WndProc;
    wc.cbClsExtra    = 0;
    wc.cbWndExtra    = 0;
    wc.hInstance     = hInstance;
    wc.hIcon         = (HICON)LoadIcon(NULL, IDI_APPLICATION);
    wc.hCursor       = (HCURSOR)LoadCursor(NULL, IDC_ARROW);
    wc.hbrBackground = (HBRUSH)(COLOR_APPWORKSPACE + 1);
    wc.lpszMenuName  = NULL;
    wc.lpszClassName = TEXT("TabCtrl-Test");
    wc.hIconSm       = (HICON)LoadIcon(NULL, IDI_APPLICATION);

    if(!RegisterClassEx(&wc))
        return(0);
    if(NULL == (hWnd = CreateWindowEx(WS_EX_OVERLAPPEDWINDOW | WS_EX_APPWINDOW, wc.lpszClassName, wc.lpszClassName, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL)))
        return(0);

    ShowWindow(hWnd, nCmdShow);

    while(GetMessage(&msg, NULL, 0, 0))
    {
        if(!IsDialogMessage(hWnd, &msg))
        {
            TranslateMessage(&msg);
            DispatchMessage (&msg);
        }
    }

  return(msg.wParam);
}

[edit] Ich hab's noch schnell XP-tauglich gemacht. [/edit]

[ Dieser Beitrag wurde am 04.12.2002 um 23:40 Uhr von -King- editiert. ]

Habe nur noch ein paar Probleme mit der TCM_ADJUSTRECT Message. Nach der MSDN liefert die ja entweder das mögliche TAB_Control Display zurück oder setzt es. Habe hier meine Probleme da ich nicht rauskriege, wie man das rect unterhalb des Kartenreiters richtig rausfindet, um dann mit SetWindowPos das Child-Dialog-Fenster aus der Resource an die richtige Stelle zu setzen. Hast Du noch eine andere Idee ?

Dein Code funzt, habe Ihn allerdings in eine DialogProc mit einigen Abwandlungen eingebaut, funktioniert aber sonst einwandfrei.

Ich rate mal, daß er sich der Compiler über die Signaturen der Dialog-Prozeduren beschwert hat. Da ist also ein Update des PSDKs fällig.

Habe nur noch ein paar Probleme mit der TCM_ADJUSTRECT Message. Nach der MSDN liefert die ja entweder das mögliche TAB_Control Display zurück oder setzt es. Habe hier meine Probleme da ich nicht rauskriege, wie man das rect unterhalb des Kartenreiters richtig rausfindet, um dann mit SetWindowPos das Child-Dialog-Fenster aus der Resource an die richtige Stelle zu setzen. Hast Du noch eine andere Idee ?

Im Code oben siehst Du, wie es geht. Und das funktioniert, ich habe es selbst probiert. Wenn Deine Fenster nicht an der richtigen Stelle sind, so sind sie nicht mit WS_CHILD ausgestattet. Wenn Du den VC benutzt:

1. Im Ressourcen-Editor die Dialog-Eigenschaften abrufen
2. Tab "Formate" auswählen
3. In der ComboBox "Stile" den Eintrag "untergeordnet" wählen (löscht WS_POPUP, setzt WS_CHILD)
4. Tab "Erweiterte Formate" wählen
5. Die CheckBox "Übergeordnete Steuern" markieren (setzt WS_EX_CONTROLPARENT)

Vielleicht noch eins: Ich habe mein Tabcontrol nicht als Fenster mit CreateWindow erstellt (wie nach Deinem Code hWndTemp), sondern bereits in der Resource erstellt und im Hauptdialog fest verankert. Wenn ich nun mit TCM_ADJUSTRECT die Maße des Tabs aus der Resource hole, sind die Reiter eingeschlossen, d. h. vom auf der Registerkarte einzufügenden Dialog überlagert. Doch mit etwas Addition ist es nachher so, wie ich es wollte, meine Resourcen-Dialoge erscheinen im Main-Dialog auf den einzelnen Registerkarten und schicken auch noch fein Messages an ihre Proc´s. :p

Vielleicht noch eins: Ich habe mein Tabcontrol nicht als Fenster mit CreateWindow erstellt (wie nach Deinem Code hWndTemp), sondern bereits in der Resource erstellt und im Hauptdialog fest verankert.

Das macht doch nichts.
Aus WM_CREATE wird WM_INITDIALOG, aus CreateWindowEx wird GetDlgItem und selbstverständlich darfst Du die Dialog-Handles nicht mehr in GWLP_USERDATA speichern, Du mußt hier DWLP_USER verwenden.

Wenn ich nun mit TCM_ADJUSTRECT die Maße des Tabs aus der Resource hole, sind die Reiter eingeschlossen, d. h. vom auf der Registerkarte einzufügenden Dialog überlagert.

TCM_ADJUSTRECT holt überhaupt nichts, das hast Du falsch verstanden. Du holst die Maße des Tabs, und zwar per GetWindowRect(). Danach ermittelst Du die Client-Koordinaten (ScreenToClient). Jetzt hast Du in der Rect-Struktur die Maße des Tabs stehen. TCM_ADJUSTRECT ermittelt nun zu diesem gegebenen Rechteck die Display-Area, sofern wParam auf FALSE gesetzt ist. TCM_ADJUSTRECT rechnet also einfach nur ein gegebenes Rechteck um. Da muß dann auch nichts mehr addiert werden:

{
  HWND hWndTab;

    hWndTab = GetDlgItem(hDlgParent, IDC_TAB);

    GetWindowRect(hWndTab, &rc);
    ScreenToClient(hDlgParent, (LPPOINT)&rc.left);
    ScreenToClient(hDlgParent, (LPPOINT)&rc.right);

    SendMessage(hWndTab, TCM_ADJUSTRECT, (WPARAM)FALSE, (LPARAM)&rc);
    MoveWindow(hDlg1, rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top, TRUE);
    MoveWindow(hDlg2, rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top, TRUE);

}

Das funktioniert natürlich nur, solange beide, also Tab und Dialoge, das gleiche Parent haben (den Frame-Dialog).

jedoch habe ich hier das Problem das wenn ich den zweiten Dialog der von dem MainDialog aufgerufen wird (indem auch die Tabboxes drinnen sind) bewege die Tabboxen mit dem Dialog mitgehen, jedoch die füllenden Felder bleiben immer am selben Punkt.

Kurz wenn ich den Dialog mit den Tabboxen wegziehe sind die Tabboxen nackt und die Inhalte von den Tabboxen liegen am Hauptfenster

Kann mir diesbezüglich jemand weiterhelfen?

Lg _freeze_

Kann dem:

-King- schrieb:

Und da ich meine, die Frage schon öfter mal gelesen zu haben[...]

nur zustimmen .