salesinfocenter.h

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C头文件 代码 · 共 165 行

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

#ifndef ClientInfoCenterH
#define ClientInfoCenterH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "ListBaseForm.h"
#include <ComCtrls.hpp>
#include "SDEdit.h"
#include "SDGrid.h"
#include <Grids.hpp>
#include "DateEdit.hpp"
#include "fpanel.h"
#include "SDComboBox.h"
#include <ExtCtrls.hpp>
#include <Mask.hpp>
//---------------------------------------------------------------------------
class TfrmClientInfoCenter : public TListBaseForm
{
__published:	// IDE-managed Components
	TPageControl *PageControl;
	TTabSheet *TabClientBase;
	TSDGrid *sgClientGrid;
	TSDGrid *sgSohGrid;
	TSDGrid *sgHistoryGrid;
	TTabSheet *TabSoh;
	TTabSheet *TabHistory;
	TTabSheet *TabSee;
	TTabSheet *TabSogh;
	TSDGrid *sgSoghGrid;
	TPanel *Panel_Client;
	TFloatPanel *FloatPanel1;
	TLabel *Label11;
	TLabel *Label12;
	TLabel *Label13;
	TLabel *Label14;
	TLabel *Label28;
	TLabel *deClientSysDate;
	TSDEdit *fpseClientCode;
	TSDEdit *fpseClientName;
	TSDEdit *seClientDesc;
	TSDComboBox *scClientType;
	TCheckBox *chkClientCancel;
	TGroupBox *GroupBox2;
	TLabel *Label15;
	TLabel *Label16;
	TLabel *Label17;
	TLabel *Label18;
	TLabel *Label19;
	TLabel *Label20;
	TLabel *Label21;
	TSDEdit *seClientLegalMan;
	TSDEdit *seClientLinkMan;
	TSDEdit *seClientAddr;
	TSDEdit *seClientZip;
	TSDEdit *seClientTel;
	TSDEdit *seClientFax;
	TSDEdit *seClientEmail;
	TFloatPanel *FloatPanel2;
	TGroupBox *GroupBox3;
	TLabel *Label22;
	TLabel *Label23;
	TLabel *Label24;
	TLabel *Label25;
	TLabel *Label26;
	TLabel *Label27;
	TLabel *Label29;
	TLabel *Label30;
	TLabel *Label31;
	TLabel *lbClientCancelDate;
	TSDComboBox *scClientTradeCode;
	TSDComboBox *scClientSmodeCode;
	TSDComboBox *cbClientCreditCode;
	TDateEdit *deClientCreateDate;
	TSDEdit *seClientArAmt;
	TSDEdit *seClientCreditTerm;
	TSDComboBox *scClientSpt;
	TSDComboBox *scClientSalerCode;
	TGroupBox *GroupBox4;
	TLabel *Label32;
	TLabel *Label33;
	TLabel *Label34;
	TSDComboBox *scClientTaxCode;
	TSDEdit *seClientTaxNo;
	TSDEdit *seClientCurrency;
	TFloatPanel *FloatPanel3;
	TLabel *Label35;
	TLabel *deClientLtDate;
	TLabel *lbClientLtAmt;
	TLabel *Label36;
	TLabel *Label37;
	TLabel *Label38;
	TLabel *lbClientLrAmt;
	TLabel *deClientLrDate;
	TLabel *Label39;
	TLabel *lbClientLmDays;
	TLabel *Label40;
	TLabel *lbClientFreq;
	TLabel *lbClientAreaCode;
	TLabel *Label41;
	TLabel *Label42;
	TLabel *lbClientArAmt;
	TShape *Shape1;
	TShape *Shape2;
	TShape *Shape3;
	TGroupBox *GroupBox1;
	TLabel *Label1;
	TLabel *Label2;
	TLabel *Label5;
	TLabel *Label6;
	TLabel *Label8;
	TLabel *Label10;
	TLabel *Label3;
	TLabel *Label4;
	TSDEdit *seClientCode;
	TSDEdit *seClientName;
	TSDEdit *seClientType;
	TSDEdit *seMainCurrency;
	TSDEdit *seClientSmode;
	TSDEdit *seMaccFopQty;
	TDateEdit *deEBillDate;
	TDateEdit *deSBillDate;
	void __fastcall FormShow(TObject *Sender);
	void __fastcall sgClientGridClick(TObject *Sender);
	void __fastcall TabSohEnter(TObject *Sender);
	void __fastcall TabSoghEnter(TObject *Sender);
	void __fastcall TabHistoryEnter(TObject *Sender);
	void __fastcall TabSeeEnter(TObject *Sender);
	void __fastcall deEBillDateChange(TObject *Sender);
	void __fastcall deSBillDateChange(TObject *Sender);
	void __fastcall seClientCodeExit(TObject *Sender);
	void __fastcall TabClientBaseEnter(TObject *Sender);
	void __fastcall sgSohGridClick(TObject *Sender);
private:	// User declarations
	void __fastcall InitEditControl();

	void __fastcall FillGridSoghDate();
	void __fastcall FillGridSohDate();
	void __fastcall FillGridClientData();
	void __fastcall FillGridHistoryData();

	void __fastcall AddClientGrid();


	void __fastcall FillEditText(int row);
	void __fastcall sgGoodsGridClick(TObject *Sender);
	inline AnsiString __fastcall  IsState(AnsiString mstate ,const bool ty);

public:		// User declarations
	 __fastcall TfrmClientInfoCenter(
			      TComponent* Owner,
			      HWND chWnd,
			      AnsiString MidCode,
			      AnsiString WhereStr);


};
//---------------------------------------------------------------------------
extern PACKAGE TfrmClientInfoCenter *frmClientInfoCenter;
//---------------------------------------------------------------------------
#endif