Einzelnen Beitrag anzeigen

Sauerkrautpoet

Registriert seit: 18. Jul 2006
Ort: Leipzig
20 Beiträge
 
#4

Re: On Button click close all TPageControl TTabSheet`s

  Alt 15. Sep 2006, 16:03
Zitat von marabu:
Try this:

Delphi-Quellcode:
procedure TWebForm.CloseAllButtonClick(Sender: TObject);
begin
  with PageControl do
    while PageCount > 0 do
      ActivePage.Free;
end;
marabu

ich erweitere die fragestellung um die tatsache, dass ich nur einen gezielten tab schließen will.
ich habs schon mit
Delphi-Quellcode:
 
      pagecontrol.pages[tabindex].destroy;
      //beziehungsweise
      pagecontrol.pages[tabindex].free;
versucht aber hmpf...nix da. knallt mir die anwendungen speicherverletzungen ums ohr.
  Mit Zitat antworten Zitat