感觉应该是小问题，但是解决不了，哪位高手帮帮忙

Question

Delphi中写一模糊查询程序，在Form窗体中添加一个Button，双击该按钮对其编程存储为“AAA1”经过调式，一直也没通过。保存的时候又让存储，存储为AAA
两程序如下：  
 
unit  AAA1;  
 
interface  
 
uses  
   Windows,  Messages,  SysUtils,  Variants,  Classes,  Graphics,  Controls,  Forms,  
   Dialogs,  DB,  ADODB,  StdCtrls,  ExtCtrls,  DBCtrls,  Grids,  DBGrids;  
 
type  
   TForm1  =  class(TForm)  
       ADOConnection1:  TADOConnection;  
       DataSource1:  TDataSource;  
       DBGrid1:  TDBGrid;  
       DBNavigator1:  TDBNavigator;  
       Button1:  TButton;  
       Edit1:  TEdit;  
       ADODataSet1:  TADODataSet;  
       ADOQuery1:  TADOQuery;  
       procedure  Button1Click(Sender:  TObject);  
   private  
       {  Private  declarations  }  
   public  
       {  Public  declarations  }  
   end;  
 
var  
   Form1:  TForm1;  
 
implementation  
 
{$R  *.dfm}  
 
procedure  TForm1.Button1Click(Sender:  TObject);  
begin  
               ADOQuery1.close;  
               ADOQuery1.ClearFields;  
               ADOQuery1.SQL.Add('select  *  from  gzjl  where  JE  like  ''%'+edit1.Text+'%''');  
               ADOQuery1.Open;  
               edit1.Text:='';  
               edit1.SetFocus;  
end.  
 
 
 
-------------------------------------------------------------------------  
 
program  AAA;  
 
uses  
   Forms;  
   AAA1  in  'D:\洪宇工作记录\AAA.pas'  ;  
 
{$R  *.res}  
 
begin  
   Application.Initialize;  
   Application.CreateForm(TForm1,  Form1);  
   Application.Run;  
end.  
--------------------------------------------------------------------------
-------------------------------------------------------------------------- 
 
提示如下错误：  
[Error]  AAA.dpr(5):  Declaration  expected  but  identifier  'AAA1'  found  
[Error]  AAA.dpr(11):  Undeclared  identifier:  'TForm1'  
 
 
怎么解决啊

Answer 1

AAA1  in  'D:\洪宇工作记录\AAA1.pas'  ;   //没有AAA1.pas

Answer 2

program AAA;uses
  Forms;
  AAA1 in 'D:\洪宇工作记录\;       {$R *.res}begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.改成这样吗。不管怎么改。都提示
[Error] AAA.dpr(5): Declaration expected but identifier 'Form1' found
[Error] AAA.dpr(11): Undeclared identifier: 'TForm1'

Answer 3

program AAA;uses
  Forms;
  AAA1 in 'D:\洪宇工作记录\AAA1.pas'       {$R *.res}begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Answer 4

还是不对。
AAA1 in 'D:\洪宇工作记录\AAA1.pas'
AAA1 in 'D:\洪宇工作记录\AAA1.pas' {form1};
AAA1 in 'D:\洪宇工作记录\AAA.pas' {form1};不管怎样改这句都不对。Application.CreateForm(TForm1, Form1);这句也不对。
提示错误：[Error] AAA.dpr(11): Undeclared identifier: 'TForm1'

Answer 5

AAA1.pas 和AAA.pas是不是放在同个目录下?
是的话
program AAA;uses
  Forms;
  AAA1 in 'AAA1.pas';       {$R *.res}begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Answer 6

还是不对。
就是提示
AAA1 in 'AAA1.pas';
第一个那个名找不到。
[Error] AAA.dpr(5): Declaration expected but identifier 'AAA' found
不管是换成AAA  还是AAA1都是找不到。另外想问一下。AAA和AAA1的作用是什么啊。不是很明白。想改也无从下手呢。

Answer 7

新建项目不还得是这样的问题吗。好心人啊。麻烦你帮我解释一下吧。AAA是干什么用的。
AAA1倒是正常知道是写代码程序的。但是后来保存的时候怎么会又让存储一个文件。存储为AAA自动生成里面的代码。可是代码确有错误。

Answer 8

AAA是你的项目文件啊,也就是你的程序入口!