| Class TMessageSender (unit DebugMessages) |
TObject
| Constructors |
constructor Create(const sFormatString : string; const bSendMessages :Boolean);| Functions |
procedure HandleMessages(VAR Msg: TMsg; VAR Handled :Boolean);
procedure OutLPT (const Level :Integer; const Proc :string; const Text :string);
procedure OutLPTA(const Level :Integer; const Proc :string; const Text :string; const Args: Array of const);
procedure OutLT (const Level :Integer; const Text :string);
procedure OutLTA (const Level :Integer; const Text :string; const Args: Array of const);
procedure OutT (const Text :string);----------------------------------------------------------------------------
procedure OutTA (const Text :string; const Args: Array of const);
procedure SetFormat(const FormatStr :string);Call standard stuff
procedure SetLP(const Level :Integer; const Proc :string);
procedure SetSendMode(const bSendModeOn :Boolean);
procedure Out(const Level :Integer;
const Proc :String;
const Text :string);
procedure OutA(const Level :Integer;
const Proc :String;
const Text :string;
const Args : Array of const);
procedure ParseFormat(FormatStr :string);
procedure RegisterMessages;| Properties |
| Events |
| Variables |
| Constructors |
constructor Create(const sFormatString : string; const bSendMessages :Boolean);----------------------------------------------------------------------------
| Functions |
procedure HandleMessages(VAR Msg: TMsg; VAR Handled :Boolean);MessageHandling
procedure OutLPT (const Level :Integer; const Proc :string; const Text :string);
procedure OutLPTA(const Level :Integer; const Proc :string; const Text :string; const Args: Array of const);
procedure OutLT (const Level :Integer; const Text :string);
procedure OutLTA (const Level :Integer; const Text :string; const Args: Array of const);
procedure OutT (const Text :string);Output-Routines
----------------------------------------------------------------------------
procedure OutTA (const Text :string; const Args: Array of const);
procedure SetFormat(const FormatStr :string);Settings
Call standard stuff
procedure SetLP(const Level :Integer; const Proc :string);
procedure SetSendMode(const bSendModeOn :Boolean);
procedure Out(const Level :Integer;
const Proc :String;
const Text :string);
procedure OutA(const Level :Integer;
const Proc :String;
const Text :string;
const Args : Array of const);
procedure ParseFormat(FormatStr :string);----------------------------------------------------------------------------
procedure RegisterMessages;| Properties |
| Events |
| Variables |