我正在编写一个 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存在),其他控件和所有其他指令做完全相同的操作。我也尝试过重命名过程,但没有效果。
1条答案
按热度按时间cl25kdpy1#
您已经编写了一个独立的例程,并且正在访问窗体上的一些控件。这是不可能的。
我假设您打算将其编写为窗体的方法。
转到窗体单元的接口部分,将
procedure ResetForm;
写入窗体类的public部分(注解{ Public declarations }
所在的位置),按Ctrl+Shift+C,然后将代码写入方法。