📄 terminal.hpp
字号:
// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved
// (DO NOT EDIT: machine generated header) 'Terminal.pas' rev: 10.00
#ifndef TerminalHPP
#define TerminalHPP
#pragma delphiheader begin
#pragma option push
#pragma option -w- // All warnings off
#pragma option -Vx // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp> // Pascal unit
#include <Sysinit.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <Messages.hpp> // Pascal unit
#include <Graphics.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Forms.hpp> // Pascal unit
#include <Stdctrls.hpp> // Pascal unit
#include <Sysutils.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <Syncobjs.hpp> // Pascal unit
#include <Connect.hpp> // Pascal unit
#include <Menus.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Terminal
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TTerminalThread;
class DELPHICLASS TTerminal;
class PASCALIMPLEMENTATION TTerminal : public Stdctrls::TCustomMemo
{
typedef Stdctrls::TCustomMemo inherited;
private:
int FTermXPos;
int FMaxLines;
TTerminalThread* FTermThread;
protected:
virtual void __fastcall LogTermChar(char C, Classes::TStrings* aLines);
void __fastcall CheckLines(Classes::TStrings* aLines);
public:
__fastcall virtual TTerminal(Classes::TComponent* aOwner);
__fastcall virtual ~TTerminal(void);
void __fastcall Log(const AnsiString S);
void __fastcall LogErr(const AnsiString S1, const AnsiString S2);
void __fastcall LogTerm(const AnsiString S);
__published:
__property int MaxLines = {read=FMaxLines, write=FMaxLines, nodefault};
__property Align = {default=0};
__property Alignment = {default=0};
__property Anchors = {default=3};
__property BorderStyle = {default=1};
__property Color = {default=-16777211};
__property Constraints ;
__property DragMode = {default=0};
__property Enabled = {default=1};
__property Font ;
__property Lines ;
__property MaxLength = {default=0};
__property ParentColor = {default=0};
__property ParentFont = {default=1};
__property ParentShowHint = {default=1};
__property PopupMenu ;
__property ScrollBars = {default=0};
__property ShowHint ;
__property TabOrder = {default=-1};
__property TabStop = {default=1};
__property Visible = {default=1};
__property WantReturns = {default=1};
__property WantTabs = {default=0};
__property OnChange ;
__property OnClick ;
__property OnContextPopup ;
__property OnDblClick ;
__property OnDragDrop ;
__property OnDragOver ;
__property OnEndDrag ;
__property OnEnter ;
__property OnExit ;
__property OnKeyDown ;
__property OnKeyPress ;
__property OnKeyUp ;
__property OnMouseDown ;
__property OnMouseMove ;
__property OnMouseUp ;
__property OnStartDrag ;
public:
#pragma option push -w-inl
/* TWinControl.CreateParented */ inline __fastcall TTerminal(HWND ParentWindow) : Stdctrls::TCustomMemo(ParentWindow) { }
#pragma option pop
};
class PASCALIMPLEMENTATION TTerminalThread : public Classes::TThread
{
typedef Classes::TThread inherited;
private:
TTerminal* FTerminal;
Classes::TStrings* FLogBuffer;
AnsiString FLogTermBuffer;
Syncobjs::TSimpleEvent* FEvent;
Syncobjs::TCriticalSection* FCriticalSection;
bool fInsertedFromLogBuffer;
protected:
virtual void __fastcall Execute(void);
HIDESBASE void __fastcall Terminate(void);
void __fastcall DoOnSignal(void);
public:
__fastcall TTerminalThread(TTerminal* aTerminal);
__fastcall virtual ~TTerminalThread(void);
};
//-- var, const, procedure ---------------------------------------------------
static const char CR = '\xd';
static const char LF = '\xa';
extern PACKAGE void __fastcall Register(void);
} /* namespace Terminal */
using namespace Terminal;
#pragma pack(pop)
#pragma option pop
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // Terminal
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -