Thaw

If this method is exported from the DLL, it will be called after an archive has been thawed. Thawing a file allows continued development on the file.

VcsAfterThaw

procedure VcsAfterThaw( 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 thawed
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 thawed and simply logs the action to a local text file:

procedure VcsAfterThaw( 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 thawed

GetUserInfo( UserID, Name, FullName, EMail, Location, Extra );

LogIt( Format( '%s - ''%s (%s)'' Thawed File ''%s''', [ DateTimeToStr( Now ), String( pUserName ), EMail, String( pObjectName ) ] ) );

end;