Source position: onguard.pas line 411
procedure GenerateTMDKeyPrim(
var Key;
KeySize: Cardinal;
const Str: string
);