qqip.mxml

来自「AIR开发的显示IP源码,AIR开发的显示IP源码」· MXML 代码 · 共 35 行

<?xml version="1.0" encoding="utf-8"?>
<mx:WindowedApplication windowComplete="init()" xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute">
	<mx:Script>
		<![CDATA[
			import flash.filesystem.*;
			
			private var file:File;
			private var fileStream:FileStream;
			private var ipIndexBeginOffSet:uint;
			private var ipIndexEndOffSet:uint;
			private var ipBlockCount:Number;
			
			private var searchBeginIpInfo:IpInfo=new IpInfo();
			private var searchEndIpInfo:IpInfo=new IpInfo();
			private var searchMidIpInfo:IpInfo=new IpInfo();
			private var searchBeginPos:uint;
			private var searchEndPos:uint;
			
			private function init():void
			{
				
				file=File.applicationDirectory.resolvePath("QQWry.dat");
				fileStream=new FileStream();
				fileStream.open(file,FileMode.READ);
				
				fileStream.endian=Endian.LITTLE_ENDIAN;
				
				var byteArr:ByteArray=new ByteArray();
				fileStream.readBytes(byteArr,0,8);
				
				ipIndexBeginOffSet=byteArr[0]+(byteArr[1]<<8)+(byteArr[2]<<16)+(byteArr[3]<<24);
				ipIndexEndOffSet=byteArr[4]+(byteArr[5]<<8)+(byteArr[6]<<16)+(byteArr[7]<<24);
				ipBlockCount=(ipIndexEndOffSet-ipIndexBeginOffSet)/7+1;
				
				//璁剧疆浜屽垎鏌ユ壘娉曠殑澶村拰灏