internet_c.h

BCB编写的使用SMTP、POP3和FTP的例子

//---------------------------------------------------------------------------
#ifndef Internet_cH
#define Internet_cH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TMailForm : public TForm
{
__published:	// IDE-managed Components
        TButton *Button1;
        TButton *Button2;
        TButton *Button3;
        TStatusBar *StatusBar1;
        TImage *Image1;
        TButton *Button4;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
        void __fastcall Button3Click(TObject *Sender);
        void __fastcall Image1DblClick(TObject *Sender);
        void __fastcall Button1MouseMove(TObject *Sender,
          TShiftState Shift, int X, int Y);
        void __fastcall Button2MouseMove(TObject *Sender,
          TShiftState Shift, int X, int Y);
        void __fastcall Button3MouseMove(TObject *Sender,
          TShiftState Shift, int X, int Y);
        void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
        void __fastcall Image1MouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
        void __fastcall Button4Click(TObject *Sender);
        void __fastcall Button4MouseMove(TObject *Sender,
          TShiftState Shift, int X, int Y);
        void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
private:	// User declarations
        void    UpdateStatus();
public:		// User declarations
        __fastcall TMailForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMailForm *MailForm;
//---------------------------------------------------------------------------
#endif