type
|
TGetUserInfo = function ( UID: Cardinal; const pName, pFullName, pEMail, pLocation, pExtra: PChar ): Integer; stdcall;
|
Parameters
Name
|
Description
|
UID
|
The ID of the user
|
pName
|
Returns the username of the user
|
pFullName
|
Returns the full name of the user
|
pEMail
|
Returns the E-Mail address of the user.
|
pLocation
|
Returns the Location of the user
|
pExtra
|
For internal use only.
|
Example (Delphi)
procedure VcsAfterPromote( pProject, pFolder, pObjectName, pUserName, pRevision, pPromoteTo: PChar;
|
UserID, FileID, PromotionID: Cardinal );
|
var
|
Name, FullName, EMail, Location, Extra: String;
|
begin
|
// This method is called after a file is successfully promoted.
|
GetUserInfo( UserID, Name, FullName, EMail, Location, Extra );
|
LogIt( Format( '%s - ''%s (%s)'' Promoted revision %s of file ''%s'' to ''%s''',
|
[ DateTimeToStr( Now ), String( pUserName ), EMail,
|
String( pRevision ), String( pObjectName ),
|
String( pPromoteTo ) ] ) );
|
end;
|
© 1995-2018 MCN Software