Usuwanie TabSheeta

0

Czy moglby mi ktos powiedziec jak usunac zakladje (TabSheet) z PageControla ??

0

OMG...
Klikasz na formie zakładke którą chcesz usunąć a potem klikasz w jej wnętrze (tak zeby zaznaczyc sam "środek") a nie cały page control i dajesz del

0

Ale mu chyba chodziło, jak programowo ją usunąć :-P

0
 TabSheet.TabVisible:=false; 

??
o coś takiego?

0

Ej Shalom nie rób wsi w mieście [krzyk]

private
  procedure DodajTabSheeta(pc:TPageControl, napis:string);

implementation

procedure TForm1.DodajTabSheeta(pc:TPageControl, napis:string);
var t: TTabSheet;
begin
  t:=TTabSheet.Create(self);
  t.PageControl:=pc;
  t.Caption := napis;kk
end;

usuwania zaznaczony sheet

PageControl1.Pages[PageControl1.TabIndex].Destroy;

// usuwa sheet o jakimś captionie
procedure TForm1.Button2Click(Sender: TObject);
var t:TTabSheet;
     i:byte;
     cap:String;
begin
   cap:='86'; // jakiś caption
   for i:=0 to PageControl1.ControlCount-1 do
       if PageControl1.Pages[i].Caption = cap then PageControl1.Pages[i].Destroy;
end;
0

Dzieki Milka, o to mi własnie chodzilo, a ty Shalom jak juz ktos wczesniej powiedzial: nie rób bydła na forum ...

0 użytkowników online, w tym zalogowanych: 0, gości: 0