Here is how I did it: $MainWindow->AddTabStrip( -name => "FindTabStrip", -left => 10, -top => 10, -width => $MainWindow->ScaleWidth - 250, -height => 175, -hottrack => 1, );
$MainWindow->FindTabStrip->InsertItem(-text => "Name"); $MainWindow->FindTabStrip->InsertItem(-text => "Building"); $MainWindow->FindTabStrip->InsertItem(-text => "Adapter Address"); Then in the subs: sub FindTabStrip_Click { if ($MainWindow->FindTabStrip->SelectedItem == 0) { $MainMenu->{FindName}->Checked(1); $MainMenu->{FindBuilding}->Checked(0); $MainMenu->{FindAdapter}->Checked(0); $MainWindow->Bld_Label->Hide(); $Building->Hide(); $MainWindow->SelectFromList->Hide(); $BuildingList->Hide(); $MainWindow->Adapt_Label->Hide(); $Adapter->Hide(); $MainWindow->FN_Label->Show(); $FirstName->Show(); $MainWindow->LN_Label->Show(); $LastName->Show(); $FirstName->SetFocus(); } if ($MainWindow->FindTabStrip->SelectedItem == 1) { $MainMenu->{FindName}->Checked(0); $MainMenu->{FindBuilding}->Checked(1); $MainMenu->{FindAdapter}->Checked(0); $MainWindow->FN_Label->Hide(); $FirstName->Hide(); $MainWindow->LN_Label->Hide(); $LastName->Hide(); $MainWindow->Adapt_Label->Hide(); $Adapter->Hide(); $MainWindow->Bld_Label->Show(); $Building->Show(); $MainWindow->SelectFromList->Show(); $Building->SetFocus(); } if ($MainWindow->FindTabStrip->SelectedItem == 2) { $MainMenu->{FindName}->Checked(0); $MainMenu->{FindBuilding}->Checked(0); $MainMenu->{FindAdapter}->Checked(1); $MainWindow->FN_Label->Hide(); $FirstName->Hide(); $MainWindow->LN_Label->Hide(); $LastName->Hide(); $MainWindow->Bld_Label->Hide(); $Building->Hide(); $MainWindow->SelectFromList->Hide(); $BuildingList->Hide(); $MainWindow->Adapt_Label->Show(); $Adapter->Show(); $Adapter->SetFocus(); } return; } maybe there is an easier way but I didn't know about it so that was the way i got around it. Jonathan Southwick Technical & Network Services Allegheny College, Meadsville, PA [EMAIL PROTECTED] ----- Original Message ----- From: <[EMAIL PROTECTED]> To: <perl-win32-gui-users@lists.sourceforge.net> Sent: Wednesday, January 31, 2001 10:42 AM Subject: [perl-win32-gui-users] Tabstrips > Hello, > > might be a silly question but anyway: How can I remove all Elements from a > Window in case a different Tab on a Tabstrip is > clicked and different Elements should be displayed on the Window accordingly? > Or can I define separate "Panels" with > different Elements for each Tab? > > mit freundlichen Grüßen/with best regards > Thomas Emde > nnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn > nnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn > > BAYER AG > IS-CT DPN > D-51386 Leverkusen > Fon: +49 (0) 214/30-81513 > Fax: +49 (0) 214/30-31737 > E-Mail: [EMAIL PROTECTED] > > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users >