VcsAfterFreeze
Return to Introduction  Previous page  Next page
If this method is exported from the DLL, it will be called after an archive has been frozen. Freezing an archive prevents further development of the file.

VcsAfterFreeze

procedure VcsAfterFreeze( pProject, pFolder, pObjectName, pUserName: PChar; UserID, FileID: Cardinal ); stdcall; export; stdcall; export;  

This procedure is called after an Remove Version Label 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 that was frozen
pUserName
The name of the user that carried out the action
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 file has been frozen and simply logs the action to a local text file:

procedure VcsAfterFreeze( pProject, pFolder, pObjectName, pUserName: PChar; UserID, FileID: Cardinal );  
var  
  Name, FullName, EMail, Location, Extra: String;  
begin  
  // This method is called after a file is successfully frozen  
  GetUserInfo( UserID, Name, FullName, EMail, Location, Extra );  
  LogIt( Format( '%s - ''%s (%s)'' Froze File ''%s''', [ DateTimeToStr( Now ), String( pUserName ), EMail, String( pObjectName ) ] ) );  
end;  
 

 


© 1995-2018 MCN Software