返回列表 发帖

1个很基础的问题?

在哪种情况下输入以下代码?怎么弄出来?在次请教版主.
var
    ModalForm:TModalForm;
begin
    //创建 TModalForm 的实例
    ModalForm:=TModalForm.Create(Application);
    try
        if ModalForm.ShowModal=mrOk then          //显示这个窗体
      {执行一些代码}
    finally
        ModalForm.Free;
        ModalForm:=nil;
    end

1# zz1001


这个首先要在一个项目里建立两个窗体,并且一个窗体不是自动创建的,然后,在主窗体中就可以增一个按钮,一按就可以用这个代码,实现显示第二个窗体了。

TOP

下载的400M,DELPHI的版本,终于搞定所有基础问题,谢谢

TOP

3# zz1001


什么400M Delphi版本呀??

TOP

460专业版

TOP

返回列表 回复 发帖