Delphi 程序:第一条指令未编译

7jmck4yq  于 2023-01-30  发布在  其他
关注(0)|答案(1)|浏览(133)

我正在编写一个 Delphi 应用程序,其中有一个清除表单并将其重置为默认状态的过程。

procedure ResetForm ();
begin
   edtG1.Text := ''; // Error occurs on this line, no matter what the instruction is.
   edtG1.Enabled := True;
   btnG1Check.Enabled := True;
   .
   .
   .
   .
end;

我什么都试过了--无论如何,过程中的第一行代码都无法编译。我也看不出过程的声明有任何问题。
有人能帮忙吗?谢谢。
我试图清除表单中的所有字段,启用已禁用的内容,等等。将其重置为默认状态,因为它在程序开始时启动。我在第一行尝试了不同的代码指令(是的,edtG 1存在),其他控件和所有其他指令做完全相同的操作。我也尝试过重命名过程,但没有效果。

cl25kdpy

cl25kdpy1#

您已经编写了一个独立的例程,并且正在访问窗体上的一些控件。这是不可能的。
我假设您打算将其编写为窗体的方法。
转到窗体单元的接口部分,将procedure ResetForm;写入窗体类的public部分(注解{ Public declarations }所在的位置),按Ctrl+Shift+C,然后将代码写入方法。

相关问题