Class TLogMsg (unit Logmsg) |
Inherits from
TObject
constructor Create(FileName : String);
- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
destructor Destroy;
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Msg(Pfx : Char; Msg : PChar; Len : Integer);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Msg2(Pfx : Char; Msg1 : PChar; Len1 : Integer; Msg2 : PChar; Len2 : Integer);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Renew;
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure szText(Pfx : Char; szMsg : PChar);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Text(Pfx : Char; MsgTxt : String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Text2(Pfx : Char; MsgTxt1, MsgTxt2 : String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
property MaxSize : LongInt
FCount : LongInt;
FFileHandle : File of char;
FFileName : String;
FFileNameOld : String;
FMaxSize : LongInt;
FStartTime : TDateTime;
constructor Create(FileName : String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
destructor Destroy;
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Msg(Pfx : Char; Msg : PChar; Len : Integer);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Msg2(Pfx : Char; Msg1 : PChar; Len1 : Integer; Msg2 : PChar; Len2 : Integer);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Renew;
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure szText(Pfx : Char; szMsg : PChar);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Text(Pfx : Char; MsgTxt : String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Text2(Pfx : Char; MsgTxt1, MsgTxt2 : String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
property MaxSize : LongInt
FCount : LongInt;
FFileHandle : File of char;
FFileName : String;
FFileNameOld : String;
FMaxSize : LongInt;
FStartTime : TDateTime;