TTabSheet.Free does not remove TCocoaTabPage from TCocoaTabControl
Original Reporter info from Mantis: djenkins @dfjenkins
-
Reporter name: David Jenkins
Original Reporter info from Mantis: djenkins @dfjenkins
- Reporter name: David Jenkins
Description:
Calling TTabSheet.Free will destroty the TTabSheet but the associated TCocoaTabPage is not removed from the TCocoaTabControl. So the number of show stabs actually does not decrease and tabs do not go away.
Steps to reproduce:
Run attached project and push button that calls PageControl1.Pages[0].free
Additional information:
Attached patch fixes problem by adding TCocoaWsCustomPage.DestroyHandle that checks removes TCocoaTabPage from the TCocoaTabControl (if it is still attached to it) and then calls TCocoaWSWincontrol.DestroyHandle()
Mantis conversion info:
- Mantis ID: 35171
- OS: MacOSX
- OS Build: all
- Platform: Cocoa
- Fixed in revision: 61008 (#ff9256af)