📄 fadn.h
字号:
//---------------------------------------------------------------------------
#ifndef FadnH
#define FadnH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "RecBaseForm.h"
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include <Grids.hpp>
#include "DateEdit.hpp"
#include <Mask.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class PACKAGE TfrmFadn;
class TfrmFadn : public TRecBaseForm
{
__published: // IDE-managed Components
TSDGrid *sgFadn;
TPageControl *tpFadn;
TTabSheet *TabSheet1;
TFloatPanel *FloatPanel2;
TLabel *Label10;
TLabel *Label11;
TLabel *Label13;
TLabel *Label4;
TSDEdit *seFadnName;
TMemo *memFadnDesc;
TTabSheet *TabSheet2;
TFloatPanel *FloatPanel1;
TLabel *Label6;
TLabel *Label7;
TLabel *Label9;
TLabel *Label12;
TTabSheet *TabSheet3;
TLabel *Label14;
TSDEdit *seFadnAddr;
TLabel *Label3;
TSDEdit *seFadnFactory;
TLabel *Label22;
TTabSheet *TabSheet4;
TFloatPanel *FloatPanel3;
TLabel *Label18;
TFloatPanel *FloatPanel4;
TLabel *Label45;
TLabel *Label46;
TLabel *Label47;
TLabel *Label48;
TLabel *Label50;
TLabel *Label51;
TLabel *Label53;
TSDEdit *seFadnOVal;
TSDEdit *seFadnWbOVal;
TSDEdit *seFadnEVal;
TSDEdit *seFadnPVal;
TLabel *Label17;
TSDComboBox *scFadnFaUse;
TSDEdit *seFadnDVal;
TSDEdit *seFadnCVal;
TSDEdit *seFadnBVal;
TGroupBox *GroupBox4;
TLabel *Label37;
TLabel *Label38;
TLabel *Label20;
TLabel *Label40;
TLabel *Label43;
TLabel *Label44;
TLabel *Label21;
TLabel *Label39;
TLabel *Label36;
TLabel *Label35;
TLabel *Label42;
TLabel *Label41;
TGroupBox *GroupBox2;
TRadioButton *raFadnYzDir0;
TRadioButton *raFadnYzDir1;
TGroupBox *GroupBox5;
TRadioButton *raFadnQoDir0;
TRadioButton *raFadnQoDir1;
TGroupBox *GroupBox6;
TRadioButton *raFadnZjDir0;
TRadioButton *raFadnZjDir1;
TGroupBox *GroupBox7;
TRadioButton *raFadnCzDir0;
TRadioButton *raFadnCzDir1;
TGroupBox *GroupBox8;
TRadioButton *raFadnQiDir0;
TRadioButton *raFadnQiDir1;
TGroupBox *GroupBox9;
TRadioButton *raFadnZlDir0;
TRadioButton *raFadnZlDir1;
TSDEdit *seFadnYzGlkm;
TSDEdit *seFadnZlGlkm;
TSDEdit *seFadnZjGlkm;
TSDEdit *seFadnQoGlkm;
TSDEdit *seFadnCzGlkm;
TSDEdit *seFadnQiGlkm;
TDateEdit *sdFadnDate;
TSDComboBox *scFadnFvct;
TLabel *Label24;
TSDComboBox *scFadnFadm;
TSDEdit *seFadnCode;
TSDComboBox *scFadnEuse;
TLabel *Label27;
TDateEdit *sdFadnUDate;
TGroupBox *GroupBox3;
TCheckBox *chkFadnDiscard;
TCheckBox *chkFadnStop;
TCheckBox *chkFadnRent;
TCheckBox *chkFadnFc;
TCheckBox *chkFadnDec;
TCheckBox *chkFadnFix;
TCheckBox *chkFadnAe;
TPanel *sbadFaAe;
TLabel *Label15;
TLabel *Label19;
TSDEdit *seFadnERate;
TLabel *Label26;
TSDComboBox *scFadnFmonth;
TGroupBox *GroupBox10;
TLabel *Label59;
TSDEdit *seFadnPeriod;
TLabel *Label56;
TSDEdit *seFadnAPeriod;
TLabel *Label61;
TSDEdit *seFadnBPeriod;
TLabel *Label2;
TSDComboBox *scFadnDecType;
TLabel *Label23;
TSDComboBox *scFadnFav;
TSDEdit *seFadnArea;
TSDEdit *seFadnCurrency;
TLabel *Label25;
TSDComboBox *scFadnAddType;
TPanel *PW;
TLabel *Label49;
TLabel *Label55;
TLabel *Label54;
TSDEdit *seFadnTWork;
TSDEdit *seFadnAWork;
TSDEdit *seFadnBWork;
TLabel *Label16;
TSDComboBox *scFadnUnit;
TLabel *Label8;
TDateEdit *sdFadnOfDate;
TLabel *Label1;
TSDEdit *seFadnModel;
TSDEdit *seFadnSupply;
TSDEdit *seFadnDept;
TSDEdit *seFadnFat;
void __fastcall FormShow(TObject *Sender);
void __fastcall chkFadnAeMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y);
void __fastcall seFadnYzGlkmButtonClick(TObject *Sender);
void __fastcall seFadnZlGlkmButtonClick(TObject *Sender);
void __fastcall seFadnZjGlkmButtonClick(TObject *Sender);
void __fastcall seFadnQoGlkmButtonClick(TObject *Sender);
void __fastcall seFadnCzGlkmButtonClick(TObject *Sender);
void __fastcall seFadnQiGlkmButtonClick(TObject *Sender);
void __fastcall muEditDetailClick(TObject *Sender);
void __fastcall seFadnCodeKeyDown(TObject *Sender, WORD &Key,
TShiftState Shift);
void __fastcall sbadFaAeClick(TObject *Sender);
void __fastcall scFadnFadmClick(TObject *Sender);
void __fastcall sgFadnClick(TObject *Sender);
void __fastcall seFadnCurrencyButtonClick(TObject *Sender);
void __fastcall seFadnWbOValExit(TObject *Sender);
void __fastcall seFadnSupplyButtonClick(TObject *Sender);
void __fastcall seFadnDeptButtonClick(TObject *Sender);
void __fastcall seFadnFatButtonClick(TObject *Sender);
void __fastcall muAddDetailClick(TObject *Sender);
private: // User declarations
AnsiString LastFadnCode;
void __fastcall InitEditControl();
AnsiString __fastcall GetFieldValue(int FieldIndex);
void __fastcall ClearControl(bool BringToNext);
void __fastcall GetDataFromComObject();
void __fastcall SendDataToComObject();
void __fastcall WaitUserInput();
AnsiString __fastcall GetDataToGrid();
void __fastcall RefreshGridData(int mAction);
void __fastcall TreeViewLocation();
void __fastcall FillGridWithData();
void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
void __fastcall SetSomeVclState(bool Fag);
public: // User declarations
__fastcall TfrmFadn(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmFadn *frmFadn;
//---------------------------------------------------------------------------
#endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -