Это работало в Delphi XE8
Вот пример проекта https://github.com/dangas56/DelphiDXSeattle-BrokenTabControl.
У нас есть VertScrollBox для случаев, когда клавиатура появляется на устройстве
и есть несколько элементов управления вкладками и элементы вкладок для переключения между экранами
заметили, что вкладки иногда не печатаются правильно в Delphi DX Seattle
Это пример кода для воспроизведения — вы можете скачать пример по ссылке git выше.
procedure TForm2.tbcMainChange(Sender: TObject);
begin
if tbcMain.ActiveTab = tbtmSettings then
tbcMain.TabPosition := TTabPosition.None
else begin
tbcMain.TabPosition := TTabPosition.Bottom;
end;
end;
procedure TForm2.Button1Click(Sender: TObject);
begin
tbcMain.ActiveTab := tbtmHome;
end;
Это пример домашнего экрана. Щелчок по второй вкладке устанавливает для TabPosition значение none на исходном tabControl (чтобы скрыть вкладки).
Это вторая вкладка - обычно внизу есть больше элементов вкладок
, когда мы нажимаем кнопку, чтобы вернуться к исходной вкладке, она устанавливает вкладку исходной вкладки внизу и устанавливает активный элемент в качестве первой вкладки. вещь
Как вы можете видеть ниже, он не перепечатывал элементы вкладки в нижней части экрана.