123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687 |
- //---------------------------------------------------------------------------
- #ifndef FrmInitializeFH
- #define FrmInitializeFH
- //---------------------------------------------------------------------------
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <DB.hpp>
- #include <DBClient.hpp>
- #include <FMTBcd.hpp>
- #include <Provider.hpp>
- #include <SqlExpr.hpp>
- #include <Menus.hpp>
- #include <ExtCtrls.hpp>
- #include <Graphics.hpp>
- #include <ComCtrls.hpp>
- #include <ADODB.hpp>
- #include "cxContainer.hpp"
- #include "cxControls.hpp"
- #include "cxEdit.hpp"
- #include "cxGraphics.hpp"
- #include "cxLabel.hpp"
- #include "cxLookAndFeelPainters.hpp"
- #include "cxLookAndFeels.hpp"
- #include "cxProgressBar.hpp"
- #include "dxSkinBlack.hpp"
- #include "dxSkinBlue.hpp"
- #include "dxSkinsCore.hpp"
- #include "IdAntiFreeze.hpp"
- #include "IdAntiFreezeBase.hpp"
- #include "IdBaseComponent.hpp"
- #include "IdComponent.hpp"
- #include "IdExplicitTLSClientServerBase.hpp"
- #include "IdFTP.hpp"
- #include "IdTCPClient.hpp"
- #include "IdTCPConnection.hpp"
- #include "dxSkinMcSkin.hpp"
- //---------------------------------------------------------------------------
- class TFrmInitialize : public TForm
- {
- __published: // IDE-managed Components
- TTimer *TmrShow;
- TShape *ShpTitle;
- TcxProgressBar *cxProgressBar1;
- TcxLabel *LblStatus;
- TcxLabel *cxLabel1;
- TcxLabel *cxLabel2;
- TcxLabel *cxLabel3;
- TcxLabel *cxLabel4;
- TcxLabel *cxLabel5;
- TcxLabel *cxLabel6;
- TcxLabel *cxLabel7;
- TcxLabel *cxLabel8;
- TcxLabel *cxLabel9;
- TcxLabel *cxLabel10;
- TcxLabel *cxLabel11;
- TcxLabel *cxLabel12;
- TcxLabel *cxLabel13;
- TcxLabel *cxLabel14;
- TcxLabel *cxLabel15;
- TIdFTP *IdFtp;
- void __fastcall FormShow(TObject *Sender);
- void __fastcall TmrShowTimer(TObject *Sender);
- void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
- private: // User declarations
- public:
- DWORD FThreadId;
- String FTitle;
- bool __fastcall VmsFtpConnect();
- bool __fastcall VmsFtpFileDownload(String AOrgFile, String ADstFile);
- void __fastcall VmsFtpDisconnect();
- bool __fastcall DownloadVmsVideoFiles();
- bool __fastcall IsVmsFileExist(String fileName, int fileSize);
- public: // User declarations
- __fastcall TFrmInitialize(TComponent* Owner);
- };
- //---------------------------------------------------------------------------
- //extern PACKAGE TFrmInitialize *FrmInitialize;
- //---------------------------------------------------------------------------
- #endif
|