FIX: Cocoa: according page not actived after tab moved(dragdrop) (#466)

Co-authored-by: rich <102933068+rich222222@users.noreply.github.com>
This commit is contained in:
rich2014 2022-06-12 15:41:38 +08:00 committed by GitHub
commit 668c341a07
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -722,7 +722,12 @@ begin
begin
// Move within the same panel.
if ATabIndex <> -1 then
begin
Tabs.Move(FDraggedPageIndex, ATabIndex);
{$IFDEF LCLCOCOA}
GetPage(ATabIndex).MakeActive;
{$ENDIF}
end;
end
else if (SourceNotebook.FDraggedPageIndex < SourceNotebook.PageCount) then
begin