tndemo1.h

来自「文件名称:新曦 我的资源 搜索软件 源程序(Borland Delphi 7)说」· C头文件 代码 · 共 42 行

H
42
字号
//---------------------------------------------------------------------------
#ifndef TnDemo1H
#define TnDemo1H
//---------------------------------------------------------------------------
#include <vcl\Classes.hpp>
#include <vcl\Controls.hpp>
#include <vcl\StdCtrls.hpp>
#include <vcl\Forms.hpp>
#include <vcl\ExtCtrls.hpp>
#include "TnCnx.hpp"
//---------------------------------------------------------------------------
class TTnDemoForm : public TForm
{
__published:	// IDE-managed Components
    TMemo *DisplayMemo;
    TPanel *Panel1;
    TLabel *HostLabel;
    TLabel *InfoLabel;
    TLabel *PortLabel;
    TEdit *HostEdit;
    TButton *ConnectButton;
    TButton *DisconnectButton;
    TEdit *PortEdit;
    TTnCnx *TnCnx;
    void __fastcall ConnectButtonClick(TObject *Sender);
    void __fastcall DisconnectButtonClick(TObject *Sender);
    
    void __fastcall TnCnxSessionConnected(TTnCnx *Sender, WORD Error);
    void __fastcall TnCnxSessionClosed(TTnCnx *Sender, WORD Error);
    void __fastcall TnCnxDataAvailable(TTnCnx *Sender, PChar Buffer, int Len);
    void __fastcall DisplayMemoKeyDown(TObject *Sender, WORD &Key,
    TShiftState Shift);
    void __fastcall DisplayMemoKeyPress(TObject *Sender, char &Key);
private:	// User declarations
public:		// User declarations
    __fastcall TTnDemoForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern TTnDemoForm *TnDemoForm;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

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