purchinf.h

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

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

#ifndef PurchInfH
#define PurchInfH
//---------------------------------------------------------------------------
#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 "fpanel.h"
#include "SDComboBox.h"
#include "DateEdit.hpp"
#include <Mask.hpp>
#include <Menus.hpp>
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
class TfrmPurchInf : public TListBaseForm
{
__published:	// IDE-managed Components
        TGroupBox *GroupBox1;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label5;
        TLabel *Label6;
        TLabel *Label7;
        TLabel *Label8;
        TLabel *Label9;
        TLabel *Label10;
        TPageControl *PageControl1;
        TTabSheet *TabGoodBase;
        TTabSheet *TabTshbase;
    TSDEdit *SupplyCode;
    TSDEdit *SupplyLegel;
    TSDEdit *SupplyTel;
    TSDEdit *SupplyFax;
    TSDEdit *SupplyName;
    TSDEdit *SupplyLink;
    TSDEdit *SupplyAdrr;
    TSDEdit *SupplyCur;
        TTabSheet *TabBatch;
        TTabSheet *TabDoh;
        TTabSheet *TabSee;
    TLabel *Label11;
    TTabSheet *TabSheet1;
    TTabSheet *TabSheet2;
    TSDGrid *sgSupply;
    TSDGrid *sgGoods;
    TSDGrid *sgRpod;
    TSDGrid *sgPod;
    TTabSheet *TabSheet3;
    TSDGrid *sgUld;
    TSDGrid *sgPrecd;
    TSDGrid *sgZtd;
    TSDGrid *sgPretd;
    TTabSheet *TabSheet5;
    TFloatPanel *FloatPanel1;
    TLabel *Label4;
    TLabel *Label12;
    TLabel *Label13;
    TLabel *Label14;
    TSDEdit *seSupplyCode;
    TSDEdit *seSupplyName;
    TSDEdit *seSupplyDesc;
    TSDComboBox *scSupplyType;
    TCheckBox *chkSupplyCancel;
    TGroupBox *GroupBox2;
    TLabel *Label15;
    TLabel *Label16;
    TLabel *Label17;
    TLabel *Label18;
    TLabel *Label19;
    TLabel *Label20;
    TLabel *Label21;
    TSDEdit *seSupplyLegalMan;
    TSDEdit *seSupplyLinkMan;
    TSDEdit *seSupplyAddr;
    TSDEdit *seSupplyZip;
    TSDEdit *seSupplyTel;
    TSDEdit *seSupplyFax;
    TSDEdit *seSupplyEmail;
    TLabel *Label22;
    TLabel *Label23;
    TLabel *Label24;
    TLabel *Label25;
    TLabel *Label26;
    TLabel *Label27;
    TLabel *Label28;
    TLabel *Label29;
    TLabel *Label30;
    TLabel *Label31;
    TSDComboBox *scSupplyTaxCode;
    TSDEdit *seSupplyTaxNo;
    TSDComboBox *scSupplyPmode;
    TSDComboBox *scSupplyBuyer;
    TSDEdit *seSupplyFreq;
    TSDEdit *seSupplyLpAmt;
    TDateEdit *deSupplyLpDate;
    TSDEdit *seSupplyLtAmt;
    TDateEdit *deSupplyLtDate;
    TSDEdit *seSupplyApAmt;
    TLabel *Label32;
    TLabel *Label33;
    TLabel *Label34;
    TLabel *Label35;
    TLabel *Label36;
    TLabel *Label37;
    TSDEdit *seSupplyArea;
    TSDComboBox *scSupplyTrade;
    TSDComboBox *scSupplyCredit;
    TSDEdit *seSupplyCreditTerm;
    TDateEdit *deSupplyCreateDate;
    TDateEdit *deSupplyCancelDate;
    TDateTimePicker *DTPBegin;
    TDateTimePicker *DTPEnd;
    TPopupMenu *PopMenuSave;
    TMenuItem *N1;
    TSaveDialog *SaveDialog;
    void __fastcall PageControl1Change(TObject *Sender);
    void __fastcall sgSupplyClick(TObject *Sender);
private:	// User declarations
        void __fastcall InitEditControl();
        AnsiString  __fastcall GetGoodsbaseSQL();
        void __fastcall AddGoodsGrid();
        void __fastcall FillGridWithData();
        AnsiString __fastcall GetSqlString();


public:		// User declarations
        __fastcall TfrmPurchInf(TComponent* Owner, HWND chWnd, AnsiString MidCode,AnsiString WhereStr);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmPurchInf *frmPurchInf;
//---------------------------------------------------------------------------
#endif