|
Registriert seit: 12. Jun 2002
3.483 Beiträge
Delphi 10.1 Berlin Professional
|
30. Jul 2002, 16:56
Vertauschen:
Code:
var
TS1, TS2: TTabSheet;
Index: Integer;
begin
TS1 := AusgewähltesTabSheet;
TS2 := MitDiesemTabSheetTauschen;
Index := TS1.PageIndex;
TS1.PageIndex := TS2.PageIndex;
TS2.PageIndex := Index;
end;
|