傻猫日志 Samool.com

艾普网络创立于2000年4月，艾普网络有限公司是目前中国最大的民营宽带服务提供商。艾普宽带的核心业务是基于IP宽带城域网，为企业和住宅用户提供高速光纤上网服务。目前艾普网络已经从成都扩展到武汉，长沙，重庆，昆明，广州并获取工信部颁发的10余个中心城市的ISP驻地网许可证。截止目前，在线用户已经超过70W，覆盖约450万户。成都地区每天可提供的流量超过1000万，每天可进行百万级以上的IP投放（内网）。

艾普集团及其旗下公司主要从事互联网接入服务、网络工程设计建设、网络增值服务、网络设备研发生产等业务。集团成员企业有：成都华溪科技有限公司、成都普信数码科技有限公司、四川省艾普网络有限公司、四川省艾普网络有限公司重庆分公司、云南艾普通信科技有限公司、四川省艾普网络有限公司武汉分公司，四川省艾普网络有限公司长沙分公司四川省艾普网络有限公司广州分公司，四川省艾普网络增值事业公司等。

优酷视频分享

土豆视频分享

//模拟ctrl+回车
keybd_event(VK_CONTROL,   0,   0,   0);
keybd_event(VK_RETURN,   0,   0,   0);
keybd_event(VK_RETURN,   0,   KEYEVENTF_KEYUP,   0);
keybd_event(VK_CONTROL,   0,   KEYEVENTF_KEYUP,   0);

查看更多内容...

function TFrm_main.InputChar(str: string): Boolean;
var
  i     : integer;
  c     : byte;
begin
      for i := 1 to Length(str) do
      begin
       c := VkKeyScan(str[i]) and 255;                //输入文字
       keybd_event(c,0,0,0);
       keybd_event(c,0,KEYEVENTF_KEYUP,0);
      end;
end;

有很多朋友在问离线地图在那里下载，由于5.0 google map 是矢量地图（可任意放大的），目前还没有制作 离线地图包的工具。只能手动在地图上跑跑，缓存到电脑上。大家可以把WIFI打开，到处跑一跑，到处移动一下地图，可将地图信息缓存到SD卡上，出门的话就可以直接使用了。

全国县级城市可见+成都市区街道详细 (全矢量图)    30M
http://u.115.com/file/f9ed4294cd#

成都市区 5.0离线地图：20M
http://u.115.com/file/f952849c98#

