IDE geht kaputt bei TFileSaveDialog und Vererbung

[Der schöne Günther]

Ist das nur bei mir so oder kann das jemand nachvollziehen?

1. Neues VCL-Projekt anlegen
2. Neuen VCL-Frame "Frame1" anlegen
3. TFileSaveDialog auf Frame1 hinzufügen
4. Ableitung von TFrame1 erstellen ("TFrame11"), Formular-Designer offen lassen
5. Auf "TFrame1" den FileSaveDialog auswählen, im Objektinspektor "FileTypes" auswählen
6. Neuen Eintrag erstellen
7. Exception. TFrame11 (und damit das gesamte Projekt) kann fortan nicht mehr gespeichert werden. Exception tritt bei jedem Speichervorgang (oder z.B. Alt+F12) erneut auf

Delphi 10 Seattle

Fehlertext: "TFileTypeItem kann nicht zu TFileTypeItem zugewiesen werden."

Code:

[5015772D]{rtl230.bpl  } System.Classes.TPersistent.AssignError (Line 5400, "System.Classes.pas" + 4) + $36
[50157775]{rtl230.bpl  } System.Classes.TPersistent.AssignTo (Line 5405, "System.Classes.pas" + 0) + $1
[501576AB]{rtl230.bpl  } System.Classes.TPersistent.Assign (Line 5390, "System.Classes.pas" + 0) + $7
[50157ECC]{rtl230.bpl  } System.Classes.TCollection.Assign (Line 5692, "System.Classes.pas" + 10) + $24
[21195A58]{designide230.bpl} Update.TUpdateObject.Update (Line 1134, "Update.pas" + 54) + $E
[211959E8]{designide230.bpl} Update.TUpdateObject.Update (Line 1120, "Update.pas" + 40) + $3
[5005A19C]{rtl230.bpl  } System.@FreeMem (Line 4650, "System.pas" + 20) + $0
[5005F5F8]{rtl230.bpl  } System.TObject.FreeInstance (Line 16193, "System.pas" + 2) + $2
[5005F77C]{rtl230.bpl  } System.TObject.Free (Line 16261, "System.pas" + 1) + $4
[21195638]{designide230.bpl} Update.UpdateOrder (Line 1036, "Update.pas" + 29) + $3
[21195A8D]{designide230.bpl} Update.TUpdateObject.Update (Line 1139, "Update.pas" + 59) + $9
[5005A19C]{rtl230.bpl  } System.@FreeMem (Line 4650, "System.pas" + 20) + $0
[5006017C]{rtl230.bpl  } System.TMonitor.Destroy (Line 17787, "System.pas" + 0) + $0
[5005F7FF]{rtl230.bpl  } System.TObject.CleanupInstance (Line 16405, "System.pas" + 24) + $0
[5005A19C]{rtl230.bpl  } System.@FreeMem (Line 4650, "System.pas" + 20) + $0
[5005F5F8]{rtl230.bpl  } System.TObject.FreeInstance (Line 16193, "System.pas" + 2) + $2
[211964C5]{designide230.bpl} Update.TUpdateManager.Update (Line 1470, "Update.pas" + 22) + $9
[21195DB1]{designide230.bpl} Update.TUpdateManager.UpdateChildren (Line 1258, "Update.pas" + 2) + $A
[21195D78]{designide230.bpl} Update.TUpdateManager.Modified (Line 1240, "Update.pas" + 2) + $2
[211BD22A]{designide230.bpl} ComponentDesigner.TComponentRoot.ModifiedUpdateNotification (Line 3094, "ComponentDesigner.pas" + 2) + $8
[211BD364]{designide230.bpl} ComponentDesigner.TComponentRoot.Modified (Line 3114, "ComponentDesigner.pas" + 13) + $2
[211E7F38]{designide230.bpl} ColnEdit.TCollectionEditor.AddClick (Line 534, "ColnEdit.pas" + 21) + $B
[501714B7]{rtl230.bpl  } System.Classes.TBasicAction.Execute (Line 16382, "System.Classes.pas" + 3) + $7
[5097C6FA]{vcl230.bpl  } Vcl.ActnList.TCustomAction.Execute (Line 259, "Vcl.ActnList.pas" + 19) + $35
[5017130F]{rtl230.bpl  } System.Classes.TBasicActionLink.Execute (Line 16293, "System.Classes.pas" + 2) + $7
[50993754]{vcl230.bpl  } Vcl.Controls.TControl.Click (Line 7363, "Vcl.Controls.pas" + 7) + $7
[50A10DA8]{vcl230.bpl  } Vcl.ComCtrls.TToolButton.Click (Line 21574, "Vcl.ComCtrls.pas" + 0) + $0
[50993C19]{vcl230.bpl  } Vcl.Controls.TControl.WMLButtonUp (Line 7504, "Vcl.Controls.pas" + 7) + $6
[509931FD]{vcl230.bpl  } Vcl.Controls.TControl.WndProc (Line 7249, "Vcl.Controls.pas" + 91) + $6
[50992E38]{vcl230.bpl  } Vcl.Controls.TControl.Perform (Line 7027, "Vcl.Controls.pas" + 10) + $8
[50997452]{vcl230.bpl  } Vcl.Controls.GetControlAtPos (Line 9809, "Vcl.Controls.pas" + 4) + $75
[5099751A]{vcl230.bpl  } Vcl.Controls.TWinControl.ControlAtPos (Line 9832, "Vcl.Controls.pas" + 13) + $E
[50992E38]{vcl230.bpl  } Vcl.Controls.TControl.Perform (Line 7027, "Vcl.Controls.pas" + 10) + $8
[509975E8]{vcl230.bpl  } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9856, "Vcl.Controls.pas" + 15) + $29
[50997B9E]{vcl230.bpl  } Vcl.Controls.TWinControl.WndProc (Line 10025, "Vcl.Controls.pas" + 104) + $6
[50A12EC1]{vcl230.bpl  } Vcl.ComCtrls.TToolBar.UpdateButtonState (Line 22852, "Vcl.ComCtrls.pas" + 11) + $27
[50A12F02]{vcl230.bpl  } Vcl.ComCtrls.TToolBar.UpdateButtonStates (Line 22863, "Vcl.ComCtrls.pas" + 3) + $4
[50A158E8]{vcl230.bpl  } Vcl.ComCtrls.TToolBar.WndProc (Line 24441, "Vcl.ComCtrls.pas" + 104) + $6
[5099735C]{vcl230.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9786, "Vcl.Controls.pas" + 3) + $6
[50172214]{rtl230.bpl  } System.Classes.StdWndProc (Line 16886, "System.Classes.pas" + 8) + $0
[2076C924]{coreide230.bpl} EditorStatusControls.TEditorStatusControlForm.RecordActionUpdate (Line 48, "EditorStatusControls.pas" + 6) + $1F
[50ADDCE0]{vcl230.bpl  } Vcl.Forms.TApplication.StopHintTimer (Line 11171, "Vcl.Forms.pas" + 3) + $3
[50ADCB6F]{vcl230.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 10443, "Vcl.Forms.pas" + 23) + $1
[50ADCBB2]{vcl230.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 10473, "Vcl.Forms.pas" + 1) + $4
[50ADCEE5]{vcl230.bpl  } Vcl.Forms.TApplication.Run (Line 10611, "Vcl.Forms.pas" + 26) + $3