The unit wen1;

Interface

USES the
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, DB, ADODB, StdCtrls, jpeg, ExtCtrls;

Type
TForm1=class (TForm)
Image1: TImage;
Image2: TImage;
Image3: TImage;
Image4: TImage;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Image5: TImage;
ADOConnection1: TADOConnection;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4 interchange: TMenuItem;
N5: TMenuItem;
Image6: TImage;
Label6: TLabel;
N6: TMenuItem;
N7: TMenuItem;
The N8: TMenuItem;
The N9: TMenuItem;
Label5: TLabel;
Image7: TImage;
Label7: TLabel;
Image8: TImage;
Label8: TLabel;
Procedure Image6Click (Sender: TObject);
Procedure Label6Click (Sender: TObject);
Procedure Image1Click (Sender: TObject);
Procedure Label1Click (Sender: TObject);
Procedure Label2Click (Sender: TObject);
Procedure Image2Click (Sender: TObject);
Procedure Label3Click (Sender: TObject);
Procedure Image3Click (Sender: TObject);
Procedure Image4Click (Sender: TObject);
Procedure Label4Click (Sender: TObject);
Procedure Image5Click (Sender: TObject);
Procedure Label5Click (Sender: TObject);
Procedure N6Click (Sender: TObject);
Procedure N1Click (Sender: TObject);
Procedure N2Click (Sender: TObject);
Procedure N3Click (Sender: TObject);
Procedure N4Click (Sender: TObject);
Procedure N7Click (Sender: TObject);
Procedure N8Click (Sender: TObject);
Procedure N9Click (Sender: TObject);
Procedure Label7Click (Sender: TObject);
Procedure Image7Click (Sender: TObject);
Procedure Label8Click (Sender: TObject);
Procedure Image8Click (Sender: TObject);
Private
{Private declarations}
Public
{Public declarations}
end;

Var
Form1: TForm1;

Implementation

USES nh, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit10, Unit9, Unit11,
Unit12, Unit13 Unit14;

{$R *. DFM}

CodePudding user response:

To the project, the clean, save all, build

CodePudding user response:

Prompt mean wen unit recursively cited its

Check section USES, look to whether include direct or indirect circular reference