Question

Delphi中的窗体打开怎么弄的？

unit Unit1;

interface

uses
SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
QDialogs, QStdCtrls, QMenus;

type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
procedure N2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.xfm}

procedure TForm1.N2Click(Sender: TObject);
begin
Form2.Show;
end;
[错误] Unit1.pas(30): Undeclared identifier: 'Form2'
[致命错误] Project2.dpr(6): Could not compile used unit 'Unit1.pas'
这是怎么回事啊；那错了。
end.

Answer 1

因为delphi不知道你要用的Form2在哪里声明的.所以你要告诉她在哪里声明了Form2.
以便编译的时候delphi能够找到这个单元. 有两种方法
1.在interface下的uses 加上Form2所在的单元(如果你命名的是Unit2则加上Unit2即可)
2.在implementation下的uses 加上Form2所在的单元
二者区别是在中间部分 用第二中的话中间部分不能用到所引用单元的内容 所以如果你中间没用到引用单元的内容的话建议用第二种

Answer 2

你没有引用Form2 的那个窗体。
在use 后边加上 unit2就可以了。
uses
SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
QDialogs, QStdCtrls, QMenus, unit2;