procedure TMainForm.btnDepartmentSettingClick(Sender: TObject);
begin
    if menuPDepartment.Enabled then
        menuPDepartmentClick(Sender);
end;procedure TMainForm.menuPDepartmentClick(Sender: TObject);
begin
    if frmdep=nil then
        frmdep:=Tfrmdep.create(frmdep);
    frmdep.ShowModal;
    FreeAndNil(frmdep);
end;
procedure TMainForm.FormCreate(Sender: TObject);
begin
    if frmLogin = nil then
        frmLogin := TfrmLogin.Create(nil);
    frmLogin.ShowModal;
    //if frmLogin.ShowModal = mrCancel then
    //    Application.Terminate;
end;
以上代码是主窗体的一个按键的,我很奇怪的是
这个子窗体是Udep,而在代码中写的是frmdep;
关于子窗体在主窗体中命名的规则是怎么样的?
谢谢!

解决方案 »

  1.   

    Udep这是你的单元文件名字,frmdep这是你的窗体名字吧。
      

  2.   

    为什么要按照变量名命名呢?变量,要按照哪个变量呢?
    uStainfo比如现在这个是单元名,那我怎么命变量名呢?
      

  3.   

    窗体名和窗体类名是两码事,窗体类名在窗体声明的地方可以看到,但窗体名则可以在任何地方声明,所以你说怎样看到窗体名,是不好说的,不过一般默认的一个窗体会声明在窗体类声明之后

    type
      TMainForm = class(TForm)
        ...
        ...
      end;var
      MainForm :TMainForm;
      

  4.   

    以下是在类中的声明
    menuPDepartment: TMenuItem;
    以下是在具体的过程中用到的
    frmdep
    以下是用这个名命名这个FORM文件的!
    uDep
    其实我只是想到过程中命名和这个FORM文件命名的关系!
      

  5.   


    是不是我理解的太简单了,你要看到什么窗体名啊??一个Form,难道你看不到它名字吗?