说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

求教,用delphi编的drm程序,急!~~~~~~~~

编辑:说三道四文库 发布时间:2017-12-14 01:12
HTML文档下载 WORD文档下载 PDF文档下载
向各位大侠求教:

var
  frmDRMEncoder: TfrmDRMEncoder;
  sKID, sCID, sSeed, sKey, sHeader : WideString ;
  sPrivKey, sPubKey : OleVariant ;
  HeaderObj : WMRMHeader;
  KeysObj   : WMRMKeys;
  ProtectObj: WMRMProtect;
procedure TfrmDRMEncoder.Edit1Change(Sender: TObject);
begin
// Create the key ID, seed, key, and content ID. Set the key ID and
// the content ID into the header. Share the seed with the license
// issuer. Store the key in a secure manner.
    sKID := KeysObj.GenerateKeyID ;  --这里就不能运行,为什么?程序编译能通过.
    sSeed := KeysObj.GenerateSeed ;
    KeysObj.KeyID := sKID ;
    KeysObj.Seed := sSeed ;
    sKey := KeysObj.GenerateKey() ;
    sCID := KeysObj.GenerateKeyID() ;
    HeaderObj.KeyID := sKID ;
    HeaderObj.ContentID := sCID ;
// Create public and private signing keys to sign the header. Use the
// private key to sign the header. Share the public key with the
// license issuer.
    KeysObj.GenerateSigningKeys ( sPrivKey, sPubKey) ;
    HeaderObj.Sign(sPrivKey) ;
// Retrieve the string containing the header.
   sHeader := HeaderObj.Header ;
// Set the header string into the WMRMProtect object.
    ProtectObj.Header := sHeader ;
// Set the key into the WMRMProtect object.
    ProtectObj.Key := sKey  ;
// Specify the name of the file to be protected.
    ProtectObj.InputFile := Edit1.Text ;
