PageControl - kolorowanie Nagłówka

[Corvis]

Witam,

Napisałem sobie kawałek programu który koloruje mi nagłówki w PageControlu ( Taby ) Problem polega na tym, że jak włączam właściwość

Kod: Zaznacz cały

OwnerDraw = true;

w PageControl i wykonuje kod:

Kod: Zaznacz cały

void __fastcall TFrmGui1::pgctrlMainDrawTab(TCustomTabControl *Control, int TabIndex, const TRect &Rect, bool Active) {
    if(TabIndex==1) {
        Control->Canvas->Brush->Color=clGreen;
    }
    Control->Canvas->TextOut(Rect.Left+5,Rect.Top+3,pgctrlMain->Pages[TabIndex]->Caption);
    pgctrlMain->Pages[TabIndex]->Brush->Color = Control->Canvas->Brush->Color;
}

To owszem kolrowanie jest - ale zmienia się styl grida. Rezultat w załączniku. Wie ktoś może jak uniknać tego efektu ??. Żeby w efekcie końcowym grid był pokolorowany ale został w starym stylu ??.

Pozdrawiam

[polymorphism]

Tak to się chyba nie da. Albo standardowy wygląd, albo własny. Użyj gradientu do wypełnienia tła, obrysuj to konturami, coby dodać wyglądu 3D, i powinno wyglądać ok.

swoją drogą, z tego co widać na obrazkach, nie wypełniasz kolorem powierzchni taba, jedynie zmieniasz tło tekstu. Wyłącz je w ogóle funkcją SetBkMode, a tło rysuj w typowy sposób, przed napisami, obejmując całą niezbędną powierzchnię.