Bug 781

Easy to reproduce, both at design time and at runtime:

- Create a new VCL Delphi project (reproduced in XE6)
- Add a TChart at design time
- Open the editor and add a series (reproduced with a TBarSeries)
- With the series selected, click on the "Change..." button.

Here it is the stack trace:

[50159115]{rtl200.bpl  } System.Classes.TList.Get (Line 4256, "System.Classes.pas" + 2) + $6
[50556D5A]{vcl200.bpl  } Vcl.ComCtrls.TPageControl.GetPage (Line 6591, "Vcl.ComCtrls.pas" + 1) + $8
[505575EE]{vcl200.bpl  } Vcl.ComCtrls.TPageControl.SetTabIndex (Line 6885, "Vcl.ComCtrls.pas" + 5) + $D
[50555432]{vcl200.bpl  } Vcl.ComCtrls.TCustomTabControl.CreateWnd (Line 5692, "Vcl.ComCtrls.pas" + 8) + $A
[504F67CA]{vcl200.bpl  } Vcl.Controls.TWinControl.CreateHandle (Line 9547, "Vcl.Controls.pas" + 3) + $4
[504FA63C]{vcl200.bpl  } Vcl.Controls.TWinControl.HandleNeeded (Line 12092, "Vcl.Controls.pas" + 4) + $4
[504FA649]{vcl200.bpl  } Vcl.Controls.TWinControl.GetHandle (Line 12098, "Vcl.Controls.pas" + 1) + $2
[505554FA]{vcl200.bpl  } Vcl.ComCtrls.TCustomTabControl.GetTabIndex (Line 5723, "Vcl.ComCtrls.pas" + 1) + $B
[5055703D]{vcl200.bpl  } Vcl.ComCtrls.TPageControl.UpdateActivePage (Line 6684, "Vcl.ComCtrls.pas" + 1) + $2
[50556B0D]{vcl200.bpl  } Vcl.ComCtrls.TPageControl.DeleteTab (Line 6486, "Vcl.ComCtrls.pas" + 9) + $4
[5055644D]{vcl200.bpl  } Vcl.ComCtrls.TTabSheet.SetTabShowing (Line 6272, "Vcl.ComCtrls.pas" + 10) + $A
[505564B0]{vcl200.bpl  } Vcl.ComCtrls.TTabSheet.UpdateTabShowing (Line 6295, "Vcl.ComCtrls.pas" + 0) + $18
[50556462]{vcl200.bpl  } Vcl.ComCtrls.TTabSheet.SetTabVisible (Line 6281, "Vcl.ComCtrls.pas" + 3) + $0
[1971D11F]{TeeUI920.bpl} Vcltee.Teegally.TTeeGallery.HideFunctions + $B
[1971E445]{TeeUI920.bpl} Vcltee.Teegally.TTeeGallery.SetPalette + $AD
[1971E567]{TeeUI920.bpl} Vcltee.Teegally.TTeeGallery.SetPalette + $1CF
[1971E668]{TeeUI920.bpl} Vcltee.Teegally.CreateNewSeriesGallery + $F0
[1971E749]{TeeUI920.bpl} Vcltee.Teegally.CreateNewSeriesGallery + $21
[1971E7D3]{TeeUI920.bpl} Vcltee.Teegally.ChangeSeriesTypeGallery + $1F
[422888AC]{Tee920.bpl  } System.Generics.Collections. + $2C
[1971E92D]{TeeUI920.bpl} Vcltee.Teegally.GetChartGalleryFunction + $B9
[19717FCC]{TeeUI920.bpl} Vcltee.Teelisb.TChartListBox.ChangeTypeSeries + $108
[1977277F]{TeeUI920.bpl} Vcltee.Teeeditcha.TChartEditForm.BChangeTypeSeriesClick + $B
[504F314B]{vcl200.bpl  } Vcl.Controls.TControl.Click (Line 7348, "Vcl.Controls.pas" + 9) + $8
[50517D0A]{vcl200.bpl  } Vcl.StdCtrls.TCustomButton.Click (Line 5320, "Vcl.StdCtrls.pas" + 3) + $2
[50518810]{vcl200.bpl  } Vcl.StdCtrls.TCustomButton.CNCommand (Line 5781, "Vcl.StdCtrls.pas" + 1) + $D
[504F2BF5]{vcl200.bpl  } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[505179B4]{vcl200.bpl  } Vcl.StdCtrls.TButtonControl.WndProc (Line 5157, "Vcl.StdCtrls.pas" + 13) + $4
[504F2830]{vcl200.bpl  } Vcl.Controls.TControl.Perform (Line 7010, "Vcl.Controls.pas" + 10) + $8
[504F789F]{vcl200.bpl  } Vcl.Controls.DoControlMsg (Line 10116, "Vcl.Controls.pas" + 12) + $11
[504F8327]{vcl200.bpl  } Vcl.Controls.TWinControl.WMCommand (Line 10391, "Vcl.Controls.pas" + 1) + $5
[504F2BF5]{vcl200.bpl  } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[504F784A]{vcl200.bpl  } Vcl.Controls.TWinControl.DefaultHandler (Line 10088, "Vcl.Controls.pas" + 30) + $19
[504F2BF5]{vcl200.bpl  } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[5005FCF0]{rtl200.bpl  } System.TMonitor.TryEnter (Line 17533, "System.pas" + 10) + $0
[5005F870]{rtl200.bpl  } System.TMonitor.Enter (Line 17226, "System.pas" + 4) + $2
[5005F6F4]{rtl200.bpl  } System.TMonitor.CheckOwningThread (Line 17144, "System.pas" + 2) + $0
[5005F9FE]{rtl200.bpl  } System.TMonitor.Exit (Line 17330, "System.pas" + 1) + $2
[504F6D80]{vcl200.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9759, "Vcl.Controls.pas" + 3) + $6
[50177B88]{rtl200.bpl  } System.Classes.StdWndProc (Line 17064, "System.Classes.pas" + 6) + $1
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[50639B40]{vcl200.bpl  } Vcl.Forms.TCustomForm.WndProc (Line 4426, "Vcl.Forms.pas" + 206) + $5
[50644D3B]{vcl200.bpl  } Vcl.Forms.TApplication.DispatchAction (Line 11557, "Vcl.Forms.pas" + 9) + $C
[504F784A]{vcl200.bpl  } Vcl.Controls.TWinControl.DefaultHandler (Line 10088, "Vcl.Controls.pas" + 30) + $19
[504F35A0]{vcl200.bpl  } Vcl.Controls.TControl.WMLButtonUp (Line 7481, "Vcl.Controls.pas" + 1) + $6
[504F2BF5]{vcl200.bpl  } Vcl.Controls.TControl.WndProc (Line 7232, "Vcl.Controls.pas" + 91) + $6
[504F6F6F]{vcl200.bpl  } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9815, "Vcl.Controls.pas" + 1) + $9
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[505179B4]{vcl200.bpl  } Vcl.StdCtrls.TButtonControl.WndProc (Line 5157, "Vcl.StdCtrls.pas" + 13) + $4
[504F6D80]{vcl200.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9759, "Vcl.Controls.pas" + 3) + $6
[50177B88]{rtl200.bpl  } System.Classes.StdWndProc (Line 17064, "System.Classes.pas" + 6) + $1
[506A301B]{vcl200.bpl  } Vcl.AppEvnts.TMultiCaster.GetAppEvents (Line 654, "Vcl.AppEvnts.pas" + 1) + $5
[50644441]{vcl200.bpl  } Vcl.Forms.TApplication.CancelHint (Line 11180, "Vcl.Forms.pas" + 6) + $D
[506430DF]{vcl200.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 10351, "Vcl.Forms.pas" + 23) + $1
[50643122]{vcl200.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 10381, "Vcl.Forms.pas" + 1) + $4
[5063E5A6]{vcl200.bpl  } Vcl.Forms.TCustomForm.ShowModal (Line 7147, "Vcl.Forms.pas" + 33) + $5
[19780947]{TeeUI920.bpl} Vcltee.Editchar.EditChartPage + $2B
[19780BA2]{TeeUI920.bpl} Vcltee.Editchar.EditChart + $2
[19780C7E]{TeeUI920.bpl} Vcltee.Editchar.EditChartPart + $CA
[16308833]{DclTeePro920.bpl} Teechartreg.EditChartDesign + $37
[16308AAD]{DclTeePro920.bpl} Teechartreg.TChartCompEditor.Edit + $1D
[0103FB55]{designide200.bpl} ComponentDesigner.TInternalItem.Edit (Line 7555, "ComponentDesigner.pas" + 1) + $F
[01002794]{designide200.bpl} Designer.TDesigner.Edit (Line 1011, "Designer.pas" + 0) + $4
[01004A6F]{designide200.bpl} Designer.TDesigner.MouseDown (Line 1712, "Designer.pas" + 50) + $6
[51FBEF0B]{vcldesigner200.bpl} VCLSurface.MouseEvent (Line 3178, "VCLSurface.pas" + 36) + $2A
[5005FA4F]{rtl200.bpl  } System.TMonitor.Exit (Line 17352, "System.pas" + 2) + $7
[51FBFB3F]{vcldesigner200.bpl} VCLSurface.TVclDesignSurface.IsDesignMsg (Line 3448, "VCLSurface.pas" + 48) + $6
[5005F042]{rtl200.bpl  } System.@IsClass (Line 16068, "System.pas" + 1) + $8
[504F297B]{vcl200.bpl  } Vcl.Controls.TControl.WndProc (Line 7145, "Vcl.Controls.pas" + 4) + $21
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[5005FCF0]{rtl200.bpl  } System.TMonitor.TryEnter (Line 17533, "System.pas" + 10) + $0
[5005F870]{rtl200.bpl  } System.TMonitor.Enter (Line 17226, "System.pas" + 4) + $2
[5005F6F4]{rtl200.bpl  } System.TMonitor.CheckOwningThread (Line 17144, "System.pas" + 2) + $0
[5005F9FE]{rtl200.bpl  } System.TMonitor.Exit (Line 17330, "System.pas" + 1) + $2
[5005FA4F]{rtl200.bpl  } System.TMonitor.Exit (Line 17352, "System.pas" + 2) + $7
[504D4A2B]{vcl200.bpl  } Vcl.Graphics.FreeMemoryContexts (Line 7047, "Vcl.Graphics.pas" + 12) + $8
[504F6D80]{vcl200.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9759, "Vcl.Controls.pas" + 3) + $6
[504F6D95]{vcl200.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9762, "Vcl.Controls.pas" + 6) + $0
[504F6FBC]{vcl200.bpl  } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9823, "Vcl.Controls.pas" + 9) + $25
[504F7739]{vcl200.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10047, "Vcl.Controls.pas" + 153) + $6
[42243758]{Tee920.bpl  } Vcltee.Teeprocs.TCustomTeePanel.WndProc + $C
[504F6D80]{vcl200.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9759, "Vcl.Controls.pas" + 3) + $6
[50177B88]{rtl200.bpl  } System.Classes.StdWndProc (Line 17064, "System.Classes.pas" + 6) + $1
[50644441]{vcl200.bpl  } Vcl.Forms.TApplication.CancelHint (Line 11180, "Vcl.Forms.pas" + 6) + $D
[506430DF]{vcl200.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 10351, "Vcl.Forms.pas" + 23) + $1
[50643122]{vcl200.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 10381, "Vcl.Forms.pas" + 1) + $4
[50643455]{vcl200.bpl  } Vcl.Forms.TApplication.Run (Line 10519, "Vcl.Forms.pas" + 26) + $3