我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地:首页 > 网络学院 > 图型图像 > FLASH > FLASH大头贴FLASH部分源程序解析
热门文章排行
热门文章排行 Photoshop制作精美的简历封面(10-12)
在Flash课件中正确调用SWF文件(11-25)
巧用Photoshop徒手绘制扇子(10-19)
CorelDRAW12循序渐进-制作文本效果(12-29)
消除文字勾边后产生毛刺的小技巧(06-14)
精采文章排行
精采文章排行 GIF动态图片的修改(11-07)
Q版人物绘制全过程(11-07)
Flash互动电子地图制作手册——入门(11-01)
Flash 8.0前瞻——揭开8 ball的薄面(10-24)
土人AS入门教程对象篇(10-24)
技术专题推荐
网管论坛交流
 

FLASH大头贴FLASH部分源程序解析 

作者:佚名   来源:Linux 宝库   点击:   日期:2006-11-25


-->
原来有几个前辈贴过了一些关于这个技术的代码,有JAVA的,也有FLASH COM的。现在我把FLASH部分通过摄象头获得图象信息的代码贴出来。供大家参考。 

    这段代码是我参考了别人的代码自己写出来的。原来的那个网站里总共提供了两个类来实现这个问题。估计贴出来大多数人也会看的眼花缭乱不知所以(其实我也没太看明白)。所以按原来程序的思路自己重新写了一部分。大多数语句都写了注释。如果大家有什么不明白的,欢迎跟贴讨论


    注意:本程序需要Video的支持。具体添加办法请搜索FLASH8帮助(这个东西是FLASH库本身自带的)


/*FLASH大头贴原程序
/*程序编写:Benmouse 2005-12-01
import flash.display.BitmapData; //要应用这个对象。。必须要包含一下

myCrame=Camera.get();      //创建摄象头对象
myVideo.attachVideo(myCrame);   //显示视频
var imger:BitmapData = new BitmapData(myVideo._width, myVideo._height, false);
imgShow.attachBitmap(imger, this.getNextHighestDepth(), "auto", true);
var thehang:Number=0;
var ID:Number;
var PX:Array=new Array();
btn1.onRelease=function()
{
 imger.draw(myVideo); //imger是场景中一个空的组件,用来显示myVideo的图象
 thehang=0;
 _root.ID=setInterval(makeImg, 5);
}
function makeImg()
{
 var pix:Number;
 var pixer:String;
 PX[thehang]=new Array();
 for(w=0;w<imgShow._width;w++)
 {
  pix=imger.getPixel(w,thehang);
  pixer=pix.toString(16);
  if(pix == 0xFFFFFF) pixer = ""; // don’t send blank pixel
  PX[thehang].push(pixer);
 }
 thehang+=1;
 if(thehang>=imgShow._height)
 {
  clearInterval(_root.ID);
  imger.dispose();
  sendVars();
 }
}
function sendVars()
{
 sender=new LoadVars();
 sender.w=myVideo._width;
 sender.h=myVideo._height;
 
 for(i=0;i<sender.h;i++)
 {
     sender["PX"+i]=_root.PX[i];
 }
 sender.send("send.php","_blank","POST");
}

   





文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论

   相关文章:
·消除文字勾边后产生毛刺的小技巧 · 解决COREDRAW9与双核CPU冲突的技巧 5
·CorelDRAW入门与进阶实例:8.2椭圆按钮制 ·CorelDRAW印前分色新手上路
·IllustratorCS制作刺绣效果 ·CorelDRAW使用技巧-如何在CorelDRAW中虚

   文章评论:(条)
  
 请留名: 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。