logterm.hpp
来自「boomerang library 5.11 internet ed」· HPP 代码 · 共 68 行
HPP
68 行
// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved
// (DO NOT EDIT: machine generated header) 'Logterm.pas' rev: 10.00
#ifndef LogtermHPP
#define LogtermHPP
#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 <Classes.hpp> // Pascal unit
#include <Sysutils.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <Terminal.hpp> // Pascal unit
#include <Connect.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Logterm
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TFileTermLogger;
class PASCALIMPLEMENTATION TFileTermLogger : public Connect::TFileLogger
{
typedef Connect::TFileLogger inherited;
private:
Terminal::TTerminal* FTerminal;
bool FTermChar;
protected:
virtual void __fastcall OpenConn(void);
virtual void __fastcall DoLog(const AnsiString aText);
__published:
__property Terminal::TTerminal* Terminal = {read=FTerminal, write=FTerminal};
__property bool TermChar = {read=FTermChar, write=FTermChar, nodefault};
public:
#pragma option push -w-inl
/* TStreamLogger.Create */ inline __fastcall virtual TFileTermLogger(Classes::TComponent* aOwner) : Connect::TFileLogger(aOwner) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TLogger.Destroy */ inline __fastcall virtual ~TFileTermLogger(void) { }
#pragma option pop
};
//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall Register(void);
} /* namespace Logterm */
using namespace Logterm;
#pragma pack(pop)
#pragma option pop
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // Logterm
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?