How do I change the default color of a win32::GUI TabStrip

[boat73]

The default color is a grey and I would like to change it to white. I have been reading the docs but don't see a -color or -background option. My code is as follows. Thanks in advance for the wisdom.

use Win32::GUI;


&mainwin;
&maintab;


Win32::GUI::Dialog();

sub Mainwin_Terminate {
   return -1;
}

sub mainwin {
    #### Defining color class for main window ####
    my $main_class = new Win32::GUI::Class(
        -name    => "temp_Class",
        -color  => 16, 
    );


    $Mainwin = new Win32::GUI::Window(
          -background => "red",
          -left   => 612,
          -top    => 15,
          -width  => 400,
          -height => 455,
          -name   => "Mainwin",
          -text   => "Window Title",
          -class  => $main_class
          );
    $Mainwin->Show();
}

sub maintab{
    $Maintab = $Mainwin->AddTabStrip(
                     -left   => 10,   
                     -top    => 10, 
                     -width  => $Mainwin->ScaleWidth - 20,
                     -height => $Mainwin->ScaleHeight - 50,
                     -name   => "Maintab",
    );

    $Maintab->InsertItem(-text => "Tab1");
    $Maintab->InsertItem(-text => "Tab2");
    $Maintab->InsertItem(-text => "Tab3");
    $Maintab->InsertItem(-text => "Tab4");
    $Maintab->InsertItem(-text => "Tab5");

}

[bsdz]

Sadly it cannot be done. See Microsoft's Tab Control documentation for more information.
Note that Win32::GUI::TabStrip is in fact a XS wrapper around Microsoft's Windows Tab Control.

[Karger78]

That link is broken sadly. Just curious if you ever did find a resoultion to this?

[Anonymous Monk]

Here is a kludge I am using: create a read-only textfield over the entire window.