我正在使用 Delphi 7,并尝试创建向导界面。我不知道是否有更简单的方法来创建向导,所以我考虑为向导的每个步骤制作单独的窗体。当用户点击“下一步”时,当前活动的窗体将关闭,并打开下一个窗体。
这里是两个连续窗体的屏幕截图:
我已经编写了一个过程,它接受两个窗体作为参数:将被关闭的窗体和向导的下一个窗体。
当我执行程序并点击“下一个”按钮时,下一个表单出现了,但是当前的表单没有关闭。有什么方法能让这个功能正常工作呢?或者说是否有其他更高效的创建向导的方法可供选择?
这里是两个连续窗体的屏幕截图:
![screen-shot](https://istack.dev59.com/I1Luq.webp)
class Procedure Tspad.nextForm(showForm, closeForm: TForm);
begin
closeForm.Close;
showForm.Showmodal;
end;
当我点击“下一个”按钮时,会执行以下代码:
Tspad.nextForm(echipContractForm, clientContractForm);
当我运行程序并按下“下一个”按钮时,下一个表单会出现,但当前的表单不会关闭。如何让它工作,或者是否有另一种更有效的创建向导的方式?当我执行程序并点击“下一个”按钮时,下一个表单出现了,但是当前的表单没有关闭。有什么方法能让这个功能正常工作呢?或者说是否有其他更高效的创建向导的方法可供选择?