TTMSFMXPageControl - OnClosePage not firing ?

FMX TMS FMX UI Pack
1

In our app we need to take action just before a page is closed and after a page is closed. The OnBeforeClosePage() works perfectly and returns the default close-action ttcaFree. However, OnClosePage() does not seem to be fired. Any clue or maybe a workaround available? 

2

I cannot reproduce that OnClosePage is not triggered.

Test code on a default TTMSFMXPageControl with Options.CloseMode = tcmTab

procedure TForm1.TMSFMXPageControl1BeforeClosePage(Sender: TObject;
  APageIndex: Integer; var ACloseAction: TTMSFMXPageControlPageCloseAction);
begin
  showmessage('before');
end;

procedure TForm1.TMSFMXPageControl1ClosePage(Sender: TObject;
  APageIndex: Integer; ACloseAction: TTMSFMXPageControlPageCloseAction);
begin
  showmessage('close');
end;

3

Tnx for the clue Bruno ;-)