VcsAfterGet

If this method is exported from the DLL, it will be called after a Get action occurs:

VcsAfterGet

procedure VcsAfterGet( pProject, pFolder, pObjectName, pUserName, pRevision: PChar;

TimeStamp, Flags: Integer; UserID, FileID: Cardinal ); stdcall; export;

This procedure is called after a Get action occurs. This is a notification event only and none of the values passed in can be modified.

Parameters

Name	Description
pProject	The name of the Project containing the file
pFolder	The name of the Folder containing the file
pObjectName	The name of the file object
pUserName	The name of the user that carried out the action
pRevision	The name of the revision being checked out
Timestamp	The date/time of the revision
Flags	The flags used for the get action. See TCVcsConst.pas
UserID	The ID of the user that carried out the action.
FileID	The ID of the file

Example (Delphi)

The following method is called after a get of a file and simply logs the action to a local text file:

procedure VcsAfterGet( pProject, pFolder, pObjectName, pUserName, pRevision: PChar;

TimeStamp, Flags: Integer; UserID, FileID: Cardinal );

begin

// This method is called after a successful Get.

LogIt( Format( '%s - ''%s'' Got revision ''%s'' of ''%s''',

[ DateTimeToStr( FileDateToDateTime( TimeStamp ) ),

String( pUserName ), String( pRevision ),

String( pObjectName ) ] ) );

end;