GenerateTLSKeys

procedure GenerateTLSKeys(

  const ProtocolVersion: TTLSProtocolVersion;

  const MACKeyBits: Integer;

  const CipherKeyBits: Integer;

  const IVBits: Integer;

  const MasterSecret: RawByteString;

  const ServerRandom: RawByteString;

  const ClientRandom: RawByteString;

  var TLSKeys: TTLSKeys

);