| Dastur listingi
Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, jpeg, ExtCtrls;= class(TForm): TImage;: TSpeedButton;: TSpeedButton;SpeedButton1Click(Sender: TObject);SpeedButton2Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm1;Unit2;
{$R *.dfm}TForm1.SpeedButton1Click(Sender: TObject);.Visible:=false;.Show;;TForm1.SpeedButton2Click(Sender: TObject);;;.Unit2;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, jpeg, ExtCtrls, ComCtrls, Buttons, DB, ADODB, Grids, DBGrids,;= class(TForm): TADOConnection;: TADOQuery;: TDataSource;: TSpeedButton;: TMonthCalendar;: TSpeedButton;: TSpeedButton;: TSpeedButton;: TSpeedButton;: TSpeedButton;: TSpeedButton;: TSpeedButton;: TBevel;: TDBGrid;: TDBNavigator;SpeedButton2Click(Sender: TObject);SpeedButton5Click(Sender: TObject);SpeedButton7Click(Sender: TObject);SpeedButton8Click(Sender: TObject);SpeedButton1Click(Sender: TObject);SpeedButton3Click(Sender: TObject);SpeedButton4Click(Sender: TObject);SpeedButton6Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm2;Unit1, Unit3, Unit4, Unit5, Unit7, Unit9, Unit10, Unit11;
{$R *.dfm}TForm2.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;TForm2.SpeedButton5Click(Sender: TObject);.QuickRep1.Preview;;TForm2.SpeedButton7Click(Sender: TObject);.Show;;TForm2.SpeedButton8Click(Sender: TObject);.Visible:=false;.Show;;TForm2.SpeedButton1Click(Sender: TObject);.Visible:=false;.Show;;TForm2.SpeedButton3Click(Sender: TObject);.Visible:=false;.Show;;TForm2.SpeedButton4Click(Sender: TObject);.Visible:=false;.Show;;TForm2.SpeedButton6Click(Sender: TObject);.Visible:=false;.Show;;.Unit3;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, QuickRpt, QRCtrls, DB, ADODB, ExtCtrls;= class(TForm): TQuickRep;: TADOConnection;: TADOQuery;: TQRBand;: TQRBand;: TQRBand;: TQRBand;: TQRLabel;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRExpr;: TQRLabel;: TQRLabel;: TQRExpr;: TQRSysData;: TQRLabel;
{ Private declarations }
{ Public declarations };: TForm3;
{$R *.dfm}.Unit4;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, StdCtrls, Mask, DBCtrls;= class(TForm): TSpeedButton;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TDBEdit;: TDBEdit;: TDBEdit;: TDBEdit;: TDBComboBox;: TDBComboBox;: TDBText;SpeedButton1Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm4;Unit2;
{$R *.dfm}TForm4.SpeedButton1Click(Sender: TObject);.ADOQuery1.Post;;;.Unit5;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, ExtCtrls, DBCtrls, DB, ADODB, Grids, DBGrids;= class(TForm): TDBGrid;: TDataSource;: TADOQuery;: TADOConnection;: TDBNavigator;: TSpeedButton;: TSpeedButton;SpeedButton5Click(Sender: TObject);SpeedButton2Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm5;Unit6, Unit2;
{$R *.dfm}TForm5.SpeedButton5Click(Sender: TObject);.QuickRep1.Preview;;TForm5.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;.Unit6;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, DB, ADODB, QRCtrls, QuickRpt, ExtCtrls;= class(TForm): TQuickRep;: TQRBand;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRLabel;: TQRBand;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRDBText;: TQRBand;: TQRLabel;: TQRSysData;: TQRBand;: TQRLabel;: TQRExpr;: TQRLabel;: TADOQuery;: TADOConnection;: TQRDBText;: TQRLabel;
{ Private declarations }
{ Public declarations };: TForm6;
{$R *.dfm}.Unit7;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, ExtCtrls, DBCtrls, DB, ADODB, Grids, DBGrids;= class(TForm): TDBGrid;: TDataSource;: TADOQuery;: TADOConnection;: TDBNavigator;: TSpeedButton;: TSpeedButton;SpeedButton2Click(Sender: TObject);SpeedButton7Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm7;Unit2, Unit8;
{$R *.dfm}TForm7.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;TForm7.SpeedButton7Click(Sender: TObject);.Show;;.Unit8;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, Mask, DBCtrls, Buttons;= class(TForm): TSpeedButton;: TDBText;: TDBEdit;: TDBEdit;: TDBEdit;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TDBEdit;: TDBEdit;: TDBEdit;SpeedButton1Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm8;Unit7;
{$R *.dfm}TForm8.SpeedButton1Click(Sender: TObject);.ADOQuery1.Post;;;.Unit9;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, ExtCtrls, DBCtrls, DB, ADODB, Grids, DBGrids;= class(TForm): TDBGrid;: TDataSource;: TADOQuery;: TADOConnection;: TDBNavigator;: TSpeedButton;SpeedButton2Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm9;Unit2;
{$R *.dfm}TForm9.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;.Unit10;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Buttons, ExtCtrls, DBCtrls, DB, ADODB, Grids, DBGrids;= class(TForm): TDBGrid;: TDataSource;: TADOQuery;: TADOConnection;: TDBNavigator;: TSpeedButton;SpeedButton2Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm10;Unit2;
{$R *.dfm}TForm10.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;.Unit11;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, ExtCtrls, jpeg, StdCtrls, DB, ADODB, Buttons, DBCtrls, Grids,;= class(TForm): TDBGrid;: TDBNavigator;: TSpeedButton;: TADOQuery;: TADOConnection;: TDataSource;: TDBGrid;: TDBNavigator;: TADOQuery;: TDataSource;: TLabel;: TLabel;: TDBGrid;: TDBNavigator;: TADOQuery;: TDataSource;: TLabel;: TBevel;: TBevel;SpeedButton2Click(Sender: TObject);
{ Private declarations }
{ Public declarations };: TForm11;Unit2;
{$R *.dfm}TForm11.SpeedButton2Click(Sender: TObject);.Visible:=false;.Show;;.
|
