gn="justify"> procedure N9Click (Sender: TObject);
procedure N10Click (Sender: TObject);
procedure img1Click (Sender: TObject);
private
{Private declarations}
public
{Public declarations}
end;
Form1: TForm1; Unit2, Unit3, Unit5, Unit4, Unit7, Unit9, Unit11;
{$ R * .dfm} TForm1.N2Click (Sender: TObject) ;. ShowModal ;; TForm1.N3Click (Sender: TObject) ;. ShowModal ;; TForm1.N8Click (Sender: TObject);.ShowModal ;; TForm1.N7Click (Sender: TObject) ;. ShowModal ;; TForm1.N4Click (Sender: TObject) ;. ShowModal ;; TForm1.N6Click (Sender: TObject) ;. ShowModal ;; TForm1.N9Click (Sender: TObject ) ;. ShowModal ;; TForm1.N10Click (Sender: TObject) ;;; Unit1;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, RpRave, RpCon, RpConDS, RpDefine, RpBase, RpSystem, DB, ADODB,
Menus, jpeg, ExtCtrls;
TForm1=class (TForm)
MainMenu1: TMainMenu;
ADOConnection1: TADOConnection;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N5: TMenuItem;
N4: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N6: TMenuItem;
img1: TImage;
N10: TMenuItem;
procedure N2Click (Sender: TObject);
procedure N3Click (Sender: TObject);
procedure N8Click (Sender: TObject);
procedure N7Click (Sender: TObject);
procedure N4Click (Sender: TObject);
procedure N6Click (Sender: TObject);
procedure N9Click (Sender: TObject);
procedure N10Click (Sender: TObject);
procedure img1Click (Sender: TObject);
private
{Private declarations}
public
{Public declarations}
end;
Form1: TForm1; Unit2, Unit3, Unit5, Unit4, Unit7, Unit9, Unit11;
{$ R * .dfm} TForm1.N2Click (Sender: TObject) ;. ShowModal ;; TForm1.N3Click (Sender: TObject) ;. ShowModal ;; TForm1.N8Click (Sender: TObject);.ShowModal ;; TForm1.N7Click (Sender: TObject) ;. ShowModal ;; TForm1.N4Click (Sender: TObject) ;. ShowModal ;; TForm1.N6Click (Sender: TObject) ;. ShowModal ;; TForm1.N9Click (Sender: TObject ) ;. ShowModal ;; TForm1.N10Click (Sender: TObject) ;;; Unit11;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ADODB, StdCtrls, Mask, DBCtrls, Grids, DBGrids, DB, ExtCtrls;
TForm11=class (TForm)
Panel1: TPanel;
Panel2: TPanel;
Label1: TLabel;
Label2: TLabel;
DataSource1: TDataSource;
ADOQuery1: TADOQuery;
DBGrid1: TDBGrid;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Label7: TLabel;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
ADOTable1: TADOTable;
ADOTable2: TADOTable;
ADOTable3: TADOTable;
ADOTable4: TADOTable;
DBEdit5: TDBEdit;
ADOTable5: TADOTable;
DataSource2: TDataSource;
DataSource3: TDataSource;
DataSource4: TDataSource;
DataSource5: TDataSource;
DataSource6: TDataSource;
DataSource7: TDataSource;
ADOQuery2: TADOQuery;
DataSource8: TDataSource;
ADOTable6: TADOTable;
ADOTable7: TADOTable;
DataSource9: TDataSource;
DataSource10: TDataSource;
ADOTable8: TADOTable;
ADOTable9: TADOTable;
DataSource11: TDataSource;