[Non-VCL] TabControl - Wie geht's weiter?

[Daniel G]

Wunderschönen Guten Abend alle zusammen,

eigentlich wollte ich ja keinen Thread aufmachen, aber im Moment komme ich einfach nicht weiter.

Also, folgendes Problem:

Soweit bin ich bis jetzt gekommen:

Delphi-Quellcode:

var
  hwndTab: DWord;
  tie:     TTCITEM;

function WndProc(hWnd: HWND; uMsg: UINT; wP: wParam; lP: LParam):
  lresult; stdcall;
begin
case uMsg of
    WM_CREATE:
      begin
[...]
   hwndTab := CreateWindow(WC_TABCONTROL, '',
          WS_VISIBLE or WS_CHILD or TCS_BUTTONS or TCS_FLATBUTTONS or TCS_MULTILINE, 0, 0, 400,280, hWnd,0, hInstance,
          nil);

        tie.mask := TCIF_TEXT or TCIF_IMAGE;
        tie.iImage := -1;
        tie.pszText := 'Main';
        Sendmessage(hwndTab,TCM_InsertItem,0,Integer(@tie));

        tie.pszText := 'Additional Info';
        Sendmessage(hwndTab,TCM_InsertItem,1,Integer(@tie));

        tie.pszText := 'More Additional Info';
        Sendmessage(hwndTab,TCM_InsertItem,2,Integer(@tie));

        tie.pszText := 'About && Help';
        Sendmessage(hwndTab,TCM_InsertItem,3,Integer(@tie));
 end;
[...]
end;

Was ich vorhabe:

Ich möchte in NonVcl TabControls verwenden, die sich so verhalten wie TPageControl und TTabsheet.

Tja, jetzt habe ich da meine wunderschönen Tabs auf meinem Formular. Aber wie bekomme ich denn jetzt meine Controls dazu, auf die Tabs zu reagieren. Ich habe mir ein paar Beispiele in C angesehen, aber irgendwie blicke ich da nicht wirklich durch. Und weder Google noch die DP noch das DF konnten mir helfen. (Zumindestens nicht mit "TTCITEM").

Wie kann ich also soetwas wie die einzelnen Seiten bei TPageControl hinbekommen und wie plazieren ich dann meine Controls darauf?

(Wie ich generell Controls erstelle, weiß ich schon, so is' das ja nicht...)

mfg
Daniel


hilfe....
Selbst in einem französischem Forum hab' ich schon gesucht. Und das soll was heißen...