companyinf.h

速达开源ERP系统

//---------------------------------------------------------------------------

#ifndef CompanyInfH
#define CompanyInfH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "ListBaseForm.h"
#include <ComCtrls.hpp>
#include "DateEdit.hpp"
#include "SDComboBox.h"
#include "SDEdit.h"
#include <Buttons.hpp>
#include <Mask.hpp>
//---------------------------------------------------------------------------
class  PACKAGE TfrmCompanyInf;
class TfrmCompanyInf : public TListBaseForm
{
__published:	// IDE-managed Components
        TGroupBox *GroupBox1;
        TGroupBox *GroupBox2;
        TBitBtn *btOk;
        TBitBtn *btCacel;
        TLabel *CompanyCode;
        TSDEdit *seCompanyCode;
        TLabel *Label1;
        TSDEdit *seCompanyName;
        TLabel *Label2;
        TSDEdit *seCompanyFullName;
        TLabel *Label3;
        TSDEdit *seCompanyAddr1;
        TLabel *Label4;
        TSDEdit *seCompanyAddr2;
        TLabel *Label5;
        TSDEdit *seCompanyTel;
        TLabel *Label6;
        TSDEdit *seCompanyFax;
        TLabel *Label7;
        TSDEdit *seCompanyEmail;
        TLabel *Label8;
        TSDEdit *seCompanyHomepage;
        TLabel *Label13;
        TSDComboBox *scCompanyLanguage;
        TLabel *Label14;
        TSDEdit *seCompanyBackupPath;
        TSDEdit *seCompanyLegalPerson;
        TLabel *Label15;
        TLabel *Label16;
        TSDEdit *seCompanyTaxNo;
        TLabel *Label17;
        TSDEdit *seCompanyBankNo;
        TLabel *Label18;
        TSDComboBox *scCompanyCurrency;
        TLabel *Label19;
        TSDEdit *seCompanyFmonth;
        TLabel *Label10;
        TLabel *Label11;
        TSDEdit *seCompanyNewCode;
        TLabel *Label12;
        TSDEdit *seCompanyOldCode;
        TLabel *Label9;
        TSDEdit *sdCompanyEdate;
        TSDEdit *sdCompanySdate;
        TCheckBox *chkCompanyCancel;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall btCacelClick(TObject *Sender);
        void __fastcall btOkClick(TObject *Sender);
  void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
      TComResultSet *pCpInfSet;
      virtual void __fastcall InitEditControl();
      void __fastcall GetDataFromComObject(int Section);
      void __fastcall SendDataToComObject(int Section);
      void __fastcall WaitUserInput(int Section);
      void __fastcall DisplayBill();
      void __fastcall GetBill(AnsiString BillID);
      void __fastcall ChangeToBrowseState(bool Browse);
      void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
public:		// User declarations
        __fastcall TfrmCompanyInf(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmCompanyInf *frmCompanyInf;
//---------------------------------------------------------------------------
#endif