Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/delphi/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Delphi 以继承形式列出索引超出范围_Delphi_Delphi Xe2_Reportbuilder - Fatal编程技术网

Delphi 以继承形式列出索引超出范围

Delphi 以继承形式列出索引超出范围,delphi,delphi-xe2,reportbuilder,Delphi,Delphi Xe2,Reportbuilder,我想将一个旧的Delphi6项目迁移到DelphiXe2和ReportBuilder14 在我的项目中,我从TppReport继承了一个用户组件TReportBase,我需要4到5个新属性。我有一个带有TReportBase组件和一些其他控件的基本表单TBaseForm。许多其他表单继承自此TBaseForm 这种行为在Delphi6中对我起了作用,我在Delphi7和Delphi2007中也进行了测试,结果很好。但在Delphi XE2中 我在预览和设计中发现了问题 当我添加Tpplabel时

我想将一个旧的Delphi6项目迁移到DelphiXe2和ReportBuilder14

在我的项目中,我从TppReport继承了一个用户组件TReportBase,我需要4到5个新属性。我有一个带有TReportBase组件和一些其他控件的基本表单TBaseForm。许多其他表单继承自此TBaseForm

这种行为在Delphi6中对我起了作用,我在Delphi7和Delphi2007中也进行了测试,结果很好。但在Delphi XE2中

我在预览和设计中发现了问题

当我添加Tpplabel时,我收到一个列表索引越界错误,如下所示:

[500A3234]{rtl160.bpl  } System.Classes.TList.Insert (Line 3932, "System.Classes.pas" + 5) + $1
[11CF1E98]{rbRCL1416.bpl} Ppclass.TppBand.AddObject + $84
[11CF5700]{rbRCL1416.bpl} Ppclass.TppComponent.SetBand + $54
[11BDCC80]{rbRCL1416.bpl} Ppctrls.TppCustomText.SetBand + $0
[11ED079A]{rbIDE1416.bpl} Ppdesignworkspacecontroller.TppDesignWorkspaceController.AddComponent + $E6
[11ED17CA]{rbIDE1416.bpl} Ppdesignworkspacecontroller.TppDesignWorkspaceController.ehWorkspace_MouseUp + $BA
[11AD6627]{rbRTL1416.bpl} Ppmulticast.TppMulticastEvent.Notify + $27
[11EBEF56]{rbIDE1416.bpl} Ppdesignerworkspace.TppWorkspace.MouseUp + $4A
[503331A8]{vcl160.bpl  } Vcl.Controls.TControl.DoMouseUp (Line 7448, "Vcl.Controls.pas" + 2) + $28
[50333224]{vcl160.bpl  } Vcl.Controls.TControl.WMLButtonUp (Line 7461, "Vcl.Controls.pas" + 9) + $6
[50332814]{vcl160.bpl  } Vcl.Controls.TControl.WndProc (Line 7204, "Vcl.Controls.pas" + 91) + $6
[11FC6660]{rbIDE1416.bpl} Ppsynuedit.TSynEditPlugin + $70
[503369AB]{vcl160.bpl  } Vcl.Controls.TWinControl.IsControlMouseMsg (Line 9745, "Vcl.Controls.pas" + 1) + $9
[50337163]{vcl160.bpl  } Vcl.Controls.TWinControl.WndProc (Line 9976, "Vcl.Controls.pas" + 152) + $6
[503367B8]{vcl160.bpl  } Vcl.Controls.TWinControl.MainWndProc (Line 9689, "Vcl.Controls.pas" + 3) + $6
[500B5FCC]{rtl160.bpl  } System.Classes.MakeObjectInstance (Line 13921, "System.Classes.pas" + 0) + $0
[504524EF]{vcl160.bpl  } Vcl.Forms.TApplication.ProcessMessage (Line 10164, "Vcl.Forms.pas" + 23) + $1
[50452532]{vcl160.bpl  } Vcl.Forms.TApplication.HandleMessage (Line 10194, "Vcl.Forms.pas" + 1) + $4
[50452865]{vcl160.bpl  } Vcl.Forms.TApplication.Run (Line 10331, "Vcl.Forms.pas" + 26) + $3
提前谢谢


lmir

您可能会在ReportBuilder ForUMS上获得更好的答案。我假设您已将所有第三方组件升级到XE2兼容版本,请回答。是的,我在RBuilder论坛上问过,谢谢。在这种情况下,我不使用其他组件。我测试了Delphi XE和ReportBuilder 12.03试用版,项目运行良好。我认为问题在于ReportBuilder的14版本以及组件继承方面的一些更改。您可能会在ReportBuilder ForUMI上得到更好的答案。我假设您已将所有第三方组件升级到XE2兼容版本。请回答。是的,我在RBuilder论坛上问过,谢谢。在这种情况下,我不使用其他组件。我测试了Delphi XE和ReportBuilder 12.03试用版,项目运行良好。我认为问题出在ReportBuilder的14版本中,我认为组件继承中有一些变化。