Главная страница | назад





Article #17719: How do I delete all the tabs on my page control in one function?

 Question and Answer Database

FAQ2719C.txt   How do I delete all the tabs on my page control in one function?
Category   :VCL
Platform    :Windows 95
Product    :   Applies to all

Question:
How do I delete all the tabs on my page control in one function? However, I want to 
leave the very first tab.


Answer:
if (PageCtl2->PageCount > 1) {
        while (PageCtl2->PageCount > 1) {
               PageCtl2->ActivePage = PageCtl2->Pages[1];
                      if (PageCtl2->ActivePage->Caption != "Results") {
                          PageCtl2->ActivePage->Free();
                          Application->ProcessMessages();
                      }
        }
        PageCtl2->ActivePage = PageCtl2->Pages[0];
    }


6/8/98 11:30:48 AM
 

Last Modified: 01-SEP-99