一个delphi的数据库问题
我在作一个“朋友”信息管理系统,其中有5个窗体分别是主窗体formcover,添加窗体formadddata,浏览窗体formaddmore,查询窗体formsearch,关于窗体formabout,以及一个数据报表QuickReport1,还有一个数据模板datamodule1,这个数据模板的连接连好了,但是在主窗体中写代码如下时出错:unit Cover;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB,ADODB,StdCtrls, ExtCtrls;
type
TFormCover = class(TForm)
Label1: TLabel;
Label2: TLabel;
Panel1: TPanel;
Panel2: TPanel;
BTNAdd: TButton;
BTNBrowser: TButton;
BTNSearch: TButton;
BTNContact: TButton;
BTNAbout: TButton;
ExitBTN: TButton;
Memo1: TMemo;
procedure BTNAddClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
FormCover: TFormCover;
implementation
uses DataModule,AddData,AddMore,About,Search,QReport;
{$R *.dfm}
procedure TFormCover.BTNAddClick(Sender: TObject);//单击‘添加’按钮的事件
begin
DataModule1.datasource1.edit;//在这里出错,返回错误。[Fatal Error]AddData.pas(39):File not found:'Data.dcu'
FormAdd.show; [Pascal Error]Cover.pas(1):Unable to invoke Code Completion due to errors in source code
datamodule1.AdodataSet1.Append;
end;
end.
希望哪位高手能帮我一下,小弟感激不尽,谢谢大家!!!!!!!!!!!!!!!!!!!!!