表单继承的问题 (40分)

我做了一基本表单（Base），其中上面有一个工具栏。我在工具栏的‘退出’快捷图标的单击事件中写了一行
代码：SELF。CLOSE用来关闭表单。我以做了一个表单（DEMO）是继承基本表单（BASE）的。但在表单中（DEMO）
单击‘退出’快捷图标时，不能关闭表单（DEMO），请问如何解答。
随便问一下我在DataModule的OnCreate事件中連接SQL时
procedure TNic_DM.DataModuleCreate(Sender: TObject);
Var
FileName,Server,NicDatabase:String;

begin
FileName:=ExtractFilePath(ParamStr(0))+'Nic.txt';
Nicini:=TIniFile.Create(FileName);
Server:=Nicini.ReadString('NicDatabase','Server','local');
NicDatabase:=Nicini.ReadString('NicDatabase','Database','Nic.txt');
Nic_AdoConnect.Connectionstring:='Provider=SQLOLEDB.1;'+
'Persist Security Info=False;'+
'User ID=SA;'+
'Initial Catalog='+NicDatabase+';'+
'Data Source='+Server+';'+
'Locale Identifier=2052;'+
'Connect Timeout=3;'+
'Use Procedure for Prepare=1;'+
'Auto Translate=True;'+
'Packet Size=4096;'+
'Workstation ID=HELLO';
try
Try
Nic_AdoConnect.connected:=True;
finally
Nicini.Free;
end;
except
Application.MessageBox(Pchar('不能连接SQL服务器'）,mb_ICONError);
Application.Terminate;
end;
检查语法时提示：
[Error] Nic_DM_Pas.pas(53): Undeclared identifier: 'Application'
请问如何原因