Apple AppleShare 3.0 File Server Controls Instrukcja Użytkownika Pobierz pdf (Strona 24)

This section describes the server control call that lets you send messages to

users.

SCSendMessage

The following function calls SCSendMessage to send a message to the users

specified in the array pointed to by DiscArrayPtr.

Note This call is not supported by Macintosh File Sharing.

FUNCTION MySCSendMessage (DiscArrayPtr: LongIntPtr;

ArrayCount: Integer;

Flags: Integer;

MessagePtr: StringPtr): OSErr;

VAR

scPB: SCParamBlockRec;

BEGIN

scPB.disconnectPB.scDiscArrayPtr := DiscArrayPtr;

scPB.disconnectPB.scArrayCount := ArrayCount;

scPB.disconnectPB.scCode := SCSendMessage;

scPB.disconnectPB.scFlags := Flags;

scPB.disconnectPB.scMessagePtr := MessagePtr;

MySCSendMessage := SyncServerDispatch(@scPB);

END;

The following procedure sends a message to all connected users. Before using

this routine, you must initialize gCurMaxSession by using the SCGetSetupInfo

call.

PROCEDURE SendMessageToAll;

{ This routine depends on gCurMaxSessions being }

{ initialized with SCGetSetupInfo. }

VAR

err: OSErr;

ArrayPosPtr: LongIntPtr;

Position: LongInt;

scPB: SCParamBlockRec;

1 2 ... 19 20 21 22 23 24 25 26 27 28 29 ... 78 79

Brak uwag

Apple AppleShare 3.0 File Server Controls Instrukcja Użytkownika Strona 24