感觉应该是小问题，但是解决不了，哪位高手帮帮忙
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 '


怎么解决啊

[解决办法]
AAA1 in 'D:\洪宇工作记录\AAA1.pas ' ; //没有AAA1.pas