end;
不懂,希望楼主提供详细材料,引用了什么,用的是window media service,Directshow还是其他什么东西。是不是涉及到了版权保护的问题?
是的,MSDN里的一个drm(数字版权管理)实例,用的是drm7.0
不知道为什么不能用行通过!
我们正处于API的黄金时代吗? 敏捷开发的26条至理名言 12月10日:1815年首位程序员Augusta Ada出生 TOP30+应用排行榜:十一月国内外综合榜单 抱大腿:Square礼品卡服务进驻Passbook 科技创新剑指开源产业 “龙芯杯”破题自主研发 25GPU的Linux集群6小时内破解标准Windows密码 Lady Gaga与大数据的“火花” 手势才是王道:3款应用捕获3个设计灵感 YouTube的挑战者 JustinTV教你如何打造实时视频网站 黑客挟持160万用户密码 抗议联合国监管互联网 Twitter面对危机火速上线照片滤镜产品 Nike推创业孵化器:每个参与团队获2万美金 傲游发布云浏览器 支持跨终端数据同步 12个git实战建议和技巧 用友UAP产品线总设计师史周军访谈录 IE10新功能解析 支持Media Query(图) 单页Web应用或引领下一代Web新趋势? [CTO俱乐部第89期]新时代的前端开发 [多图]160台Mac mini打造的数据中心机架 是谁动了我的CPU! 欧朋CEO:GPU加速是手机浏览器的新趋势 TOP30专访:Splashtop研发中心总经理Alex Xu 2012Q3国内App开发者半数以上入不敷出 细微之处见真章 为什么要在try-catch-finally里加大括号 独立开发者:面对攻击就要“脸皮厚+更自豪” IBM纳米光子芯片对付大数据 单个通道25Gbps AWS数据仓库服务Redshift是最好的选择吗? 又赚了一笔:微软向两公司收取Android专利费 深度解析:Android4.2系统“应用验证服务” 欧洲移动游戏大会:五大行业趋势 控制文件损坏,恢复是碰到了难点--ora-00600错误。怎么办??? 请问WebBrowser对象在弹出式窗口中是不是不能用? 关于CListCtrl的一个问题 多个cpp可以有多个main吗? 怎么样在不同分辨率下显示同一网页不变形? 卡拉OK厅中的男人和女人们(zt) 怎么在一个接口中调用另外一个接口 大力过来 帮忙! 论坛里有保留cookies的功能,但是有些用户说cookies保存不了 大家好!我有问题很急呀!!! 哪个函数可以打开多个文件? 大家请进来说说吧,用什么软件编辑jsp和javascript能测试出网页中提示的:完成,但网页上有错误,这种错误所在的行和具体的什么错误。 关于在课件项目中应用XML的问题,回复心得或相关链接都有赠分 多个附件上传和下载 VB.NET中樹是怎樣展開 我可以把ACCESS数据库的表导出到SQL SERVER中吗? 图片存在目录与存在数据库各有什么优缺点呢? 点击这个框架中的网页能够打印另一个框架中的内容吗 求救~!!!! 请问如何将台式机硬盘上的内容copy到笔记本的硬盘上?? ADO数据集的服务器游标的使用问题 为什么我在发布Delphi程序时总出现Error1324错误 快来救救我的硬盘呀 mydatastore.update() 返回 -1 如何知道出什么错? 如何获得当前光标所在程序的edit框的handle? [ 请教 ] 关于FREE风格的数据窗口的显示问题! 这个存储过程怎么写呀? 如何添加新函数?急!急!急! 我在网上把一副图片设为背景,我不知道他的文件名,我现在想把它找出来,请问如何办到。在右键-属性-背景中他的名称是“Internet Explo 请高手指点。 vb函数使用的问题 简单两台机对连问题 做斑竹、做会员就可以领工资(RMB)! jsp中session跨war包调用问题 PB画图问题 请各位搞WEB挖掘的朋友都留个联系方式 如何指定 记录集的游标类型,大侠请进,小弟急用(内附代码)!!! 请投上一票! mssql一个很奇怪的问题,如何解决啊!“键列信息不足或不正确,更新影响到多行” 天杀的3721,大家进来共同讨伐这有史以来最恶心的XXX,进来都有分 c写的cgi怎么获得表单中某个下拉菜单的value和text.在线等 哪有VC的SP5下载? 要实现这样的功能,SQL该如何写(急,在线等待)? 哪里可以找到string.format的格式说明啊? 【无限祝福】:璇玑、大力相知相伴 查找数据库的问题。。。。。 在asp.net中怎么调用第二个窗体呀???请教大家帮我。thanks ,中秋快乐 Jsp保存时出错 Response.Write rs("ans")中間的rs 能否在FTP站点里上传文件夹? 胡琴琵琶与羌笛,那胡琴是什么样子的? 钻床钻硬质行星轴应该怎样钻? 应该是why choose 还是why choice 对? 怎样清的一条小河呢?------------------------------------------,是这样清的一条小河.填空 我是一条小河 歌词 ( )的歌手括号中可以填什么词 ( )的歌手,括号里填合适的词语 在很多的歌手中自己明明自己都可以写出词来为什么还要叫别人来帮忙写呢 光发射机的输出功率表示什么意思? ()的羊群,()的歌手,既.又.既.又 组词,马上, choice可数吗具体一点 列举什么都要 希望晚修后回来可以看到 有研究称所有哺乳动物遵循21秒排尿定世上真有“摇钱树”:桉树能测地下黄金出租屋现633万巨款续:租客妻子称钱铁路部门新规:火车票只能改签一次 开金华00后女生溜冰场结识男子 旷课5揭秘1亿年前东亚大碰撞(图)美月监听法意西通话达千万次中日言辞行动剑拔弩张 是否会酿成冲突外媒称俄罗斯在G20峰会监控各国元首杭州到广西快速铁路明年底打通 6.5北京推出2万套自住型商品房 杭州暂时疯狂的球衣蜜蜂哥哥向市民开放养蜂基地夏至后养生防病有讲究遇见另一个自己走着走着花就开了大学生“专享”岗位等你来昨日战报六栋堂随想“工士”成色尚需市场检验青椒大量上市遭贱卖博彩庄家才是世界杯的大BOSS?我叫哀木涕之仙踪猎妖奇侠传无限军火系统我是世界之王恶魔智脑香江大宗师大厨师凛冬王座仙王不朽魔术世纪都市超级赛亚人平峦山公园旅游天子庙旅游沿河城旅游幽州大峡谷旅游国家森林公园滑雪场旅游绥芬河国门旅游奥帕拉拉冒险岛水公园旅游中南民族大学旅游御水温泉旅游珠江公园旅游湟源峡旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