FMX.TabControl.TTabControl.GotoVisibleTab 没有任何问题。然而,从 Tokyo 版本 2 开始,相同的代码在 Android 目标上执行时会崩溃。在 Windows 或 iOS 目标上没有问题。当我使用 None 而不是 Slide 作为过渡模式时,问题也消失了。
我已经用一个最小的项目(1 个 TabControl 和 2 个 TabItems)检查了问题的发生。我也在几个论坛上搜索过,但什么也没找到......
procedure TForm1.NextTab;
var
TabIdx : integer;
begin
with TabControl1 do
begin
TabIdx:=TabIndex;
if TabIdx < (TabCount-1) then inc(TabIdx) else TabIdx:=0;
GotoVisibleTab(TabIdx,TTabTransition.Slide,TTabTransitionDirection.Normal);
end;
end;
你能帮我吗?
我希望他们有一天能解决这个问题