好象还是不行啊! 下面是运行主窗口的添加菜单的过程 procedure Tform_main.addClick(Sender: TObject); begin if assigned(Mdiform)<>nil then begin Form_add:=TForm_add.Create(Application); //创建指定MDI子窗口 Form_add.Show; end; end;是不是这样写?编译通不过啊!下面是提示: [Error] main.pas(143): Undeclared identifier: 'Mdiform' [Error] main.pas(143): Incompatible types [Fatal Error] message.dpr(13): Could not compile used unit 'main.pas'请高手门讲详细些!谢谢!:)
下面是运行主窗口的添加菜单的过程
procedure Tform_main.addClick(Sender: TObject);
begin
if assigned(Mdiform)<>nil then
begin
Form_add:=TForm_add.Create(Application); //创建指定MDI子窗口
Form_add.Show;
end;
end;是不是这样写?编译通不过啊!下面是提示:
[Error] main.pas(143): Undeclared identifier: 'Mdiform'
[Error] main.pas(143): Incompatible types
[Fatal Error] message.dpr(13): Could not compile used unit 'main.pas'请高手门讲详细些!谢谢!:)