| Class TMailSlot (unit Mailslot) |
TComponent
| Constructors |
constructor Create(AComponent:TComponent);Init and Exit procedures etc
| Functions |
procedure Close;
procedure Free;
procedure Open;mailslot public functions
procedure Read (buffer:pointer;const size:word);
procedure Write(buffer:pointer;const size:word);
function Mailslotname:string;Internal tool functions and procedures
procedure OpenClient;mailslot client
procedure OpenServer;mailslot server
function GetMessages:Integer;
function GetServer:string;
procedure SetActive(value:boolean);
procedure SetAlias (value:string);
procedure SetServer(value:string);| Properties |
property Active : boolean
property Alias : string
property Mailslot : TMsRole
property MsgSize : Integer
property Server : string
property Messages : Integer| Events |
event OnClose : TNotifyEvent
event OnOpen : TNotifyEvent| Variables |
FActive : boolean;
FAlias : string;
FIsOpen : Boolean;
FMailslot : TMsRole;
FMsgSize : Integer;
FOnClose : TNotifyEvent;
FOnOpen : TNotifyEvent;
FServer : string;
MsHandle : THandle;| Constructors |
constructor Create(AComponent:TComponent);write to mailslot (only when client)
Init and Exit procedures etc
| Functions |
procedure Close;open mailslot as Client or Server
procedure Free;
procedure Open;public declarations
mailslot public functions
procedure Read (buffer:pointer;const size:word);close mailslot
procedure Write(buffer:pointer;const size:word);read from mailslot (only when server)
function Mailslotname:string;internal function - generic
Internal tool functions and procedures
procedure OpenClient;internal functions - client part
mailslot client
procedure OpenServer;internal functions - server part
mailslot server
function GetMessages:Integer;property read
function GetServer:string;property read functions
procedure SetActive(value:boolean);
procedure SetAlias (value:string);property write
procedure SetServer(value:string);property write functions
| Properties |
property Active : booleanproperties
property Alias : string
property Mailslot : TMsRole
property MsgSize : Integer
property Server : string
property Messages : Integer| Events |
event OnClose : TNotifyEvent
event OnOpen : TNotifyEventmethods
| Variables |
FActive : boolean;properties
FAlias : string;Open/Close state in boolean
FIsOpen : Boolean;state and data buffers
FMailslot : TMsRole;mailslot path \\SERVER\mailslot\ALIAS
FMsgSize : Integer;which role component has
FOnClose : TNotifyEvent;
FOnOpen : TNotifyEvent;max size of message } { methods
FServer : string;name of mailslot alias
MsHandle : THandle;