smgpfrm.~h

小灵通短信通讯软件

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

#ifndef SmgpFrmH
#define SmgpFrmH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include <ScktComp.hpp>
#include <AppEvnts.hpp>
//---------------------------------------------------------------------------
class TMainFrm : public TForm
{
__published:	// IDE-managed Components
        TMainMenu *MainMenu1;
        TMenuItem *N1;
        TMenuItem *mm_Spas;
        TMenuItem *mm_ModulesList;
        TMenuItem *mm_SpasCount;
        TMenuItem *mm_Tools;
        TMenuItem *mm_Help;
        TMenuItem *mm_InitInterface;
        TMenuItem *mm_Connect;
        TMenuItem *mm_Exit;
        TMenuItem *mm_FunctTest;
        TMenuItem *N11;
        TMenuItem *mm_Close;
        TToolBar *ToolBar1;
        TImageList *ImageList1;
        TStatusBar *StatusBar1;
        TToolButton *btn_InitInterface;
        TToolButton *btn_Connect;
        TToolButton *btn_Exit;
        TToolButton *btn_startspas;
        TToolButton *btn_CloseSpas;
        TToolButton *btn_AddModules;
        TSplitter *Splitter1;
        TRichEdit *mmlog;
        TListView *ListView1;
        TServerSocket *SMCServer;
        TClientSocket *SmgpClient;
        TTimer *SmgpNetAct;
        TSplitter *Splitter2;
        TSplitter *Splitter3;
        TSplitter *Splitter4;
        TSplitter *Splitter5;
        TSplitter *Splitter6;
        TSplitter *Splitter7;
        TToolButton *btn_FunctTest;
        TSplitter *Splitter8;
        TApplicationEvents *ApplicationEvents1;
        void __fastcall SmgpClientRead(TObject *Sender,
          TCustomWinSocket *Socket);
        void __fastcall SmgpNetActTimer(TObject *Sender);
        void __fastcall btn_InitInterfaceClick(TObject *Sender);
        void __fastcall btn_ConnectClick(TObject *Sender);
        void __fastcall btn_ExitClick(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall ApplicationEvents1Exception(TObject *Sender,
          Exception *E);
private:	// User declarations
//----------------------System------------------------------------------------
        void __fastcall Log(int type,AnsiString LogContent);
        void __fastcall SaveLog();
//----------------------Smgp--------------------------------------------------
        AnsiString __fastcall  Convert2AsII(const char *buffer, int len);
        void __fastcall UnicodeToGB2312(char *in, int length);
        void __fastcall GetDeliverMessage(AnsiString DestAddr,AnsiString OrgAddr,unsigned int IsReport,
        unsigned int Msg_Length,AnsiString UserData,AnsiString MO_DateTime);
public:		// User declarations
        __fastcall TMainFrm(TComponent* Owner);
        bool OnLine;
        AnsiString Smgp_Address,Smgp_UserName,Smgp_PassWord;
        int Smgp_Port,Smgp_LoginMode;
        bool __fastcall SubmitA(AnsiString Spno,AnsiString OrgAddr,AnsiString DestAddr,
        AnsiString Order,unsigned char SubType,AnsiString FeeType,AnsiString FeeCode,
        unsigned int DCS,unsigned int UDLen,LPCTSTR UserData);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainFrm *MainFrm;
//---------------------------------------------------------------------------
#endif