广州   5.0离线地图：35M    (由网友： totomins提供   原贴：http://bbs.meizu.com/thread-2411447-1-1.html)
http://u.115.com/file/f85d2dfbd9

河南省全省地图    39M (由网友: wwok提供   原贴：http://bbs.meizu.com/thread-2412939-1-1.html)
http://d.dy5.org:54322/down/cache.rar

欢迎其它地区的朋友分享离线地图包。。。。。。

找了几十个google map 5.0修改版，加强版，原版，XXX混合版，XXX杂交版，功夫不负有心人，终于让我找到了，哇哈哈

软件下载：http://u.115.com/file/f97913cc25#

有很多朋友在问离线地图在那里下载，由于5.0 google map 是矢量地图（可任意放大的），目前还没有制作 离线地图包的工具。只能手动在地图上跑跑，缓存到电脑上。大家可以把WIFI打开，到处跑一跑，到处移动一下地图，可将地图信息缓存到SD卡上，出门的话就可以直接使用了。

成都市区 5.0离线地图：20M
http://u.115.com/file/f952849c98#

欢迎其它地区的朋友分享离线地图包。。。。。。
------------------------------------------------------------------------------------------------------
5.0的地图是矢量图，所以比较小，而4.7的离线文件全是图片，所以比较大。

想一次搞定的朋友，怕麻烦的朋友，请用支持离线地图的4.7版吧，请移步这里。

[亲测可用] M9省钱省流量，google map 4.7 离线地图完美版 [支持全国75个城市 ]
http://bbs.meizu.com/thread-2189441-1-1.html

M9最新测试固件：14893 可用，目前只有14893固件才可以用，其它版本固件都安装不上的。
固件地址：http://download.meizu.com/firmware/m9/14893/update.bin

<script type="text/javascript">   
//处理键盘事件 禁止后退键（Backspace）密码或单行、多行文本框除外 
function banBackSpace(e){         var ev = e || window.event;//获取event对象       
 var obj = ev.target || ev.srcElement;//获取事件源             
  var t = obj.type || obj.getAttribute('type');//获取事件源类型            
   //获取作为判断条件的事件类型    
    var vReadOnly = obj.getAttribute('readonly');     
 var vEnabled = obj.getAttribute('enabled');    
  //处理null值情况    
   vReadOnly = (vReadOnly == null) ? false : vReadOnly;    
    vEnabled = (vEnabled == null) ? true : vEnabled;        
       //当敲Backspace键时，事件源类型为密码或单行、多行文本的，    
     //并且readonly属性为true或enabled属性为false的，则退格键失效    
      var flag1=(ev.keyCode == 8 && (t=="password" || t=="text" || t=="textarea")                   && (vReadOnly==true || vEnabled!=true))?true:false;   
          //当敲Backspace键时，事件源类型非密码或单行、多行文本的，则退格键失效    
        var flag2=(ev.keyCode == 8 && t != "password" && t != "text" && t != "textarea")                  ?true:false;            
            //判断   
           if(flag2){          return false;      }      if(flag1){             return false;         }     }   
         //禁止后退键 作用于Firefox、Opera
          document.onkeypress=banBackSpace;
        //禁止后退键  作用于IE、Chrome
         document.onkeydown=banBackSpace;
   
//禁止用F5键     
function document.onkeydown()     
{     
    if(event.keyCode==116)     
    {     
        event.keyCode   =   0;     
        event.cancelBubble   =   true;     
        return false;     
    }     
}        </script> 

//系统信息获取    
 function getSysInfo(){    
     var locator = new ActiveXObject ("WbemScripting.SWbemLocator");     
     var service = locator.ConnectServer(".");     
     //CPU信息    
     var cpu = new Enumerator (service.ExecQuery("SELECT * FROM Win32_Processor")).item();     
     var cpuType=cpu.Name,hostName=cpu.SystemName;    
     //内存信息    
     var memory = new Enumerator (service.ExecQuery("SELECT * FROM Win32_PhysicalMemory"));    
    for (var mem=[],i=0;!memory.atEnd();memory.moveNext()) mem[i++]={cap:memory.item().Capacity/1024/1024,speed:memory.item().Speed}    
    //系统信息    
    var system=new Enumerator (service.ExecQuery("SELECT * FROM Win32_ComputerSystem")).item();    
    var physicMenCap=Math.ceil(system.TotalPhysicalMemory/1024/1024),curUser=system.UserName,cpuCount=system.NumberOfProcessors    
        
    return {cpuType:cpuType,cpuCount:cpuCount,hostName:hostName,curUser:curUser,memCap:physicMenCap,mem:mem}    
}   

查看更多内容...

安装delphi7和delphi2010以后，文件默认的关联跳到2010上去了，卸载delphi2010之后，pas和dpk的文件图标不是默认的图标，显示的未知文件，看到很不爽啊。。。。习惯了的图标没在了，很是郁闷。。。

可以采用以下方法进行修复..

恢复文件关联的Windows命令
ASSOC [.ext[=[fileType]]]

  .ext      指定跟文件类型关联的文件扩展名
  fileType  指定跟文件扩展名关联的文件类型

用CMD进入窗口命令行模式，执行以下命令，搞定。
assoc   .bpg=BorlandProjectGroup
assoc   .dpr=DelphiProject
assoc   .pas=DelphiUnit
assoc   .dfm=DelphiForm
assoc   .xfm=DelphiCLXForm
assoc   .dpk=DelphiPackage

BorlandProjectGroup，DelphiProject，这些东东从哪里来的，答案就是另一个Windows命令 ftype，它能显示系统中已经注册的文件类型。

Binds the specified function to an event, so that the function gets called whenever the event fires on the object.

dhtml语法

<I>bSuccess</I> = <I><SPAN class=moreinfo title="an element from the Applies To list below">object</SPAN></I><B>.attachEvent(</B><I>sEvent</I><B>, </B><I>fpNotify</I><B>)</B>

Parameters

sEvent	Required. Stringthat specifies any of the standard DHTML Events.
fpNotify	Required. Pointer that specifiesthe function to call when sEvent fires.

Return Value

Boolean. Returns one of the following possible values:

true	The function was bound successfully to the event.
false	The function was not bound to the event.

查看更多内容...