表单 – 在Delphi中阻止父表单窗口

我正在尝试创建一个显示两个窗体的简单应用程序.第一个,主窗体应该能够在单击底部时显示弹出窗体窗口.显示的第二个表单必须禁用主窗体的功能.

请为此示例显示一个简单的代码.

尝试:

procedure ShowModalForm()
var 
  newForm: TNewForm;
begin
  newForm := TNewForm.Create(nil);
  try
    newForm.ShowModal;
  finally
    newForm.Free;
  end;
end;
相关文章
相关标签/搜索