in reply to How do I change main window color Win32::GUI

Is this what you mean: 
use Win32::GUI;

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

$Maintab = $Mainwin->AddTabStrip(
                                -left   => 0,   
                                -top    => 0, 
                                -width  => $Mainwin->ScaleWidth,
                                -height => $Mainwin->ScaleHeight,
                                -name   => "Maintab"
);

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








Win32::GUI::Dialog();

sub Mainwin_Terminate {
   return -1;
}

[download]
~~David~~

Replies are listed 'Best First'.
Re^2: How do I change main window color Win32::GUI
by boat73 (Scribe) on Sep 10, 2004 at 14:56 UTC
    I tried that but it didn't work. I got it to work like this. This made the window color the same as the tabstrip color. 
    use Win32::GUI;
    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();
Win32::GUI::Dialog();

    [download]
[reply]
[d/l]
Re^2: How do I change main window color Win32::GUI
by Anonymous Monk on Mar 02, 2005 at 15:30 UTC
    sorry, don`t u know how i change color of Tabs? (TabFrame, TabStrip) Thanks Roman
[reply]

In Section Seekers of Perl Wisdom