delphi - 访问单选按钮会引发异常

This question already has an answer here:

Problem with RadioGroup.ControlCount in Delphi 2010

（1个答案）

5年前关闭。

这是我用来重现此问题的测试应用程序：

请查看以下测试代码：

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(radioGroup1.Items[0]);
  ShowMessage(BoolToStr(radioGroup1.Buttons[0].Enabled));
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage(radioGroup1.Items[0]);
  ShowMessage(BoolToStr(radioGroup1.Buttons[0].Enabled)); //<- Fails!!!
end;

将显示FormCreate中的第一个ShowMessage，并显示正确的文本（Item1）。

FormCreate的第二行代码引发异常，该索引超出范围。

如果我在按钮单击事件中也运行了相同的代码，如代码中所示（在表单加载后），则一切正常。

问题1：
似乎在FormCreate中执行第二行代码时尚未加载按钮。
当项目本身看起来已经被加载时，为什么会这样呢？

问题2：
在将现有（运行良好）项目从Delphi 2006升级到XE6时，我注意到了这个问题。
由于此问题，该项目现在在不同的单元中引发了多个异常。
在这方面发生了什么变化？

预先感谢您的帮助！

最佳答案

流入.dfm文件时，将填充项目。这很早就发生了，当然早在OnCreate事件触发之前。这些按钮是窗口控件，通常在创建窗口时创建。并且，当执行窗体的OnCreate事件时，尚未创建该窗口。

您问为什么存在这些项目，但按钮不存在。好吧，按钮是从项目创建的。但不是立即。在表单流传输期间抑制了按钮的创建，这意味着将首先填充项目，然后在某个时候创建按钮。

我不确定从旧版本的Delphi到现代Delphi到底发生了什么变化。如果返回Delphi 6，可以看到按钮是在TCustomRadioGroup.ReadState中创建的，该按钮在表单流传输期间执行。但是最新版本的Delphi禁止在ReadState中创建按钮。我对为什么要进行此更改的猜测是，它阻止您设置在重新创建窗口时丢失的按钮属性。

但是，可能没有太多细节可言。基本事实是，您不能期望按钮在OnCreate期间存在。您应该将要求按钮存在的所有代码移到其他位置。表单的OnShow事件或重写的CreateWnd方法是一些明显的候选对象。

关于delphi - 访问单选按钮会引发异常，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/24782312/

上一篇：visual-studio - Windows 驱动程序开发 : Deploy option missing in Visual Studio 2012

下一篇：sql - 1 个 SQLITE 查询中的多个 COUNT

相关文章：

delphi - 如何在没有调试器的情况下显示运行时发生异常的行号？

delphi - delphi中inline关键字有什么用

delphi - 如何在 MSSQL 2008+Delphi 7+ADO 中使用 Windows 身份验证，但用户仍然需要输入密码？

delphi - 警告。 Delphi 7、Infopower 4000 中的重复资源

delphi - 如何暂时停止控件的绘制？

delphi - delphi程序中的隐藏主菜单，使用Alt键自动显示

delphi - 保存和恢复事件处理程序

delphi - 打开 dfm 文件时出错 - 未找到类 xxxx

Delphi XE 中 TClientDataSet(CDS 文件)的 SQL 查询？

delphi - 在搜索值中使用单引号找到 Delphi XE2 TADO 异常