Delphi XE2 Update 4+ MyDAC 7.1.6
With following steps, TMyEmbConnection will cause an AV at design-time:
1. Start Delphi XE2
2. New a VCL project.
3. Drop an TMyEmbConnection component to the Form
4. Select this TMyEmbConnection componennt.
5. In the Object Inspector, select "Params" for editing.
6. Delphi reports AV as "Access voilation at address xxxx in module rtl160.bpl. Read of Address 0000000F"
7. The call-stack generated by Delphi is:
//////////////////////////////////////////////////////////////////////////
[500A6594]{rtl160.bpl } System.Classes.TStrings.GetValue (Line 5580, "System.Classes.pas" + 1) + $5
[0CAD8D5A]{dclmydac160.bpl} Myconnectioneditor.TMyConnectionEditorForm.ParamsToControls + $2A
[0CAD7A54]{dclmydac160.bpl} Myconnectioneditor.TMyConnectionEditorForm.DoInit + $84
[0C87919E]{dcldac160.bpl} Creditor.TCREditorForm.FormShow + $1C2
[504495FD]{vcl160.bpl } Vcl.Forms.TCustomForm.DoShow (Line 3963, "Vcl.Forms.pas" + 1) + $14
[5044DC35]{vcl160.bpl } Vcl.Forms.TCustomForm.CMShowingChanged (Line 6581, "Vcl.Forms.pas" + 11) + $7
[5003CA63]{rtl160.bpl } System.TObject.Dispatch (Line 13727, "System.pas" + 11) + $0
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[500B6890]{rtl160.bpl } System.Classes.StdWndProc (Line 13878, "System.Classes.pas" +
[080D8B43]{Castalia16.bpl} Castaliaeditor.GetSourceFromModule + $373
[0808549C]{Castalia16.bpl} Castaliahookutils. + $0
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5044A021]{vcl160.bpl } Vcl.Forms.TCustomForm.WndProc (Line 4344, "Vcl.Forms.pas" + 201) + $5
[503325D0]{vcl160.bpl } Vcl.Controls.TControl.Perform (Line 6982, "Vcl.Controls.pas" + 10) + $8
[503366F1]{vcl160.bpl } Vcl.Controls.TWinControl.UpdateShowing (Line 9612, "Vcl.Controls.pas" + 19) + $C
[50336800]{vcl160.bpl } Vcl.Controls.TWinControl.UpdateControlState (Line 9647, "Vcl.Controls.pas" + 21) + $3
[503394DE]{vcl160.bpl } Vcl.Controls.TWinControl.CMVisibleChanged (Line 11413, "Vcl.Controls.pas" + 3) + $2
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[5044A021]{vcl160.bpl } Vcl.Forms.TCustomForm.WndProc (Line 4344, "Vcl.Forms.pas" + 201) + $5
[504500A3]{vcl160.bpl } Vcl.Forms.TScreen.GetMonitor (Line 7985, "Vcl.Forms.pas" + 1) + $5
[503325D0]{vcl160.bpl } Vcl.Controls.TControl.Perform (Line 6982, "Vcl.Controls.pas" + 10) + $8
[50330F96]{vcl160.bpl } Vcl.Controls.TControl.SetVisible (Line 6011, "Vcl.Controls.pas" + 5) + $C
[5044989E]{vcl160.bpl } Vcl.Forms.TCustomForm.SetVisible (Line 4069, "Vcl.Forms.pas" +
[5044E7EB]{vcl160.bpl } Vcl.Forms.TCustomForm.Show (Line 6961, "Vcl.Forms.pas" + 1) + $4
[5044EA3B]{vcl160.bpl } Vcl.Forms.TCustomForm.ShowModal (Line 7030, "Vcl.Forms.pas" + 28) + $3
[0C85A6C6]{dcldac160.bpl} Daconnectioneditor.TDAConnectionEditorForm.SetComponent + $E
[0C879FAC]{dcldac160.bpl} Crdesign.TCRComponentEditor.ShowEditorEx + $8C
[0C86DF8A]{dcldac160.bpl} Dadesign.TDAPropertyEditor.Edit + $62
[20878DB6]{coreide160.bpl} PropInsp.TPropertyInspector.PropListEditDblClick (Line 871, "PropInsp.pas" + 18) + $12
[2111DA0D]{vclide160.bpl} IDEInspListBox.TInspListBox.DoEditDblClick (Line 620, "IDEInspListBox.pas" + 2) + $A
[2111F7E7]{vclide160.bpl} IDEInspListBox.TInspListBox.ListButtonClick (Line 1311, "IDEInspListBox.pas" + 2) + $2
[50332EEB]{vcl160.bpl } Vcl.Controls.TControl.Click (Line 7320, "Vcl.Controls.pas" + 9) + $8
[21115222]{vclide160.bpl} IDEListBtns.TListButton.WMLButtonUp (Line 584, "IDEListBtns.pas" +
[50332995]{vcl160.bpl } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[27D201B9]{cxLibraryD16.bpl} Dxhooks. + $0
[27D1FFE9]{cxLibraryD16.bpl} Dxhooks. + $0
[50336B3B]{vcl160.bpl } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9745, "Vcl.Controls.pas" + 1) + $9
[503372F3]{vcl160.bpl } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[080D8AB8]{Castalia16.bpl} Castaliaeditor.GetSourceFromModule + $2E8
[50336948]{vcl160.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9689, "Vcl.Controls.pas" + 3) + $6
[500B6890]{rtl160.bpl } System.Classes.StdWndProc (Line 13878, "System.Classes.pas" +
[50454598]{vcl160.bpl } Vcl.Forms.TApplication.CancelHint (Line 10993, "Vcl.Forms.pas" + 6) + $7
[50453213]{vcl160.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10164, "Vcl.Forms.pas" + 23) + $1
[50453256]{vcl160.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10194, "Vcl.Forms.pas" + 1) + $4
[50453595]{vcl160.bpl } Vcl.Forms.TApplication.Run (Line 10332, "Vcl.Forms.pas" + 26) + $3
//////////////////////////////////////////////////////////////////
Please kindly review it.