Дипломная работа: Автоматизация процессов управления взаимоотношениями с клиентами предприятия "OZON.RU"

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
101
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormOtchetManager : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridManager;
TADODataSet *ADODataSetManager;
TDataSource *DataSourceManager;
TADODataSet *ADODataSetDolgnost;
TDataSource *DataSourceDolgnost;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TADODataSet *ADODataSetHistory;
TDataSource *DataSourceHistory;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
TButton *ButtonExit;
void __fastcall FormShow(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
void __fastcall ButtonExitClick(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormOtchetManager(TComponent* Owner);
102
};
//---------------------------------------------------------------------------
extern PACKAGE TFormOtchetManager *FormOtchetManager;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef ProdanoH
#define ProdanoH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DBCtrls.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormProdano : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridComputerTehnika;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TAutoIncField *ADODataSetComputerTehnikaCod;
TWideStringField *ADODataSetComputerTehnikaName;
TBCDField *ADODataSetComputerTehnikaCena;
TBooleanField *ADODataSetComputerTehnikaProdan;
TDateTimeField *ADODataSetComputerTehnikaDataPostup;
103
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TDataSource *DataSourceVidTehniki;
TADODataSet *ADODataSetVidTehniki;
TStringField *ADODataSetComputerTehnikaNameVidTehniki;
TDBImage *DBImageFoto;
TDBMemo *DBMemoOpisanie;
TButton *ButtonExit;
TButton *ButtonPrint;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
TMenuItem *N2;
TDataSource *DataSourceHistory;
TADODataSet *ADODataSetHistory;
TAutoIncField *ADODataSetHistoryCod;
TIntegerField *ADODataSetHistoryCodComputerTehnika;
TIntegerField *ADODataSetHistoryCodManager;
TDateTimeField *ADODataSetHistoryDataProdazhi;
TBCDField *ADODataSetHistoryCena;
TDateField *ADODataSetComputerTehnikaDataProdazhi;
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall DBGridComputerTehnikaCellClick(TColumn *Column);
void __fastcall FormShow(TObject *Sender);
void __fastcall ButtonPrintClick(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
void __fastcall N2Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormProdano(TComponent* Owner);
};
//---------------------------------------------------------------------------
104
extern PACKAGE TFormProdano *FormProdano;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef ProdazhaH
#define ProdazhaH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormProdazha : public TForm
{
__published: // IDE-managed Components
TLabel *Label1;
TDateTimePicker *DateTimePickerDataProdazhi;
TGroupBox *GroupBox1;
TDBGrid *DBGridComputerTehnika;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TAutoIncField *ADODataSetComputerTehnikaCod;
TWideStringField *ADODataSetComputerTehnikaName;
TBCDField *ADODataSetComputerTehnikaCena;
105
TBooleanField *ADODataSetComputerTehnikaProdan;
TDateTimeField *ADODataSetComputerTehnikaDataPostup;
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TButton *ButtonProdat;
TGroupBox *GroupBoxOpisanie;
TDBMemo *DBMemoOpisanie;
TDBImage *DBImageFoto;
TButton *ButtonExit;
TADODataSet *ADODataSetHistory;
TDataSource *DataSourceHistory;
TAutoIncField *ADODataSetHistoryCod;
TIntegerField *ADODataSetHistoryCodComputerTehnika;
TIntegerField *ADODataSetHistoryCodManager;
TDateTimeField *ADODataSetHistoryDataProdazhi;
TBCDField *ADODataSetHistoryCena;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
TMenuItem *N2;
void __fastcall FormShow(TObject *Sender);
void __fastcall DBGridComputerTehnikaCellClick(TColumn *Column);
void __fastcall ButtonProdatClick(TObject *Sender);
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
void __fastcall N2Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormProdazha(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormProdazha *FormProdazha;
Источник: https://baza.diplomsite.ru/previewfile/2169