vc控件截图:截图Control控件CatchScreen.oxc开发

最近完成个类似QQ截图功能CatchScreen.oxcControl控件能自动保存jpg图片到自动创建文件夹C:\\CatchScreenPicture里文件名用系统时间命名不会产生重复命名(例如:2009_4_15_10_37_40.jpg)并返回文件路径JPG大小在500K适合网络上传!如有意需求可联系我qq:386927906





脚本文件如下:(可在IE下测试)
<HTML>
<HEAD>
<TITLE>test page for object OCXTest_CalcPi</TITLE>
</HEAD>
<BODY>
<object id="clsid:58084200-F0E7-4840-9072-3B3698387E57"
name= CatchScreen
height="0" width="0" >
</object>

<script language= "VBScript">

CatchScreen.CatchScreen

dim RetTxt2

RetTxt2 = CatchScreen.GetFileDirName
document.write "GetFileDirName:" & RetTxt2

</script>
</BODY>
</HTML>

Tags:  eclipse开发截图 控件开发 delphi中控件上截图 vc控件截图

延伸阅读

最新评论

发表评论