Einzelnen Beitrag anzeigen

Wiener

Registriert seit: 27. Apr 2022
Ort: Wien
15 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: FMX TTabControl - TTabItem während der Laufzeit entfernen

  Alt 2. Sep 2022, 08:50
Bin gerade unterwegs und habe kein Delphi zur Hand. Gab es da nicht auch ein .delete für die Tabitems?

Wie auch immer, eine Liste muss man von count-1 Down to 0 durchlaufen, wenn man einzelne Einträge löschen will…
Danke
habs gelöst:

Delphi-Quellcode:
if ObjektFrame.TabControlKfzSparte.TabCount >= 0 then
      begin
       x:= ObjektFrame.TabControlKfzSparte.TabCount -1;
       while ObjektFrame.TabControlKfzSparte.TabCount -1 >= 0 do
         begin
               ObjektFrame.TabControlKfzSparte.BeginUpdate;
                  ObjektFrame.TabControlKfzSparte.Delete(x);
               ObjektFrame.TabControlKfzSparte.EndUpdate;
               dec(x,1);
         end;
      end;
Markus
  Mit Zitat antworten Zitat