⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit1.h

📁 学校和学生家长用短信及时沟通学生在校情况或及时把有关通知、重要信息发布给学生家长。
💻 H
字号:
//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <Grids.hpp>
#include <Buttons.hpp>
#include <Menus.hpp>
#include <Dialogs.hpp>
#include "Comm.h"
#include <ExtCtrls.hpp>
#include <ImgList.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
   TStatusBar *StatusBar1;
   TPopupMenu *PopupMenu1;
   TPopupMenu *PopupMenu2;
   TMenuItem *mNameDel;
   TMenuItem *mCodeIns;
   TMenuItem *mCodeDel;
   TOpenDialog *OpenDialog;
   TSaveDialog *SaveDialog;
   TComm *Comm1;
   TPageControl *PageControl;
   TTabSheet *TabSheet1;
   TTabSheet *TabSheet2;
   TGroupBox *GroupBox4;
   TLabel *Label5;
   TLabel *Label6;
   TEdit *edSmsc;
   TComboBox *cbPort;
   TGroupBox *GroupBox5;
   TStringGrid *sgClassName;
   TGroupBox *GroupBox6;
   TStringGrid *sgEdPhoncode;
   TTabSheet *TabSheet3;
   TGroupBox *GroupBox2;
   TLabel *Label4;
   TListBox *lsRecv;
   TGroupBox *GroupBox1;
   TLabel *Label7;
   TStringGrid *sgMpBook;
   TComboBox *cbClassName;
   TGroupBox *GroupBox3;
   TSpeedButton *sbSendSms;
   TLabel *Label1;
   TMemo *mmSmsTxt;
   TComboBox *cbSmsTxt;
   TGroupBox *GroupBox7;
   TStringGrid *sgEdSmTxt;
   TMenuItem *mNameIns;
   TPopupMenu *PopupMenu3;
   TMenuItem *mEdSmIns;
   TMenuItem *mEdSmDel;
   TComboBox *cbLang;
   TComboBox *cbMval;
   TLabel *Label2;
   TLabel *Label3;
   TSpeedButton *sbRegist;
   TLabel *Label8;
   TSpeedButton *sbConnectOn;
   TSpeedButton *sbConnectOff;
   TImageList *ImageList1;
   TPopupMenu *PopupMenu4;
   TPopupMenu *PopupMenu5;
   TMenuItem *mCleanAll;
   TMenuItem *mSelectAll;
   TTabSheet *TabSheet4;
   TGroupBox *GroupBox8;
   TMemo *mmSmsRec;
   TEdit *edSmsRec;
   TSpeedButton *sbOpen;
   TStaticText *StaticText1;
   void __fastcall FormCreate(TObject *Sender);
   void __fastcall sbConnectOnClick(TObject *Sender);
   void __fastcall sbConnectOffClick(TObject *Sender);
   void __fastcall sbSendSmsClick(TObject *Sender);
   void __fastcall mNameDelClick(TObject *Sender);
   void __fastcall mCLearClick(TObject *Sender);
   void __fastcall mCodeInsClick(TObject *Sender);
   void __fastcall mCodeDelClick(TObject *Sender);
   void __fastcall lsRecvDblClick(TObject *Sender);
   void __fastcall mEditClick(TObject *Sender);
   void __fastcall sgMpBookDblClick(TObject *Sender);
   void __fastcall FormDestroy(TObject *Sender);
   bool __fastcall ConnectMP();
   void __fastcall CommOpen();
   bool __fastcall Check();
   void __fastcall SendByte(Byte dt);
   bool __fastcall SendSms(char  *SmsTxt,char *SendCode);
   String __fastcall Encode(String sAnsi);//英文编码
   String __fastcall AnsiToUnicode(String sAnsi);//中文编码
   String __fastcall RevNum(String numb);
   void __fastcall AddCombo();
   bool __fastcall GetCgsn();
   void __fastcall Comm1ReceiveData(TObject *Sender);
   void __fastcall mNameInsClick(TObject *Sender);
   void __fastcall mEdSmInsClick(TObject *Sender);
   void __fastcall mEdSmDelClick(TObject *Sender);
   void __fastcall sgEdPhoncodeDblClick(TObject *Sender);
   void __fastcall sgClassNameClick(TObject *Sender);
   void __fastcall PageControlChange(TObject *Sender);
   void __fastcall cbSmsTxtChange(TObject *Sender);
   void __fastcall cbClassNameChange(TObject *Sender);
   void __fastcall sbRegistClick(TObject *Sender);
   void __fastcall mCleanAllClick(TObject *Sender);
   void __fastcall mSelectAllClick(TObject *Sender);
   void __fastcall sbOpenClick(TObject *Sender);
private:	// User declarations
public:		// User declarations
   __fastcall TForm1(TComponent* Owner);
   String CurDir,msg,SmsRcv;
   String NameCode[100][100][3];
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

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