pivoh.h

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

H
175
字号
//---------------------------------------------------------------------------
#ifndef PivohH
#define PivohH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "BillBaseForm.h"
#include "fpanel.h"
#include "SDGrid.h"
#include <ComCtrls.hpp>
#include <Grids.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "DateEdit.hpp"
#include "SDComboBox.h"
#include "SDEdit.h"
#include <Mask.hpp>
#include <Buttons.hpp>
#include <Dialogs.hpp>

//---------------------------------------------------------------------------
class PACKAGE TfrmPivoh ;
class TfrmPivoh : public TBillBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *FloatPanel3;
        TLabel *Label17;
        TLabel *Label24;
        TLabel *labUserCode;
        TLabel *labChecker;
        TFloatPanel *FloatPanel1;
        TLabel *Label1;
        TLabel *Label19;
        TSDGrid *sgPivoh;
        TFloatPanel *FloatPanel2;
        TLabel *Label14;
        TLabel *Label26;
        TLabel *Label27;
        TLabel *Label29;
        TLabel *Label32;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TLabel *Label41;
        TLabel *Label42;
        TSDEdit *sePivodLine;
        TLabel *Label44;
        TSDEdit *sePivodGoodsName;
        TLabel *Label45;
        TSDEdit *sePivodUnit;
        TLabel *Label46;
        TSDEdit *sePivodQty;
        TLabel *Label47;
        TSDEdit *sePivodTaxPrice;
        TLabel *Label40;
        TSDEdit *sePivodAmt;
        TLabel *Label15;
        TLabel *Label16;
        TLabel *Label8;
        TLabel *Label21;
        TSDEdit *sePivohTel;
        TLabel *Label4;
        TLabel *Label10;
        TLabel *Label11;
        TLabel *Label5;
        TLabel *Label49;
        TSDComboBox *scPivohCurrency;
        TSDEdit *sePivohEnrate;
        TSDComboBox *scPivohSettleMode;
        TSDComboBox *scPivohBuyer;
        TLabel *Label2;
        TLabel *Label9;
        TLabel *Label3;
        TLabel *Label23;
        TLabel *Label6;
        TLabel *Label7;
        TLabel *Label13;
        TLabel *Label43;
        TLabel *Label18;
        TSDEdit *sePivohAddr;
        TSDEdit *sePivohContract;
        TDateEdit *dePivohDate;
        TSDComboBox *scPivohFmonth;
        TSDEdit *sePivohCode;
        TLabel *labSystemDate;
        TSDComboBox *scPivohType;
        TSDComboBox *scPivohTaxCode;
        TSDEdit *sePivohTaxRate;
        TDateEdit *dePivohApDate;
        TSDEdit *sePivohTaxNo;
        TSDComboBox *scPivohDept;
        TSDComboBox *scPivohCacCode;
        TCheckBox *chkPivohRed;
        TMemo *memPivohDesc;
        TMemo *memPivodDesc;
        TSDEdit *sePivodTaxAmt;
        TSDEdit *sePivodPrice;
        TSDEdit *sePivodSumAmt;
        TSDEdit *sePivodZkAmt;
        TCheckBox *chkPivohCheck;
        TCheckBox *chkPivohCancel;
        TLabel *Label28;
        TSDComboBox *scPivodPodLine;
        TLabel *Label30;
        TFloatPanel *fpsum;
        TLabel *Label20;
        TSDEdit *sePivohAmt;
        TLabel *Label22;
        TSDEdit *sePivohTaxAmt;
        TLabel *Label12;
        TSDEdit *sePivohSumAmt;
        TLabel *Label25;
        TSDEdit *sePivohZkAmt;
        TSDEdit *sePivodGoods;
        TSDEdit *sePivohSupply;
        TSDEdit *sePivohPoCode;
        TSDEdit *sePivohBankName;
        TSDEdit *sePivohBankNo;
        void __fastcall FormShow(TObject *Sender);
        void __fastcall sgPivohDblClick(TObject *Sender);
        void __fastcall sgPivohSelectCell(TObject *Sender, int ACol,
          int ARow, bool &CanSelect);
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnCancelClick(TObject *Sender);
        void __fastcall sePivodQtyExit(TObject *Sender);
        void __fastcall scPivohBuyerClick(TObject *Sender);
        void __fastcall sePivodGoodsButtonClick(TObject *Sender);
        void __fastcall scPivohCurrencyClick(TObject *Sender);
        void __fastcall sePivohCodeKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall scPivohTypeClick(TObject *Sender);
        void __fastcall scPivohTaxCodeExit(TObject *Sender);
        void __fastcall scPivohDeptExit(TObject *Sender);
        void __fastcall scPivodPodLineExit(TObject *Sender);
        void __fastcall sePivohSupplyButtonClick(TObject *Sender);
        void __fastcall sePivohPoCodeButtonClick(TObject *Sender);
        void __fastcall sePivohPoCodeExit(TObject *Sender);
        void __fastcall sePivohSupplyChange(TObject *Sender);
        void __fastcall sePivohBankNameButtonClick(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
        void __fastcall GetGoodsInfoByPod(AnsiString sPodCode,AnsiString sPodLine);
        AnsiString __fastcall GetDataToGrid();
        void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
        void __fastcall UnDoChange(){};

    bool __fastcall BeforeCheck();
    bool __fastcall BeforeUnCheck();
public:		// User declarations
        AnsiString FormIniFile;

        void __fastcall InitEditControl();
        void __fastcall ClearControl(int Section,bool BringToNext);
        void __fastcall GetDataFromComObject(int Section);
        void __fastcall SendDataToComObject(int Section);
        void __fastcall WaitUserInput(int Section);
        void __fastcall RefreshGridData(int mAction);
        void __fastcall DisplayBill();
        void __fastcall GetBill(AnsiString BillID);
        void __fastcall FillGridWithData();
        void __fastcall ChangeToBrowseState(bool Browse=true);
        int  __fastcall GetNewPivodLine();
        void __fastcall CalculateAmt(char mAction, int iRow);
        void __fastcall FillPodLine();
        void __fastcall AutoCalculate();

        __fastcall TfrmPivoh(TComponent* Owner, HWND chWnd, AnsiString MidCode,AnsiString WhereStr);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmPivoh *frmPivoh;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?