|
源代码在附件里面, 部分功能 可能不是很稳定 希望有熟悉post的同学把这个代码做的更加完善
- namespace winhttp
- //通过post向网站提交数据
- //参数1:提交的模式
- //参数2:要提交的网页地址
- //参数3:要提交的数据
- //参数4:返回的网页数据的编码
- function openUrl(type,weburl,send="",Cset="utf-8")
- http=com("WinHttp.WinHttpRequest.5.1")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("MSXML2.ServerXMLHTTP.6.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP.5.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("WMsxml2.ServerXMLHTTP.4.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP.3.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.6.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.5.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.4.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.3.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Microsoft.XMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- go:
- if(str.strlowercase(type)=="post")
- http.Open("post",weburl,false)
- http.setRequestHeader("Cache-Control","no-cache")
- http.setRequestHeader("Accept","*/*")
- http.setRequestHeader("UserAgent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0; .NET4.0C; .NET4.0E")
- http.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
- else
- http.Open("get",weburl,false)
- http.setRequestHeader("Accept","*/*")
- http.setRequestHeader("UserAgent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0; .NET4.0C; .NET4.0E")
- http.setRequestHeader("Cache-Control","no-cache")
- endif
- http.send(send)
- t=system.gettickcount()
- while(http.ReadyState != 4)
- help.sleep(100)
- if((system.gettickcount()-t)>5000)
- return false
- endif
- endwhile
- ret=winhttp.BytesToBstr(http.ResponseBody,Cset)
- header=http.GetAllResponseHeaders()
- http=null
- return ret
- endfunction
- //自动识别编码
- function openUrlExAutoCset(type,weburl,send="",setcookie="",&header="",referer="",Cset="utf-8")
- http=com("WinHttp.WinHttpRequest.5.1")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("MSXML2.ServerXMLHTTP.6.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP.5.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("WMsxml2.ServerXMLHTTP.4.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP.3.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.ServerXMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.6.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.5.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.4.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP.3.0")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Msxml2.XMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- http=com("Microsoft.XMLHTTP")
- if(type.vartype(http)=="插件")
- goto go
- endif
- go:
-
- //http=com("MSXML2.ServerXMLHTTP.6.0")
- //http.Option(4,13056)
- //http.Option(6,false)
- if(str.strlowercase(type)=="post")
- http.Open("post",weburl,false)
- http.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
- else
- http.Open("get",weburl,false)
- endif
- http.setRequestHeader("If-Modified-Since","0")
- http.setRequestHeader("Cache-Control","no-cache")
- http.setRequestHeader("Accept","*/*")
- http.setRequestHeader("Connection","Keep-Alive")
- http.setRequestHeader("Accept-Language","zh-CN")
- http.setRequestHeader("Content-Length",str.strleng(send))
- http.setRequestHeader("UserAgent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0; .NET4.0C; .NET4.0E")
- if(setcookie!="")
- http.setRequestHeader("Cookie",setcookie)
- endif
- if(referer!="")
- http.setRequestHeader("Referer",weburl)
- endif
- http.send(send)
- t=system.gettickcount()
- while(http.ReadyState != 4)
- help.sleep(100)
- if((system.gettickcount()-t)>5000)
- return false
- endif
- endwhile
-
- //http.WaitForResponse(5000)
- //status=http.status()
- //if(status==302)
- //help.messagebox("302")
- //endif
- header=http.GetAllResponseHeaders()
- retcset=http.getResponseHeader("Content-Type")
- cset=StrEx.mid(retcset,"charset=")
- if(cset=="")
- cset=Cset
- endif
- ret=winhttp.BytesToBstr(http.ResponseBody,cset)
- http=null
- return ret
- endfunction
- //不包含域信息
- function getCookie(header)
- theader
- cookie
- str.split(header,"\r\n",theader)
- count
- arraysp.size(theader,count)
- for(i=0;i<count;i++)
- regextext="Set-Cookie: (.+?)=([^;]+)?"
- retArray
- xx=str.strsub(theader[i],0,11)
- if(xx=="Set-Cookie:")
- num=字符串.正则子表达式匹配(regextext,theader[i],retArray)
- cookie&=retArray[0]&"="&retArray[1]&";"
- endif
- endfor
- cookie=str.replace(cookie,";;",";")
- return cookie
- endfunction
- //包含域信息
- function getCookieEx(header)
- theader
- cookie
- str.split(header,"\r\n",theader)
- count
- arraysp.size(theader,count)
- for(i=0;i<count;i++)
- xx=str.strsub(theader[i],0,11)
- if(xx=="Set-Cookie:")
- cookie&=str.strsub(theader[i],11,str.strleng(theader[i]))&";"
- endif
- endfor
- cookie=str.replace(cookie,";;",";")
- return cookie
- endfunction
- function addDomain(cookie,domain)
- pos=str.findstr(cookie,";")
- t=str.strsub(cookie,0,pos+1)
- end=str.strsub(cookie,pos+1,str.strleng(cookie))
- ret=t&"domain="&domain&";"&end
- return ret
- endfunction
- function setIECookie(weburl,cookie)
- ret=dllcall("wininet.dll","bool","InternetSetCookieExA","char*",weburl,"char *","qq","char *","0350910378","int",系统常量.INTERNET_COOKIE_THIRD_PARTY,"int",0)
- tt
- str.split(cookie,";",tt)
- count
- arraysp.size(tt,count)
- for(i=0;i<(count-1);i++)
- tt1
- str.split(str.strtrim(tt[i]),"=",tt1)
- if(tt1[0]!="HttpOnly")
- ret=dllcall("wininet.dll","BOOL","InternetSetCookieA","char *",weburl,"char *",tt1[0],"char *",tt1[1])
- else
- ret=dllcall("wininet.dll","BOOL","InternetSetCookieA","char *",weburl,"char *",tt1[0],"char *","")
- endif
- 调试输出(i)
- endfor
-
- endfunction
- //获取网页打开的时间
- //参数1:网页地址
- //参数2:超时时间
- function getHtmlGetticktime(weburl,time)
- http=com("Msxml2.XMLHTTP")
- t=system.gettickcount()
- http.Open("get",weburl,false)
- http.setRequestHeader("Cache-Control","no-cache")
- http.send("")
- if(http.status == 200)
- http=null
- return system.gettickcount() - t
- endif
- while(http.status != 200)
- if((system.gettickcount() - t)>time)
- http=null
- return system.gettickcount() - t
- endif
- endwhile
-
- endfunction
- //获取北京时间
- function getNetTime()
- http=com("MSXML2.ServerXMLHTTP.3.0")
- http.Open("get","http://open.baidu.com/special/time/",false)
- http.setRequestHeader("Cache-Control","no-cache")
- http.send("")
- ret=http.getResponseHeader("Date")
- ret=str.strsub(ret,str.findstr(ret,",")+2,str.strleng(ret))
-
- day=str.strsub(ret,0,str.findstr(ret," "))
- ret=str.strsub(ret,str.findstr(ret," ")+1,str.strleng(ret))
- month=str.strsub(ret,0,str.findstr(ret," "))
- ret=str.strsub(ret,str.findstr(ret," ")+1,str.strleng(ret))
- year=str.strsub(ret,0,str.findstr(ret," "))
- ret=str.strsub(ret,str.findstr(ret," ")+1,str.strleng(ret))
- time=str.strsub(ret,0,str.findstr(ret," "))
- m
- select(month)
- case "Jan":
- m=1
- case "Feb":
- m=2
- case "Mar":
- m=3
- case "Apr":
- m=4
- case "May":
- m=5
- case "Jun":
- m=6
- case "Jul":
- m=7
- case "Aug":
- m=8
- case "Sep":
- m=9
- case "Oct":
- m=10
- case "Nov":
- m=11
- case "Dec":
- m=12
- endselect
- http=null
- return datetime.add("h",8,year&"/"&m&"/"&day&" "&time)
- endfunction
- //把二进制流转码
- function BytesToBstr(body,Cset)
- "UTF-8"
- objstream =com("Adodb.Stream")
- objstream.Type=1
- objstream.Mode =3
- objstream.Open
- objstream.Write(body)
- objstream.Position=0
- objstream.Type=2
- objstream.Charset=Cset
- str=objstream.ReadText
- objstream.Close
- objstream=null
- return str
- endfunction
- //把网络上的文件下载到本地
- //参数1:文件地址
- //参数2:文件本地存放的地址
- function 下载文件(文件地址,保存路径)
- http=com("Microsoft.XMLHTTP")//创建一个com对象
- http.Open("get", 文件地址, false)//以get模式打开文件
- http.setRequestHeader("Cache-Control","no-cache")//不使用本地缓存数据,防止每次数据一样
- http.send("")
- t=system.gettickcount()
- while(http.ReadyState != 4)
- help.sleep(100)
- if((system.gettickcount()-t)>5000)
- return false
- endif
- endwhile
- body=http.ResponseBody
-
- http=null
- stream=com("ADODB.Stream")//文件操作的对象
- stream.Type=1//这个我也不懂,参数就是这么写的
- stream.Open//打开文件流操作
- stream.write(body)//把文件流写入内存(猜测的)
- stream.saveToFile(保存路径,2)//然后把文件保存成二进制数据的指定文件
- stream.Close//关闭文件流操作
- stream=null
- endfunction
- //将一个文件以二进制的形式读取出来
- //存储在变量里面
- function readFile(path,&len)
- ret
- stream=com("ADODB.Stream")
- stream.Type=1
- stream.Open
- stream.LoadFromFile(path)
- ret=stream.Read
- len=stream.Size
- stream.Close
- stream=null
- return ret
- endfunction
- //保存指定编码的文本
- function SaveTextFile(sFilePath,s,sCharset="utf-8")
- oStream=com("ADODB.Stream")
- 以文本模式
- oStream.Type=2
- oStream.Mode=3
- oStream.Charset=sCharset
- oStream.Open
- oStream.WriteText(s)
- oStream.SaveToFile(sFilePath,2)
- oStream=null
- endfunction
- //执行js代码
- function runScriptCode(scriptcode,Script="JavaScript")
- ScriptContorl=com("MSScriptControl.ScriptControl")
- ScriptContorl.AllowUI=true
- ScriptContorl.Language=Script
- ret=ScriptContorl.Eval(scriptcode)
- ojb=null
- debug.print(ret)
- return ret
- endfunction
- //encodeURI
- //要用encodeURI方式编码的字符串
- function encodeURI(str)
- ScriptContorl=com("MSScriptControl.ScriptControl")
- ScriptContorl.AllowUI=true
- ScriptContorl.Language="JavaScript"//"JavaScript"
- ScriptContorl.AddCode("function add(s1){return encodeURI(s1);}")
- ret=ScriptContorl.Run("add",str)
- ScriptContorl=null
- return ret
- endfunction
- //decodeURI
- //要用decodeURI解码的字符串
- function decodeURI(str)
- ScriptContorl=com("MSScriptControl.ScriptControl")
- ScriptContorl.AllowUI=true
- ScriptContorl.Language="JavaScript"//"JavaScript"
- ScriptContorl.AddCode("function add(s1){return decodeURI(s1);}")
- ret=ScriptContorl.Run("add",str)
- ScriptContorl=null
- return ret
- endfunction
- //escape
- //要用escape方式转码的字符串
- function escape(str)
- ScriptContorl=com("MSScriptControl.ScriptControl")
- ScriptContorl.AllowUI=true
- ScriptContorl.Language="JavaScript"//"JavaScript"
- ScriptContorl.AddCode("function add(s1){return escape(s1);}")
- ret=ScriptContorl.Run("add",str)
- ScriptContorl=null
- return ret
- endfunction
- //unescape
- //要用unescape解码的字符串
- function unescape(str)
- ScriptContorl=com("MSScriptControl.ScriptControl")
- ScriptContorl.AllowUI=true
- ScriptContorl.Language="JavaScript"//"JavaScript"
- ScriptContorl.AddCode("function add(s1){return unescape(s1);}")
- ret=ScriptContorl.Run("add",str)
- ScriptContorl=null
- return ret
- endfunction
- function sendEmail(你的邮箱帐号,你的邮箱密码,发送邮件地址,邮件主题,邮件内容,邮件附件)
- //Dim You_ID,MS_Space,Email
- //帐号和服务器分离
- You_ID
- str.split(你的邮箱帐号,"@",You_ID)
- size
- arraysp.size(You_ID,size)
- if(size!=2)
- return false
- endif
- //这个是必须要的,不过可以放心的事,不会通过微软发送邮件
- MS_Space="http://schemas.microsoft.com/cdo/configuration/"
- Email=com("CDO.Message")
- //'这个一定要和发送邮件的帐号一样
- Email.From=你的邮箱帐号
- //'Execute "Email.to=发送邮件地址"
- Email.CC=发送邮件地址
- Email.Subject=邮件主题
- Email.Textbody=邮件内容
- if(邮件附件 !="")
- Email.AddAttachment(邮件附件)
- endif
-
- //'发信端口
-
- Email.Configuration.Fields(MS_Space & "sendusing",2)
- //'SMTP服务器地址
- Email.Configuration.Fields(MS_Space & "smtpserver","smtp." & You_ID[1])
- //'SMTP服务器端口
- Email.Configuration.Fields(MS_Space & "smtpserverport",25)
- Email.Configuration.Fields(MS_Space & "smtpauthenticate",1)
- Email.Configuration.Fields(MS_Space & "sendusername",You_ID[0])
- Email.Configuration.Fields(MS_Space & "sendpassword",你的邮箱密码)
- Email.Configuration.Fields.Update
-
- //'发送邮件
- Email.Send()
- //'关闭组件
- Email=null
- return true
- //如果没有任何错误信息,则表示发送成功,否则发送失败
-
- endfunction
- function sendEmaliex(你的邮箱帐号,你的邮箱密码,发送邮件地址,邮件主题,邮件内容,邮件附件)
- You_ID
- str.split(你的邮箱帐号,"@",You_ID)
- size
- arraysp.size(You_ID,size)
- if(size!=2)
- return false
- endif
- objMail=com("CDO.Message")
- objConfig=com("CDO.Configuration")
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport",25)
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing",2)
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver","smtp." & You_ID[1])
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate",1)
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername",You_ID[0])
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword",你的邮箱密码)
- objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/languagecode","0x0804")
- objConfig.Fields.Update()
- objMail.Configuration=objConfig
- objMail.Subject=邮件主题
- objMail.From=你的邮箱帐号
- objMail.To=发送邮件地址
- objMail.HTMLBody=邮件内容
- if(邮件附件 !="")
- objMail.AddAttachment(邮件附件)
- endif
- ret=objMail.Send
- help.messagebox(ret)
- endfunction
- endnamespace
- namespace fileEx
- //获取文件所在目录
- //path:文件路径
- //返回值:返回文件所在的目录
- function GetParentFolderName(path)
- fs=com("Scripting.FileSystemObject")
- ret=fs.GetParentFolderName(path)
- fs=null
- return ret
- endfunction
- //打开文件或者保存文件
- //type:0保存文件,1打开文件,2选择目录
- //filename:默认文件名
- //filter:过滤文件 All Files (*.*)|*.*|txt Files (*.*)|*.txt
- //返回值:返回打开或保存文件的路径,没有保存或者打开则返回空
- function dialog(type=0,FileName="",Filter="All Files (*.*)|*.*")
- ret
- f=com("MSComDlg.CommonDialog")
- f.Filter=Filter
- f.FilterIndex=2
- f.FileName=FileName
- f.MaxFileSize=512//文件大小
- select(type)
- case 1:
- f.ShowOpen()
- ret=f.FileName
- if(ret==FileName)
- ret=""
- endif
- case 0:
- f.ShowSave()
- ret=f.FileName
- if(ret==FileName)
- ret=""
- endif
- case 2:
- ret=file.dialog(2)
- default:
- ret=""
- endselect
- f=null
- return ret
- endfunction
- endnamespace
- namespace debug
- isprintf=true
- //个性化命令
- function print(outstr)
- if(isprintf)
- 调试输出(system.getsystime(3)&": "&outstr)
- endif
- endfunction
- endnamespace
- namespace 位操作
- //求int1的N次幂
- //参数1:数值1
- //参数2:数值2
- function 幂运算(int1,n)
- ret=1
- if(n==0)
- return 1
- endif
- for(i=0;i<n;i++)
- ret=ret * int1
- endfor
- return ret
- endfunction
- //1个数进行非操作
- //参数1:数值
- function Not(int1)
-
- string1=位操作.D2B(int1)
- len=str.strleng(string1)
- max
- ret
-
- if(system.getsysinfo()== 6 || system.getsysinfo()== 8)
- //表示是64位系统
- for(i=0;i<64-len;i++)
- string1= "0" & string1
- endfor
- max=64
- else
- //表示是32位系统
- for(i=0;i<32-len;i++)
- string1= "0" & string1
- endfor
- max=32
- endif
- //非操作
- for(i=0;i<max;i++)
- if(type.cint(str.strsub(string1,i,i+1))==0)
- ret=ret & "1"
- else
- ret=ret & "0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //两个数进行或操作
- //参数1:数值1
- //参数2:数值2
- function Or(int1,int2)
- ret
- string1=位操作.D2B(int1)
- string2=位操作.D2B(int2)
- len1=str.strleng(string1)
- len2=str.strleng(string2)
- maxlen
- //下面是补0操作
- if(len1>len2)
- maxlen=len1
- for(i=0;i<len1-len2;i++)
- string2= "0" & string2
- endfor
- endif
- if(len1<len2)
- maxlen=len2
- for(i=0;i<len2-len1;i++)
- string1= "0" & string1
- endfor
- endif
- if(len1==len2)
- maxlen=len2
- endif
- //或操作
- for(i=0;i<maxlen;i++)
- if(type.cint(str.strsub(string1,i,i+1))+type.cint(str.strsub(string2,i,i+1)) >=1)
- ret=ret &"1"
- else
- ret=ret &"0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //两个数进行与操作
- //参数1:数值1
- //参数2:数值2
- function And(int1,int2)
- ret
- string1=位操作.D2B(int1)
- string2=位操作.D2B(int2)
- len1=str.strleng(string1)
- len2=str.strleng(string2)
- maxlen
- //下面是补0操作
- if(len1>len2)
- maxlen=len1
- for(i=0;i<len1-len2;i++)
- string2= "0" & string2
- endfor
- endif
- if(len1<len2)
- maxlen=len2
- for(i=0;i<len2-len1;i++)
- string1= "0" & string1
- endfor
- endif
- if(len1==len2)
- maxlen=len2
- endif
- //与操作
- for(i=0;i<maxlen;i++)
- if(type.cint(str.strsub(string1,i,i+1))+type.cint(str.strsub(string2,i,i+1)) == 2)
- ret=ret &"1"
- else
- ret=ret &"0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //1个数进行非操作
- //参数1:数值
- function 非(int1)
-
- string1=位操作.D2B(int1)
- len=str.strleng(string1)
- max
- ret
-
- if(system.getsysinfo()== 6 || system.getsysinfo()== 8)
- //表示是64位系统
- for(i=0;i<64-len;i++)
- string1= "0" & string1
- endfor
- max=64
- else
- //表示是32位系统
- for(i=0;i<32-len;i++)
- string1= "0" & string1
- endfor
- max=32
- endif
- //非操作
- for(i=0;i<max;i++)
- if(type.cint(str.strsub(string1,i,i+1))==0)
- ret=ret & "1"
- else
- ret=ret & "0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //两个数进行或操作
- //参数1:数值1
- //参数2:数值2
- function 或(int1,int2)
- ret
- string1=位操作.D2B(int1)
- string2=位操作.D2B(int2)
- len1=str.strleng(string1)
- len2=str.strleng(string2)
- maxlen
- //下面是补0操作
- if(len1>len2)
- maxlen=len1
- for(i=0;i<len1-len2;i++)
- string2= "0" & string2
- endfor
- endif
- if(len1<len2)
- maxlen=len2
- for(i=0;i<len2-len1;i++)
- string1= "0" & string1
- endfor
- endif
- if(len1==len2)
- maxlen=len2
- endif
- //或操作
- for(i=0;i<maxlen;i++)
- if(type.cint(str.strsub(string1,i,i+1))+type.cint(str.strsub(string2,i,i+1)) >=1)
- ret=ret &"1"
- else
- ret=ret &"0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //两个数进行与操作
- //参数1:数值1
- //参数2:数值2
- function 与(int1,int2)
- ret
- string1=位操作.D2B(int1)
- string2=位操作.D2B(int2)
- len1=str.strleng(string1)
- len2=str.strleng(string2)
- maxlen
- //下面是补0操作
- if(len1>len2)
- maxlen=len1
- for(i=0;i<len1-len2;i++)
- string2= "0" & string2
- endfor
- endif
- if(len1<len2)
- maxlen=len2
- for(i=0;i<len2-len1;i++)
- string1= "0" & string1
- endfor
- endif
- if(len1==len2)
- maxlen=len2
- endif
- //与操作
- for(i=0;i<maxlen;i++)
- if(type.cint(str.strsub(string1,i,i+1))+type.cint(str.strsub(string2,i,i+1)) == 2)
- ret=ret &"1"
- else
- ret=ret &"0"
- endif
- endfor
-
- return 位操作.B2D(ret)
- endfunction
- //1个数进行右位移
- //参数1:数值
- //参数2:右移的位数
- function 右移(int1,byte)
- string1=位操作.D2B(int1)
- len=str.strleng(string1)
- ret=str.strsub(string1,0,len-byte)
- 位操作.B2D(ret)
- endfunction
- //1个数进行左位移
- //参数1:数值
- //参数2:左移的位数
- function 左移(int1,byte)
- string1=位操作.D2B(int1)
- len=str.strleng(string1)
-
- for(i=0;i<byte;i++)
- string1= string1 & "0"
- endfor
- 位操作.B2D(string1)
- endfunction
- //三目运算
- //参数1:条件
- //参数2:条件为真的结果
- //参数3:条件为假的结果
- function 三目运算(条件1,结果真,结果假)
- if(条件1)
- return 结果真
- else
- return 结果假
- endif
- endfunction
- //将十进制数值转换成二进制
- //参数1:十进制数值
- function D2B(Dec)
- ret
- while(true)
- ret=Dec%2 & ret
- Dec=type.int(Dec/2)
- if(Dec==0)
- break
- endif
- endwhile
- return ret
- endfunction
- //将二进制数值转换成十进制
- //参数1:二进制字符串
- function B2D(Byte)
- ret
- for(i=0;i<str.strleng(Byte);i++)
- ret=ret * 2 + type.cint(str.strsub(Byte,i,i+1))
- endfor
- return ret
- endfunction
- endnamespace
- namespace 系统常量
- WM_CREATE=1//应用程序创建一个窗口
- WM_DESTROY=2//一个窗口被销毁
- WM_MOVE=3//移动一个窗口
- WM_SIZE=5//改变一个窗口的大小
- WM_ACTIVATE=6//一个窗口被激活或失去激活状态
- WM_SETFOCUS=7//获得焦点后
- WM_KILLFOCUS=8//失去焦点
- WM_ENABLE=10//改变enable状态
- WM_SETREDRAW=11//设置窗口是否能重画
- WM_SETTEXT=12//应用程序发送此消息来设置一个窗口的文本
- WM_GETTEXT=13//应用程序发送此消息来复制对应窗口的文本到缓冲区
- WM_GETTEXTLENGTH=14//得到与一个窗口有关的文本的长度(不包含空字符)
- WM_PAINT=15//要求一个窗口重画自己
- WM_CLOSE=16//当一个窗口或应用程序要关闭时发送一个信号
- WM_QUERYENDSESSION=17//当用户选择结束对话框或程序自己调用ExitWindows函数
- WM_QUIT=18//用来结束程序运行或当程序调用postquitmessage函数
- WM_QUERYOPEN=19//当用户窗口恢复以前的大小位置时,把此消息发送给某个图标
- WM_ERASEBKGND=20//当窗口背景必须被擦除时(例在窗口改变大小时)
- WM_SYSCOLORCHANGE=21//当系统颜色改变时,发送此消息给所有顶级窗口
- WM_ENDSESSION=22//当系统进程发出WM_QUERYENDSESSION消息后,此消息发送给应用程序,通知它对话是否结束
- WM_SYSTEMERROR=23//暂无说明
- WM_SHOWWINDOW=24//当隐藏或显示窗口是发送此消息给这个窗口
- WM_ACTIVATEAPP=28//发此消息给应用程序哪个窗口是激活的,哪个是非激活的
- WM_FONTCHANGE=29//当系统的字体资源库变化时发送此消息给所有顶级窗口
- WM_TIMECHANGE=30//当系统的时间变化时发送此消息给所有顶级窗口
- WM_CANCELMODE=31//发送此消息来取消某种正在进行的摸态(操作)
- WM_SETCURSOR=32//如果鼠标引起光标在某个窗口中移动且鼠标输入没有被捕获时,就发消息给某个窗口
- WM_MOUSEACTIVATE=33//当光标在某个非激活的窗口中而用户正按着鼠标的某个键发送此消息给当前窗口
- WM_CHILDACTIVATE=34//发送此消息给MDI子窗口当用户点击此窗口的标题栏,或当窗口被激活,移动,改变大小
- WM_QUEUESYNC=35//此消息由基于计算机的训练程序发送,通过WH_JOURNALPALYBACK的hook程序分离出用户输入消息
- WM_GETMINMAXINFO=36//此消息发送给窗口当它将要改变大小或位置
- WM_PAINTICON=38//发送给最小化窗口当它图标将要被重画
- WM_ICONERASEBKGND=39//此消息发送给某个最小化窗口,仅当它在画图标前它的背景必须被重画
- WM_NEXTDLGCTL=40//发送此消息给一个对话框程序去更改焦点位置
- WM_SPOOLERSTATUS=42//每当打印管理列队增加或减少一条作业时发出此消息
- WM_DRAWITEM=43//当button,combobox,listbox,menu的可视外观改变时发送此消息给这些空件的所有者
- WM_MEASUREITEM=44//当button,combobox,listbox,listviewcontrol,ormenuitem被创建时发送此消息给控件的所有者
- WM_DELETEITEM=45//当thelistbox或combobox被销毁或当某些项被删除通过LB_DELETESTRING,LB_RESETCONTENT,CB_DELETESTRING,orCB_RESETCONTENT消息
- WM_VKEYTOITEM=46//此消息有一个LBS_WANTKEYBOARDINPUT风格的发出给它的所有者来响应WM_KEYDOWN消息
- WM_CHARTOITEM=47//此消息由一个LBS_WANTKEYBOARDINPUT风格的列表框发送给他的所有者来响应WM_CHAR消息
- WM_SETFONT=48//当绘制文本时程序发送此消息得到控件要用的颜色
- WM_GETFONT=49//应用程序发送此消息得到当前控件绘制文本的字体
- WM_SETHOTKEY=50//应用程序发送此消息让一个窗口与一个热键相关连
- WM_GETHOTKEY=51//应用程序发送此消息来判断热键与某个窗口是否有关联
- WM_QUERYDRAGICON=55//此消息发送给最小化窗口,当此窗口将要被拖放而它的类中没有定义图标,应用程序能返回一个图标或光标的句柄,当用户拖放图标时系统显示这个图标或光标
- WM_COMPAREITEM=57//发送此消息来判定combobox或listbox新增加的项的相对位置
- WM_GETOBJECT=61//暂无说明
- WM_COMPACTING=65//显示内存已经很少了
- WM_WINDOWPOSCHANGING=70//发送此消息给那个窗口的大小和位置将要被改变时,来调用setwindowpos函数或其它窗口管理函数
- WM_WINDOWPOSCHANGED=71//发送此消息给那个窗口的大小和位置已经被改变时,来调用setwindowpos函数或其它窗口管理函数
- WM_POWER=0//(适用于16位的windows)当系统将要进入暂停状态时发送此消息
- WM_COPYDATA=74//当一个应用程序传递数据给另一个应用程序时发送此消息
- WM_CANCELJOURNAL=75//当某个用户取消程序日志激活状态,提交此消息给程序
- WM_NOTIFY=78//当某个控件的某个事件已经发生或这个控件需要得到一些信息时,发送此消息给它的父窗口
- WM_INPUTLANGCHANGEREQUEST=80//当用户选择某种输入语言,或输入语言的热键改变
- WM_INPUTLANGCHANGE=81//当平台现场已经被改变后发送此消息给受影响的最顶级窗口
- WM_TCARD=82//当程序已经初始化windows帮助例程时发送此消息给应用程序
- WM_HELP=83//此消息显示用户按下了F1,如果某个菜单是激活的,就发送此消息个此窗口关联的菜单,否则就发送给有焦点的窗口,如果当前都没有焦点,就把此消息发送给当前激活的窗口
- WM_USERCHANGED=84//当用户已经登入或退出后发送此消息给所有的窗口,当用户登入或退出时系统更新用户的具体设置信息,在用户更新设置时系统马上发送此消息
- WM_NOTIFYFORMAT=85//公用控件,自定义控件和他们的父窗口通过此消息来判断控件是使用ANSI还是UNICODE结构在WM_NOTIFY消息,使用此控件能使某个控件与它的父控件之间进行相互通信
- WM_CONTEXTMENU=123//当用户某个窗口中点击了一下右键就发送此消息给这个窗口
- WM_STYLECHANGING=124//当调用SETWINDOWLONG函数将要改变一个或多个窗口的风格时发送此消息给那个窗口
- WM_STYLECHANGED=125//当调用SETWINDOWLONG函数一个或多个窗口的风格后发送此消息给那个窗口
- WM_DISPLAYCHANGE=126//当显示器的分辨率改变后发送此消息给所有的窗口
- WM_GETICON=127//此消息发送给某个窗口来返回与某个窗口有关连的大图标或小图标的句柄
- WM_SETICON=128//程序发送此消息让一个新的大图标或小图标与某个窗口关联
- WM_NCCREATE=129//当某个窗口第一次被创建时,此消息在WM_CREATE消息发送前发送
- WM_NCDESTROY=130//此消息通知某个窗口,非客户区正在销毁
- WM_NCCALCSIZE=131//当某个窗口的客户区域必须被核算时发送此消息
- WM_NCHITTEST=132//移动鼠标,按住或释放鼠标时发生
- WM_NCPAINT=133//程序发送此消息给某个窗口当它(窗口)的框架必须被绘制时
- WM_NCACTIVATE=134//此消息发送给某个窗口仅当它的非客户区需要被改变来显示是激活还是非激活状态
- WM_GETDLGCODE=135//发送此消息给某个与对话框程序关联的控件,widdows控制方位键和TAB键使输入进入此控件通过响应WM_GETDLGCODE消息,应用程序可以把他当成一个特殊的输入控件并能处理它
- WM_NCMOUSEMOVE=160//当光标在一个窗口的非客户区内移动时发送此消息给这个窗口//非客户区为:窗体的标题栏及窗的边框体
- WM_NCLBUTTONDOWN=161//当光标在一个窗口的非客户区同时按下鼠标左键时提交此消息
- WM_NCLBUTTONUP=162//当用户释放鼠标左键同时光标某个窗口在非客户区十发送此消息
- WM_NCLBUTTONDBLCLK=163//当用户双击鼠标左键同时光标某个窗口在非客户区十发送此消息
- WM_NCRBUTTONDOWN=164//当用户按下鼠标右键同时光标又在窗口的非客户区时发送此消息
- WM_NCRBUTTONUP=165//当用户释放鼠标右键同时光标又在窗口的非客户区时发送此消息
- WM_NCRBUTTONDBLCLK=166//当用户双击鼠标右键同时光标某个窗口在非客户区十发送此消息
- WM_NCMBUTTONDOWN=167//当用户按下鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_NCMBUTTONUP=168//当用户释放鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_NCMBUTTONDBLCLK=169//当用户双击鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_KEYFIRST=256//暂无说明
- WM_KEYDOWN=256//按下一个键
- WM_KEYUP=257//释放一个键
- WM_CHAR=258//按下某键,并已发出WM_KEYDOWN、WM_KEYUP消息
- WM_DEADCHAR=259//当用translatemessage函数翻译WM_KEYUP消息时发送此消息给拥有焦点的窗口
- WM_SYSKEYDOWN=260//当用户按住ALT键同时按下其它键时提交此消息给拥有焦点的窗口
- WM_SYSKEYUP=261//当用户释放一个键同时ALT键还按着时提交此消息给拥有焦点的窗口
- WM_SYSCHAR=262//当WM_SYSKEYDOWN消息被TRANSLATEMESSAGE函数翻译后提交此消息给拥有焦点的窗口
- WM_SYSDEADCHAR=263//当WM_SYSKEYDOWN消息被TRANSLATEMESSAGE函数翻译后发送此消息给拥有焦点的窗口
- WM_KEYLAST=264//暂无说明
- WM_INITDIALOG=272//在一个对话框程序被显示前发送此消息给它,通常用此消息初始化控件和执行其它任务
- WM_COMMAND=273//当用户选择一条菜单命令项或当某个控件发送一条消息给它的父窗口,一个快捷键被翻译
- WM_SYSCOMMAND=274//当用户选择窗口菜单的一条命令或当用户选择最大化或最小化时那个窗口会收到此消息
- WM_TIMER=275//发生了定时器事件
- WM_HSCROLL=276//当一个窗口标准水平滚动条产生一个滚动事件时发送此消息给那个窗口,也发送给拥有它的控件
- WM_VSCROLL=277//当一个窗口标准垂直滚动条产生一个滚动事件时发送此消息给那个窗口也,发送给拥有它的控件
- WM_INITMENU=278//当一个菜单将要被激活时发送此消息,它发生在用户菜单条中的某项或按下某个菜单键,它允许程序在显示前更改菜单
- WM_INITMENUPOPUP=279//当一个下拉菜单或子菜单将要被激活时发送此消息,它允许程序在它显示前更改菜单,而不要改变全部
- WM_MENUSELECT=287//当用户选择一条菜单项时发送此消息给菜单的所有者(一般是窗口)
- WM_MENUCHAR=288//当菜单已被激活用户按下了某个键(不同于加速键),发送此消息给菜单的所有者
- WM_ENTERIDLE=289//当一个模态对话框或菜单进入空载状态时发送此消息给它的所有者,一个模态对话框或菜单进入空载状态就是在处理完一条或几条先前的消息后没有消息它的列队中等待
- WM_MENURBUTTONUP=290//暂无说明
- WM_MENUDRAG=291//暂无说明
- WM_MENUGETOBJECT=292//暂无说明
- WM_UNINITMENUPOPUP=293//暂无说明
- WM_MENUCOMMAND=294//暂无说明
- WM_CHANGEUISTATE=295//暂无说明
- WM_UPDATEUISTATE=296//暂无说明
- WM_QUERYUISTATE=297//暂无说明
- WM_CTLCOLORMSGBOX=306//在windows绘制消息框前发送此消息给消息框的所有者窗口,通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置消息框的文本和背景颜色
- WM_CTLCOLOREDIT=307//当一个编辑型控件将要被绘制时发送此消息给它的父窗口
- WM_CTLCOLORLISTBOX=308//当一个列表框控件将要被绘制前发送此消息给它的父窗口
- WM_CTLCOLORBTN=309//当一个按钮控件将要被绘制时发送此消息给它的父窗口
- WM_CTLCOLORDLG=310//当一个对话框控件将要被绘制前发送此消息给它的父窗口
- WM_CTLCOLORSCROLLBAR=311//当一个滚动条控件将要被绘制时发送此消息给它的父窗口
- WM_CTLCOLORSTATIC=312//当一个静态控件将要被绘制时发送此消息给它的父窗口
- WM_MOUSEFIRST=512//暂无说明
- WM_MOUSEMOVE=512//移动鼠标
- WM_LBUTTONDOWN=513//按下鼠标左键
- WM_LBUTTONUP=514//释放鼠标左键
- WM_LBUTTONDBLCLK=515//双击鼠标左键
- WM_RBUTTONDOWN=516//按下鼠标右键
- WM_RBUTTONUP=517//释放鼠标右键
- WM_RBUTTONDBLCLK=518//双击鼠标右键
- WM_MBUTTONDOWN=519//按下鼠标中键
- WM_MBUTTONUP=520//释放鼠标中键
- WM_MBUTTONDBLCLK=521//双击鼠标中键
- WM_MOUSEWHEEL=522//当鼠标轮子转动时发送此消息个当前有焦点的控件
- WM_MOUSELAST=522//暂无说明
- WM_PARENTNOTIFY=528//当MDI子窗口被创建或被销毁,或用户按了一下鼠标键而光标在子窗口上时发送此消息给它的父窗口
- WM_ENTERMENULOOP=529//发送此消息通知应用程序的主窗口that已经进入了菜单循环模式
- WM_EXITMENULOOP=530//发送此消息通知应用程序的主窗口that已退出了菜单循环模式
- WM_NEXTMENU=531//暂无说明
- WM_SIZING=532//当用户正在调整窗口大小时发送此消息给窗口
- WM_CAPTURECHANGED=533//发送此消息给窗口当它失去捕获的鼠标时
- WM_MOVING=534//当用户在移动窗口时发送此消息,通过此消息应用程序可以监视窗口大小和位置也可以修改他们
- WM_POWERBROADCAST=536//此消息发送给应用程序来通知它有关电源管理事件
- WM_DEVICECHANGE=537//当设备的硬件配置改变时发送此消息给应用程序或设备驱动程序
- WM_IME_STARTCOMPOSITION=269//暂无说明
- WM_IME_ENDCOMPOSITION=270//暂无说明
- WM_IME_COMPOSITION=271//暂无说明
- WM_IME_KEYLAST=271//暂无说明
- WM_IME_SETCONTEXT=641//暂无说明
- WM_IME_NOTIFY=642//暂无说明
- WM_IME_CONTROL=643//暂无说明
- WM_IME_COMPOSITIONFULL=644//暂无说明
- WM_IME_SELECT=645//暂无说明
- WM_IME_CHAR=646//暂无说明
- WM_IME_REQUEST=648//暂无说明
- WM_IME_KEYDOWN=656//暂无说明
- WM_IME_KEYUP=657//暂无说明
- WM_MDICREATE=544//应用程序发送此消息给多文档的客户窗口来创建一个MDI子窗口
- WM_MDIDESTROY=545//应用程序发送此消息给多文档的客户窗口来关闭一个MDI子窗口
- WM_MDIACTIVATE=546//应用程序发送此消息给多文档的客户窗口通知客户窗口激活另一个MDI子窗口,当客户窗口收到此消息后,它发出WM_MDIACTIVE消息给MDI子窗口(未激活)激活它
- WM_MDIRESTORE=547//程序发送此消息给MDI客户窗口让子窗口从最大最小化恢复到原来大小
- WM_MDINEXT=548//程序发送此消息给MDI客户窗口激活下一个或前一个窗口
- WM_MDIMAXIMIZE=549//程序发送此消息给MDI客户窗口来最大化一个MDI子窗口
- WM_MDITILE=550//程序发送此消息给MDI客户窗口以平铺方式重新排列所有MDI子窗口
- WM_MDICASCADE=551//程序发送此消息给MDI客户窗口以层叠方式重新排列所有MDI子窗口
- WM_MDIICONARRANGE=552//程序发送此消息给MDI客户窗口重新排列所有最小化的MDI子窗口
- WM_MDIGETACTIVE=553//程序发送此消息给MDI客户窗口来找到激活的子窗口的句柄
- WM_MDISETMENU=560//程序发送此消息给MDI客户窗口用MDI菜单代替子窗口的菜单
- WM_ENTERSIZEMOVE=561//暂无说明
- WM_EXITSIZEMOVE=562//暂无说明
- WM_DROPFILES=563//暂无说明
- WM_MDIREFRESHMENU=564//暂无说明
- WM_MOUSEHOVER=673//暂无说明
- WM_MOUSELEAVE=675//暂无说明
- WM_CUT=768//程序发送此消息给一个编辑框或combobox来删除当前选择的文本
- WM_COPY=769//程序发送此消息给一个编辑框或combobox来复制当前选择的文本到剪贴板
- WM_PASTE=770//程序发送此消息给editcontrol或combobox从剪贴板中得到数据
- WM_CLEAR=771//程序发送此消息给editcontrol或combobox清除当前选择的内容
- WM_UNDO=772//程序发送此消息给editcontrol或combobox撤消最后一次操作
- WM_RENDERFORMAT=773//暂无说明
- WM_RENDERALLFORMATS=774//暂无说明
- WM_DESTROYCLIPBOARD=775//当调用ENPTYCLIPBOARD函数时发送此消息给剪贴板的所有者
- WM_DRAWCLIPBOARD=776//当剪贴板的内容变化时发送此消息给剪贴板观察链的第一个窗口
- WM_PAINTCLIPBOARD=777//当剪贴板包含CF_OWNERDIPLAY格式的数据并且剪贴板观察窗口的客户区需要重画
- WM_VSCROLLCLIPBOARD=778//暂无说明
- WM_SIZECLIPBOARD=779//当剪贴板包含CF_OWNERDIPLAY格式的数据并且剪贴板观察窗口的客户区域的大小已经改变是此消息通过剪贴板观察窗口发送给剪贴板的所有者
- WM_ASKCBFORMATNAME=780//通过剪贴板观察窗口发送此消息给剪贴板的所有者来请求一个CF_OWNERDISPLAY格式的剪贴板的名字
- WM_CHANGECBCHAIN=781//当一个窗口从剪贴板观察链中移去时发送此消息给剪贴板观察链的第一个窗口
- WM_HSCROLLCLIPBOARD=782//此消息通过一个剪贴板观察窗口发送给剪贴板的所有者
- WM_QUERYNEWPALETTE=783//此消息发送给将要收到焦点的窗口,此消息能使窗口在收到焦点时同时有机会实现他的逻辑调色板
- WM_PALETTEISCHANGING=784//当一个应用程序正要实现它的逻辑调色板时发此消息通知所有的应用程序
- WM_PALETTECHANGED=785//此消息在一个拥有焦点的窗口实现它的逻辑调色板后发送此消息给所有顶级并重叠的窗口,以此来改变系统调色板
- WM_HOTKEY=786//当用户按下由REGISTERHOTKEY函数注册的热键时提交此消息
- WM_PRINT=791//应用程序发送此消息仅当WINDOWS或其它应用程序发出一个请求要求绘制一个应用程序的一部分
- WM_PRINTCLIENT=792//暂无说明
- WM_HANDHELDFIRST=856//暂无说明
- WM_HANDHELDLAST=863//暂无说明
- WM_PENWINFIRST=896//暂无说明
- WM_PENWINLAST=911//暂无说明
- WM_COALESCE_FIRST=912//暂无说明
- WM_COALESCE_LAST=927//暂无说明
- WM_DDE_FIRST=992//暂无说明
- WM_DDE_INITIATE=992//WM_DDE_FIRST+0,一个DDE客户程序提交此消息开始一个与服务器程序的会话来响应那个指定的程序和主题名
- WM_DDE_TERMINATE=993//WM_DDE_FIRST+1,一个DDE应用程序(无论是客户还是服务器)提交此消息来终止一个会话
- WM_DDE_ADVISE=994//WM_DDE_FIRST+2,一个DDE客户程序提交此消息给一个DDE服务程序来请求服务器每当数据项改变时更新它
- WM_DDE_UNADVISE=995//WM_DDE_FIRST+3,一个DDE客户程序通过此消息通知一个DDE服务程序不更新指定的项或一个特殊的剪贴板格式的项
- WM_DDE_ACK=996//WM_DDE_FIRST+4,此消息通知一个DDE(动态数据交换)程序已收到并正在处理WM_DDE_POKE,WM_DDE_EXECUTE,WM_DDE_DATA,WM_DDE_ADVISE,WM_DDE_UNADVISE,or WM_DDE_INITIAT消息
- WM_DDE_DATA=997//WM_DDE_FIRST+5,一个DDE服务程序提交此消息给DDE客户程序来传递个一数据项给客户或通知客户的一条可用数据项
- WM_DDE_REQUEST=998//WM_DDE_FIRST+6,一个DDE客户程序提交此消息给一个DDE服务程序来请求一个数据项的值
- WM_DDE_POKE=999//WM_DDE_FIRST+7,一个DDE客户程序提交此消息给一个DDE服务程序,客户使用此消息来请求服务器接收一个未经同意的数据项
- WM_DDE_EXECUTE=1000//WM_DDE_FIRST+8,一个DDE客户程序提交此消息给一个DDE服务程序来发送一个字符串给服务器让它象串行命令一样被处理,服务器通过提交WM_DDE_ACK消息来作回应
- WM_DDE_LAST=1000//WM_DDE_FIRST+8
- WM_APP=32768//暂无说明
- WM_USER=1024//此消息能帮助应用程序自定义私有消息
- WM_SETCURSOR=32//如果鼠标引起光标在某个窗口中移动且鼠标输入没有被捕获时,就发消息给某个窗口
- WM_MOUSEACTIVATE=33//当光标在某个非激活的窗口中而用户正按着鼠标的某个键发送此消息给当前窗口
- WM_SETHOTKEY=50//应用程序发送此消息让一个窗口与一个热键相关连
- WM_GETHOTKEY=51//应用程序发送此消息来判断热键与某个窗口是否有关联
- WM_INPUTLANGCHANGEREQUEST=80//当用户选择某种输入语言,或输入语言的热键改变
- WM_CONTEXTMENU=123//当用户某个窗口中点击了一下右键就发送此消息给这个窗口
- WM_NCHITTEST=132//移动鼠标,按住或释放鼠标时发生
- WM_GETDLGCODE=135//发送此消息给某个与对话框程序关联的控件,widdows控制方位键和TAB键使输入进入此控件通过响应WM_GETDLGCODE消息,应用程序可以把他当成一个特殊的输入控件并能处理它
- WM_NCLBUTTONDOWN=161//当光标在一个窗口的非客户区同时按下鼠标左键时提交此消息
- WM_NCLBUTTONUP=162//当用户释放鼠标左键同时光标某个窗口在非客户区十发送此消息
- WM_NCLBUTTONDBLCLK=163//当用户双击鼠标左键同时光标某个窗口在非客户区十发送此消息
- WM_NCRBUTTONDOWN=164//当用户按下鼠标右键同时光标又在窗口的非客户区时发送此消息
- WM_NCRBUTTONUP=165//当用户释放鼠标右键同时光标又在窗口的非客户区时发送此消息
- WM_NCRBUTTONDBLCLK=166//当用户双击鼠标右键同时光标某个窗口在非客户区十发送此消息
- WM_NCMBUTTONDOWN=167//当用户按下鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_NCMBUTTONUP=168//当用户释放鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_NCMBUTTONDBLCLK=169//当用户双击鼠标中键同时光标又在窗口的非客户区时发送此消息
- WM_KEYDOWN=256//按下一个键
- WM_KEYUP=257//释放一个键
- WM_CHAR=258//按下某键,并已发出WM_KEYDOWN、WM_KEYUP消息
- WM_SYSKEYDOWN=260//当用户按住ALT键同时按下其它键时提交此消息给拥有焦点的窗口
- WM_SYSKEYUP=261//当用户释放一个键同时ALT键还按着时提交此消息给拥有焦点的窗口
- WM_COMMAND=273//当用户选择一条菜单命令项或当某个控件发送一条消息给它的父窗口,一个快捷键被翻译
- WM_INITMENU=278//当一个菜单将要被激活时发送此消息,它发生在用户菜单条中的某项或按下某个菜单键,它允许程序在显示前更改菜单
- WM_MENUCHAR=288//当菜单已被激活用户按下了某个键(不同于加速键),发送此消息给菜单的所有者
- WM_MOUSEMOVE=512//移动鼠标
- WM_LBUTTONDOWN=513//按下鼠标左键
- WM_LBUTTONUP=514//释放鼠标左键
- WM_LBUTTONDBLCLK=515//双击鼠标左键
- WM_RBUTTONDOWN=516//按下鼠标右键
- WM_RBUTTONUP=517//释放鼠标右键
- WM_RBUTTONDBLCLK=518//双击鼠标右键
- WM_MBUTTONDOWN=519//按下鼠标中键
- WM_MBUTTONUP=520//释放鼠标中键
- WM_MBUTTONDBLCLK=521//双击鼠标中键
- WM_MOUSEWHEEL=522//当鼠标轮子转动时发送此消息个当前有焦点的控件
- WM_PARENTNOTIFY=528//当MDI子窗口被创建或被销毁,或用户按了一下鼠标键而光标在子窗口上时发送此消息给它的父窗口
- WM_CAPTURECHANGED=533//发送此消息给窗口当它失去捕获的鼠标时
- WM_HOTKEY=786//当用户按下由REGISTERHOTKEY函数注册的热键时提交此消息
- LVM_GETHOTCURSOR=4159//如果激活了热点跟随踪,当鼠标在某个项目上时,返回其句柄
- LVM_GETHOTITEM=4157//取鼠标指针指向项目的索引
- LVM_GETHOVERTIME=4168//暂无说明取鼠标在项目上停留的时间?
- LVM_SETHOTITEM=4156//置鼠标指针指向项目的索引暂无说明
- LVS_NOSORTHEADER=32768//列头显示为平面,不响应鼠标点击(详细资料模式)
- BN_CLICKED=0//用户单击了按钮
- BN_DBLCLK=5//BN_DOUBLECLICKED用户双击了按钮
- BN_DISABLE=4//按钮被禁止
- BN_DOUBLECLICKED=5//用户双击了按钮
- BN_HILITE=2//用户加亮了按钮
- BN_KILLFOCUS=7//暂无说明
- BN_PAINT=1//按钮应当重画
- BN_PUSHED=2//BN_HILITE用户加亮了按钮
- BN_SETFOCUS=6//暂无说明
- BN_UNHILITE=3//加亮应当去掉
- BN_UNPUSHED=3//BN_UNHILITE加亮应当去掉
- CBN_CLOSEUP=8//组合框的列表框被关闭
- CBN_DBLCLK=2//用户双击了一个字符串
- CBN_DROPDOWN=7//组合框的列表框被拉出
- CBN_EDITCHANGE=5//用户修改了编辑框中的文本
- CBN_EDITUPDATE=6//编辑框内的文本即将更新
- CBN_ERRSPACE=-1//组合框内存不足
- CBN_KILLFOCUS=4//组合框失去输入焦点
- CBN_SELCHANGE=1//组合框中选择了一项
- CBN_SELENDCANCEL=10//用户的选择应当被取消
- CBN_SELENDOK=9//用户的选择是合法的
- CBN_SETFOCUS=3//组合框获得输入焦点
- LBN_DBLCLK=2//用户双击了一项
- LBN_ERRSPACE=2//列表框内存不够
- LBN_KILLFOCUS=5//列表框正在失去输入焦点
- LBN_SELCANCEL=3//选择被取消
- LBN_SELCHANGE=1//选择了另一项
- LBN_SETFOCUS=4//列表框获得输入焦点
- EN_CHANGE=768//编辑框中的文本己更新
- EN_CORRECTTEXT=1797//暂无说明
- EN_DROPFILES=1795//暂无说明
- EN_ERRSPACE=1280//编辑框内存不足
- EN_HSCROLL=1537//用户点击了水平滚动条
- EN_IMECHANGE=1799//暂无说明
- EN_KILLFOCUS=512//编辑框正在失去输入焦点
- EN_MAXTEXT=1281//插入的内容被截断
- EN_MSGFILTER=1792//暂无说明
- EN_OLEOPFAILED=1801//暂无说明
- EN_PROTECTED=1796//暂无说明
- EN_REQUESTRESIZE=1793//暂无说明
- EN_SAVECLIPBOARD=1800//暂无说明
- EN_SELCHANGE=1794//暂无说明
- EN_SETFOCUS=256//编辑框获得输入焦点
- EN_STOPNOUNDO=1798//暂无说明
- EN_UPDATE=1024//编辑框中的文本将要更新
- EN_VSCROLL=1538//用户点击了垂直滚动条消息含义
- EM_AUTOURLDETECT=1115//暂无说明
- EM_CANPASTE=1074//暂无说明
- EM_CANREDO=1109//暂无说明
- EM_CANUNDO=198//暂无说明
- EM_CHARFROMPOS=215//暂无说明
- EM_CONVPOSITION=1132//暂无说明
- EM_DISPLAYBAND=1075//暂无说明
- EM_EMPTYUNDOBUFFER=205//暂无说明
- EM_EXGETSEL=1076//暂无说明
- EM_EXLIMITTEXT=1077//暂无说明
- EM_EXLINEFROMCHAR=1078//暂无说明
- EM_EXSETSEL=1079//暂无说明
- EM_FINDTEXT=1080//暂无说明
- EM_FINDTEXTEX=1103//暂无说明
- EM_FINDTEXTEXW=1148//暂无说明
- EM_FINDTEXTW=1147//暂无说明
- EM_FINDWORDBREAK=1100//暂无说明
- EM_FMTLINES=200//暂无说明
- EM_FORMATRANGE=1081//暂无说明
- EM_GETAUTOURLDETECT=1116//暂无说明
- EM_GETBIDIOPTIONS=1225//暂无说明
- EM_GETCHARFORMAT=1082//暂无说明
- EM_GETEDITSTYLE=1229//暂无说明
- EM_GETEVENTMASK=1083//暂无说明
- EM_GETFIRSTVISIBLELINE=206//暂无说明
- EM_GETHANDLE=189//暂无说明
- EM_GETIMECOLOR=1129//暂无说明
- EM_GETIMECOMPMODE=1146//暂无说明
- EM_GETIMEMODEBIAS=1151//暂无说明
- EM_GETIMEOPTIONS=1131//暂无说明
- EM_GETIMESTATUS=217//暂无说明
- EM_GETLANGOPTIONS=1145//暂无说明
- EM_GETLIMITTEXT=213//暂无说明
- EM_GETLINE=196//暂无说明
- EM_GETLINECOUNT=186//暂无说明
- EM_GETMARGINS=212//暂无说明
- EM_GETMODIFY=184//暂无说明
- EM_GETOLEINTERFACE=1084//暂无说明
- EM_GETOPTIONS=1102//暂无说明
- EM_GETPARAFORMAT=1085//暂无说明
- EM_GETPASSWORDCHAR=210//暂无说明
- EM_GETPUNCTUATION=1125//暂无说明
- EM_GETRECT=178//暂无说明
- EM_GETREDONAME=1111//暂无说明
- EM_GETSCROLLPOS=1245//暂无说明
- EM_GETSEL=176//暂无说明
- EM_GETSELTEXT=1086//暂无说明
- EM_GETTEXTEX=1118//暂无说明
- EM_GETTEXTLENGTHEX=1119//暂无说明
- EM_GETTEXTMODE=1114//暂无说明
- EM_GETTEXTRANGE=1099//暂无说明
- EM_GETTHUMB=190//暂无说明
- EM_GETTYPOGRAPHYOPTIONS=1227//暂无说明
- EM_GETUNDONAME=1110//暂无说明
- EM_GETWORDBREAKPROC=209//暂无说明
- EM_GETWORDBREAKPROCEX=1104//暂无说明
- EM_GETWORDWRAPMODE=1127//暂无说明
- EM_GETZOOM=1248//暂无说明
- EM_HIDESELECTION=1087//暂无说明
- EM_LIMITTEXT=197//暂无说明
- EM_LINEFROMCHAR=201//暂无说明
- EM_LINEINDEX=187//暂无说明
- EM_LINELENGTH=193//暂无说明
- EM_LINESCROLL=182//暂无说明
- EM_OUTLINE=1244//暂无说明
- EM_PASTESPECIAL=1088//暂无说明
- EM_POSFROMCHAR=214//暂无说明
- EM_RECONVERSION=1149//暂无说明
- EM_REDO=1108//暂无说明
- EM_REPLACESEL=194//暂无说明
- EM_REQUESTRESIZE=1089//暂无说明
- EM_SCROLL=181//暂无说明
- EM_SCROLLCARET=183//暂无说明
- EM_SELECTIONTYPE=1090//暂无说明
- EM_SETBIDIOPTIONS=1224//暂无说明
- EM_SETBKGNDCOLOR=1091//暂无说明
- EM_SETCHARFORMAT=1092//暂无说明
- EM_SETEDITSTYLE=1228//暂无说明
- EM_SETEVENTMASK=1093//暂无说明
- EM_SETFONTSIZE=1247//暂无说明
- EM_SETHANDLE=188//暂无说明
- EM_SETIMECOLOR=1128//暂无说明
- EM_SETIMEMODEBIAS=1150//暂无说明
- EM_SETIMEOPTIONS=1130//暂无说明
- EM_SETIMESTATUS=216//暂无说明
- EM_SETLANGOPTIONS=1144//暂无说明
- EM_SETLIMITTEXT=197//EM_LIMITTEXT
- EM_SETMARGINS=211//暂无说明
- EM_SETMODIFY=185//暂无说明
- EM_SETOLECALLBACK=1094//暂无说明
- EM_SETOPTIONS=1101//暂无说明
- EM_SETPALETTE=1117//暂无说明
- EM_SETPARAFORMAT=1095//暂无说明
- EM_SETPASSWORDCHAR=204//暂无说明
- EM_SETPUNCTUATION=1124//暂无说明
- EM_SETREADONLY=207//暂无说明
- EM_SETRECT=179//暂无说明
- EM_SETRECTNP=180//暂无说明
- EM_SETSCROLLPOS=1246//暂无说明
- EM_SETSEL=177//暂无说明
- EM_SETTABSTOPS=203//暂无说明
- EM_SETTARGETDEVICE=1096//暂无说明
- EM_SETTEXTEX=1121//暂无说明
- EM_SETTEXTMODE=1113//暂无说明
- EM_SETTYPOGRAPHYOPTIONS=1226//暂无说明
- EM_SETUNDOLIMIT=1106//暂无说明
- EM_SETWORDBREAKPROC=208//暂无说明
- EM_SETWORDBREAKPROCEX=1105//暂无说明
- EM_SETWORDWRAPMODE=1126//暂无说明
- EM_SETZOOM=1249//暂无说明
- EM_SHOWSCROLLBAR=1120//暂无说明
- EM_STOPGROUPTYPING=1112//暂无说明
- EM_STREAMIN=1097//暂无说明
- EM_STREAMOUT=1098//暂无说明
- EM_UNDO=199//暂无说明
- CBN_CLOSEUP=8//组合框的列表框被关闭
- CBN_DBLCLK=2//用户双击了一个字符串
- CBN_DROPDOWN=7//组合框的列表框被拉出
- CBN_EDITCHANGE=5//用户修改了编辑框中的文本
- CBN_EDITUPDATE=6//编辑框内的文本即将更新
- CBN_ERRSPACE=-1//组合框内存不足
- CBN_KILLFOCUS=4//组合框失去输入焦点
- CBN_SELCHANGE=1//组合框中选择了一项
- CBN_SELENDCANCEL=10//用户的选择应当被取消
- CBN_SELENDOK=9//用户的选择是合法的
- CBN_SETFOCUS=3//组合框获得输入焦点
- LBN_DBLCLK=2//用户双击了一项
- LBN_ERRSPACE=-2//列表框内存不够
- LBN_KILLFOCUS=5//列表框正在失去输入焦点
- LBN_SELCANCEL=3//选择被取消
- LBN_SELCHANGE=1//选择了另一项
- LBN_SETFOCUS=4//列表框获得输入焦点
- TVM_CREATEDRAGIMAGE=4370//创建RAG图象
- TVM_DELETEITEM=4353//删除项目
- TVM_EDITLABELA=4366//编辑标签A
- TVM_ENDEDITLABELNOW=4374//结束编辑新标签
- TVM_ENSUREVISIBLE=4372//保证显示
- TVM_EXPAND=4354//扩展
- TVM_GETBKCOLOR=4383//取背景颜色
- TVM_GETCOUNT=4357//取数量
- TVM_GETEDITCONTROL=4367//取编辑控制器
- TVM_GETIMAGELIST=4360//取列表图片,返回图象的句柄
- TVM_GETINDENT=4358//取缩进?
- TVM_GETINSERTMARKCOLOR=4390//取插入标志色
- TVM_GETISEARCHSTRINGA=4375//取搜索文本A
- TVM_GETITEMA=4364//取项目A,要用结构
- TVM_GETITEMHEIGHT=4380//取项目的距离(行距)
- TVM_GETITEMRECT=4356//暂无说明
- TVM_GETITEMSTATE=4391//取项目状态
- TVM_GETLINECOLOR=4393//取连线颜色
- TVM_GETNEXTITEM=4362//取下一项目?
- TVM_GETSCROLLTIME=4386//取卷项目?
- TVM_GETTEXTCOLOR=4384//取文本颜色
- TVM_GETTOOLTIPS=4377//取工具提示
- TVM_GETVISIBLECOUNT=4368//取可视数量
- TVM_GETUNICODEFORMAT=8198//取UNICODE格式
- TVM_HITTEST=4369//点击
- TVM_INSERTITEMA=4352//插入项目A
- TVM_MAPACCIDTOHTREEITEM=4394//暂无说明
- TVM_MAPHTREEITEMTOACCID=4395//暂无说明
- TVM_SELECTITEM=4363//选择项目
- TVM_SETBKCOLOR=4381//置背景色
- TVM_SETIMAGELIST=4361//设置图象列表
- TVM_SETINDENT=4359//设置缩进
- TVM_SETINSERTMARK=4378//设置插入标志
- TVM_SETINSERTMARKCOLOR=4389//置插入标志色
- TVM_SETITEMA=4365//设置项目A
- TVM_SETITEMHEIGHT=4379//置项目的距离(行距)
- TVM_SETLINECOLOR=4392//置连线颜色
- TVM_SETSCROLLTIME=4385//设置滚动条跳跃时的数量
- TVM_SETTEXTCOLOR=4382//设置文本颜色
- TVM_SETTOOLTIPS=4376//设置工具提示
- TVM_SETUNICODEFORMAT=8197//设置UNICODE格式
- TVM_SORTCHILDREN=4371//分类—子
- TVM_SORTCHILDRENCB=4373//分类—子—CB
- TVM_EDITLABELW=4417//编辑标签W
- TVM_GETISEARCHSTRINGW=4416//取搜索文本W
- TVM_GETITEMW=4414//取项目M,要用结构?
- TVM_INSERTITEMW=4402//插入项目W
- TVM_SETITEMW=4415//设置项目W
- TVGN_CARET=9//当前的项目
- TVGN_CHILD=4//第一个子项目
- TVGN_DROPHILITE=8//拖放的项目
- TVGN_FIRSTVISIBLE=5//第一个可视的
- TVGN_LASTVISIBLE=10//最后可视的
- TVGN_NEXT=1//下一条
- TVGN_NEXTVISIBLE=6//下一条可视的
- TVGN_PARENT=3//父
- TVGN_PREVIOUS=2//返回上一级
- TVGN_PREVIOUSVISIBLE=7//返回上一级可视的
- TVGN_ROOT=0//根
- TVIF_CHILDREN=64//是否有子
- TVIF_DI_SETITEM=4096//置项目
- TVIF_HANDLE=16//句柄
- TVIF_IMAGE=2//图象
- TVIF_INTEGRAL=128//项目的画面高度。 这一个画面高度在标准项目画面高度的增量。
- TVIF_PARAM=4//项目数值
- TVIF_SELECTEDIMAGE=32//选择图象
- TVIF_STATE=8//状态
- TVIF_TEXT=1//文本
- TVIF_ALL=39//全部,文本+图象+选择图象+项目数值 1+2+4+32=39
- TVIS_BOLD=16//加粗
- TVIS_CUT=4//暂无说明
- TVIS_DROPHILITED=8//拖放目标
- TVIS_EXPANDED=32//扩展
- TVIS_EXPANDEDONCE=64//曾经扩展过一次
- TVIS_EXPANDPARTIAL=128//对项目部份扩展
- TVIS_OVERLAYMASK=3840//暂无说明
- TVIS_STATEIMAGEMASK=61440//暂无说明
- TVIS_SELECTED=2//选择
- TVIS_SELECTEDA=8192//选中
- TVIS_NOSELECTEDA=4096//没有选中
- TVI_FIRST=4294901761//在列表首部加入
- TVI_LAST=4294901762//在列表尾部插入
- TVI_ROOT=4294901760//在根部插入
- TVI_SORT=4294901763//插入项目时按字母顺序排列
- TVS_HASBUTTONS=1//使用加减框
- TVS_HASLINES=2//使用连线
- TVS_LINESATROOT=4//使用根部线
- TVS_EDITLABELS=8//允许编辑
- TVS_DISABLEDRAGDROP=16//禁止拖动
- TVS_SHOWSELALWAYS=32//始终显示选择项
- TVS_RTLREADING=64//右对齐?
- TVS_NOTOOLTIPS=128//不使用工具提示
- TVS_CHECKBOXES=256//使用复选框
- TVS_TRACKSELECT=512//使用热点跟踪
- TVS_SINGLEEXPAND=1024//单击打开树
- TVS_INFOTIP=2048//支持发送 TVN_GETINFOTIP 消息获得提示标签信息
- TVS_FULLROWSELECT=4096//整行选择,此风格不能与TVS_HASLINES同时使用
- TVS_NOSCROLL=8192//不使用滚动条
- TVS_NONEVENHEIGHT=16384//和 TVM_SETITEMHEIGHT 消息共同预设一个项目的高度
- //TVS_NOHSCROLL=32768//禁止水平滚动条
- LVM_APPROXIMATEVIEWRECT=4160//计算显示一个项目所需的宽度和高度
- LVM_ARRANGE=4118//在图像显示时排列项目
- LVM_CREATEDRAGIMAGE=4129//为指定的项目产生一个拖曳图像列表。
- LVM_CANCELEDITLABEL=0//[暂无消息值]取消一个项目文本编辑运算
- LVM_DELETEALLITEMS=4105//清空
- LVM_DELETECOLUMN=4124//删除一列
- LVM_DELETEITEM=4104//删除一行
- LVM_EDITLABELA=4119//编辑指定位置
- LVM_ENABLEGROUPVIEW=4253//显示或禁止显示项目
- LVM_ENSUREVISIBLE=4115//保证显示,并决定一个项目的全部或部份,是否可视
- LVM_FINDITEMA=4109//寻找项目
- LVM_GETBKCOLOR=4096//取背景颜色
- LVM_GETBKIMAGEA=4165//取背景图片
- LVM_GETCALLBACKMASK=4106//取回调掩码
- LVM_GETCOLUMNA=4121//取一个列的属性
- LVM_GETCOLUMNORDERARRAY=4155//返回当前列中的左右对齐方式
- LVM_GETCOLUMNWIDTH=4125//取指定列宽度
- LVM_GETCOUNTPERPAGE=4136//取当前列表框中可视的项目数量
- LVM_GETEDITCONTROL=4120//当列表框在进行编辑时,返回这引编辑框的句柄
- LVM_GETEXTENDEDLISTVIEWSTYLE=4151//取当前扩展风格
- LVM_GETGROUPINFO=4245//取块的信息
- LVM_GETGROUPMETRICS=4252//取块的规格
- LVM_GETHEADER=4127//取列表框标题的句柄
- LVM_GETHOTCURSOR=4159//如果激活了热点跟随踪,当鼠标在某个项目上时,返回其句柄
- LVM_GETHOTITEM=4157//取鼠标指针指向项目的索引
- LVM_GETHOVERTIME=4168//暂无说明取鼠标在项目上停留的时间?
- LVM_GETIMAGELIST=4098//取图片列表句柄
- LVM_GETINSERTMARK=4263//取插入掩码
- LVM_GETINSERTMARKCOLOR=4267//取插入掩码颜色
- LVM_GETINSERTMARKRECT=4265//取插入掩码的矩形范围
- LVM_GETISEARCHSTRINGA=4148//暂无说明
- LVM_GETITEMA=4101//取项目
- LVM_GETITEMCOUNT=4100//取项目总数
- LVM_GETITEMPOSITION=4112//取指定项目的显示坐标
- LVM_GETITEMRECT=4110//取指定项目的矩形范围
- LVM_GETITEMSPACING=4147//取项目之间的间隔距离
- LVM_GETITEMSTATE=4140//取项目的状态
- LVM_GETITEMTEXTA=4141//取项目正文
- LVM_GETNEXTITEM=4108//取下一项目
- LVM_GETNUMBEROFWORKAREAS=4169//取当前列表框工作区中的项目数量
- LVM_GETORIGIN=4137//暂无说明
- LVM_GETOUTLINECOLOR=4272//取列表框边框颜色
- LVM_GETSELECTEDCOLUMN=4270//取选择列
- LVM_GETSELECTEDCOUNT=4146//取被选择项目数
- LVM_GETSELECTIONMARK=4162//取现行选择项目
- LVM_GETSTRINGWIDTHA=4113//取显示一个文本所需要的列宽度
- LVM_GETSUBITEMRECT=4152//取子项目的矩形范围
- LVM_GETTEXTBKCOLOR=4133//取正文背景色
- LVM_GETTEXTCOLOR=4131//取正文颜色
- LVM_GETTILEINFO=4261//暂无说明
- LVM_GETTILEVIEWINFO=4259//暂无说明
- LVM_GETTOOLTIPS=4174//取工具提示
- LVM_GETTOPINDEX=4135//取在可视范围中第一个项目的索引
- LVM_GETUNICODEFORMAT=8198//取UNICODE格式
- LVM_GETVIEW=4239//取超级列表框当前的类型
- LVM_GETVIEWRECT=4130//取当前所有项目所占用的矩形范围
- LVM_GETWORKAREAS=4166//取工作区的矩形范围
- LVM_HASGROUP=4257//查询群组是否在使用
- LVM_HITTEST=4114//暂无说明
- LVM_INSERTCOLUMNA=4123//插入列
- LVM_INSERTGROUP=4241//插入块
- LVM_INSERTGROUPSORTED=4255//插入块种类
- LVM_INSERTITEMA=4103//插入项目
- LVM_INSERTMARKHITTEST=4264//暂无说明
- LVM_ISGROUPVIEWENABLED=4271//块检视是否激活
- LVM_MOVEGROUP=4247//块移动
- LVM_MOVEITEMTOGROUP=4250//移动项目到块
- LVM_REDRAWITEMS=4117//重画项目
- LVM_REMOVEALLGROUPS=4256//移动全部块
- LVM_REMOVEGROUP=4246//移动块
- LVM_SCROLL=4116//移动滚动条
- LVM_SETBKCOLOR=4097//设置背景色
- LVM_SETBKIMAGEA=4164//设置背景图片
- LVM_SETCALLBACKMASK=4107//设置回调掩码
- LVM_SETCOLUMNA=4122//设置列的属性
- LVM_SETCOLUMNORDERARRAY=4154//设置列显示的排序
- LVM_SETCOLUMNWIDTH=4126//设置列宽
- LVM_SETEXTENDEDLISTVIEWSTYLE=4150//设置扩展风格
- LVM_SETGROUPINFO=4243//设置块信息
- LVM_SETGROUPMETRICS=4251//暂无说明
- LVM_SETHOTCURSOR=4158//暂无说明
- LVM_SETHOTITEM=4156//置鼠标指针指向项目的索引暂无说明
- LVM_SETHOVERTIME=4167//暂无说明
- LVM_SETICONSPACING=4149//置图标间隔
- LVM_SETIMAGELIST=4099//置图片列表
- LVM_SETINFOTIP=4269//置信息提示
- LVM_SETINSERTMARK=4262//置插入掩码
- LVM_SETINSERTMARKCOLOR=4266//置插入掩码颜色
- LVM_SETITEMA=4102//置项目
- LVM_SETITEMCOUNT=4143//虚拟一个列表项目总数
- LVM_SETITEMPOSITION=4111//置项目位置
- LVM_SETITEMPOSITION32=4145//置项目位置32
- LVM_SETITEMSTATE=4139//置项目状态
- LVM_SETITEMTEXTA=4142//置项目正文
- LVM_SETOUTLINECOLOR=4273//置列表框边框颜色
- LVM_SETSELECTEDCOLUMN=4236//暂无说明
- LVM_SETSELECTIONMARK=4163//置选择标志
- LVM_SETTEXTBKCOLOR=4134//置正文背景色
- LVM_SETTEXTCOLOR=4132//置文本颜色
- LVM_SETTILEINFO=4260//暂无说明
- LVM_SETTILEVIEWINFO=4258//暂无说明
- LVM_SETTILEWIDTH=4237//暂无说明
- LVM_SETTOOLTIPS=4170//置工具条
- LVM_SETUNICODEFORMAT=8197//置UNICODE格式
- LVM_SETVIEW=4238//置列表框类型。
- LVM_SETWORKAREAS=4161//置工作区
- LVM_SORTGROUPS=4254//群(块)分类
- LVM_SORTITEMS=4144//项目分类
- LVM_SORTITEMSEX=4177//项目分类扩展
- LVM_SUBITEMHITTEST=4153//暂无说明
- LVM_UPDATE=4138//刷新列表框
- LVM_EDITLABELW=4214//宽字符方式编辑指定位置,易语言不能用
- LVM_FINDITEMW=4179//宽字符方式寻找项目,易语言不能用
- LVM_GETBKIMAGEW=4235//宽字符方式取背景图片,易语言不能用
- LVM_GETCOLUMNW=4191//宽字符方式取一个列的属性,易语言不能用
- LVM_GETISEARCHSTRINGW=4213//暂无说明
- LVM_GETITEMTEXTW=4211//宽字符方式取项目正文,易语言不能用
- LVM_GETITEMW=4171//宽字符方式取项目,易语言不能用
- LVM_GETSTRINGWIDTHW=4183//宽字符方式取显示一个文本所需要的列宽度,易语言不能用
- LVM_INSERTCOLUMNW=4193//宽字符方式插入列,易语言不能用
- LVM_INSERTITEMW=4173//宽字符方式插入项目,易语言不能用
- LVM_SETBKIMAGEW=4234//宽字符方式设置背景图片,易语言不能用
- LVM_SETCOLUMNW=4192//宽字符方式设置设置列,易语言不能用
- LVM_SETITEMW=4172//宽字符方式置项目,易语言不能用
- LVM_SETITEMTEXTW=4212//宽字符方式置项目正文,易语言不能用
- LVIF_COLUMNS=512//暂无说明
- LVIF_DI_SETITEM=4096//暂无说明
- LVIF_GROUPID=256//暂无说明
- LVIF_IMAGE=2//暂无说明
- LVIF_INDENT=16//暂无说明
- LVIF_NORECOMPUTE=2048//暂无说明
- LVIF_PARAM=4//暂无说明
- LVIF_STATE=8//暂无说明
- LVIF_TEXT=1//暂无说明
- LVIS_ACTIVATING=32//现在不支持了
- LVIS_CUT=4//做了剪切标记
- LVIS_DROPHILITED=8//是一个拖放对象
- LVIS_FOCUSED=1//拥有焦点
- LVIS_GLOW=16//暂无说明
- LVIS_OVERLAYMASK=3840//使用这个掩码取图象索引
- LVIS_SELECTED=2//项目被选择
- LVIS_STATEIMAGEMASK=-4096//暂无说明
- LVFI_NEARESTXY=64//暂无说明
- LVFI_PARAM=1//使用查找项目数值
- LVFI_PARTIAL=8//检查项目标题是否从被指向的位置开始,使用这个参数就自动使用了LVFI_STRING
- LVFI_STRING=2//使用查找标题
- LVFI_WRAP=32//如果没有发现,就从头开始
- LVCF_FMT=1//FMT 为有效
- LVCF_WIDTH=2//宽度有效
- LVCF_TEXT=4//文字有效
- LVCF_SUBITEM=8//子项有效
- LVCF_IMAGE=16//图片有效
- LVCFMT_LEFT=0//文字左对齐
- LVCFMT_RIGHT=1//文字右对齐
- LVCFMT_CENTER=2//文字中对齐
- LVCFMT_JUSTIFYMASK=3//暂无说明
- LVCFMT_IMAGE=2048//暂无说明
- LVCFMT_BITMAP_ON_RIGHT=4096//暂无说明
- LVCFMT_COL_HAS_IMAGES=-32768//暂无说明
- HDM_FIRST=4608//暂无说明
- HDM_CLEARFILTER=4632//清空过滤器
- HDM_CREATEDRAGIMAGE=4624//暂无说明
- HDM_DELETEITEM=4610//删除列项目
- HDM_EDITFILTER=4631//编辑过滤器
- HDM_GETBITMAPMARGIN=4629//取图标与旁边的空白距离
- HDM_GETIMAGELIST=4617//取列图标列表
- HDM_GETITEMA=4611//取列项目
- HDM_GETITEMCOUNT=4608//取列项目数
- HDM_GETITEMRECT=4615//取项目矩形范围
- HDM_GETORDERARRAY=4625//取列的左右对齐方式
- HDM_GETUNICODEFORMAT=8198//取列UNICODE格式
- HDM_HITTEST=4614//暂无说明
- HDM_INSERTITEMA=4609//插入列项目
- HDM_LAYOUT=4613//暂无说明
- HDM_ORDERTOINDEX=4623//暂无说明
- HDM_SETBITMAPMARGIN=4628//暂无说明
- HDM_SETFILTERCHANGETIMEOUT=4630//暂无说明
- HDM_SETHOTDIVIDER=4627//暂无说明
- HDM_SETIMAGELIST=4616//暂无说明
- HDM_SETITEMA=4612//置列项目
- HDM_SETORDERARRAY=4626//暂无说明
- HDM_SETUNICODEFORMAT=8197//置列UNICODE格式
- HDM_GETITEMW=4619//暂无说明
- HDM_INSERTITEMW=4618//暂无说明
- HDM_SETITEMW=4620//暂无说明
- LV_VIEW_ICON=0//大图标列表
- LV_VIEW_DETAILS=1//报表列表框
- LV_VIEW_SMALLICON=2//小图标列表
- LV_VIEW_LIST=3//普通列表框
- LV_VIEW_MAX=4//暂无说明
- LVBKIF_FLAG_TILEOFFSET=256//指定起始坐标,只用先指定了LVBKIF_STYLE_TILE样式,才能有效
- LVBKIF_SOURCE_HBITMAP=1//使用图片的句柄
- LVBKIF_SOURCE_MASK=3//暂无说明
- LVBKIF_SOURCE_NONE=0//不使用背景图片
- LVBKIF_SOURCE_URL=2//使用URL路径的图片
- LVBKIF_STYLE_NORMAL=0//正常显示背景图片
- LVBKIF_STYLE_TILE=16//正常平铺显示背景图片
- LVS_ALIGNMASK=3072//暂无说明
- LVS_ALIGNLEFT=2048//左对齐
- LVS_ALIGNTOP=0//顶端对齐
- LVS_TYPEMASK=3//暂无说明
- LVS_ICON=0//大图标
- LVS_REPORT=1//详细资料
- LVS_SMALLICON=2//小图标
- LVS_LIST=3//列表
- LVS_TYPESTYLEMASK=-1024//暂无说明
- LVS_SINGLESEL=4//只能单选
- LVS_SHOWSELALWAYS=8//始终显示所选中项(包括失去焦点时)
- LVS_SORTASCENDING=16//按升序排序
- LVS_SORTDESCENDING=32//按降序排序
- LVS_SHAREIMAGELISTS=64//共享图像列表(当控件销毁时图像列表仍可用)
- LVS_NOLABELWRAP=128//文字不换行
- LVS_AUTOARRANGE=256//自动排列
- LVS_EDITLABELS=512//允许编辑标签(类似资源管理器的文件更名)
- LVS_OWNERDRAWFIXED=1024//允许自画(仅详细资料模式)
- LVS_OWNERDATA=4096//指定一个虚拟的ListView,由用户自己管理Item数据
- LVS_NOSCROLL=8192//禁止滚动条(对LVS_LIST和LVS_REPORT样式不适用)
- LVS_NOCOLUMNHEADER=16384//详细资料模式时不显示列头
- LVS_NOSORTHEADER=32768//列头显示为平面,不响应鼠标点击(详细资料模式)
- LVS_EX_BORDERSELECT=32768//用选择边框的样式代替高亮
- LVS_EX_CHECKBOXES=4//在各项目前面显示复选框
- LVS_EX_DOUBLEBUFFER=65536//双缓冲(WinXP以上)
- LVS_EX_FLATSB=256//平面滚动条
- LVS_EX_FULLROWSELECT=32//允许选择整行(仅详细资料模式)
- LVS_EX_GRIDLINES=1//显示表格线(仅详细资料模式)
- LVS_EX_HEADERDRAGDROP=16//允许通过拖放列头来重新安排各列(详细资料模式)
- LVS_EX_HIDELABELS=131072//隐藏标签(WinXP以上)
- LVS_EX_INFOTIP=1024//将提示信息窗口的消息通知父窗口
- LVS_EX_LABELTIP=16384//如果没有提示信息文本就展开隐藏的标签
- LVS_EX_MULTIWORKAREAS=8192//多个工作区(需在没有添加项目前设置)
- LVS_EX_ONECLICKACTIVATE=64//单击项目激活
- LVS_EX_REGIONAL=512//项目范围只包括图标不透明区域和文字区域(大图标模式)
- LVS_EX_SINGLEROW=262144//显示单行(WinXP以上)
- LVS_EX_SNAPTOGRID=0//[暂无消息值]图标自动对齐到表格(WinXP以上)
- LVS_EX_SUBITEMIMAGES=2//允许子项目显示图像(仅详细资料模式)
- LVS_EX_TRACKSELECT=8//允许热点选择
- LVS_EX_TWOCLICKACTIVATE=128//双击项目激活
- LVS_EX_UNDERLINECOLD=4096//非热点的项目文字带下划线
- LVS_EX_UNDERLINEHOT=2048//带热点的项目文字带下划线
- //设置IE cookie
- INTERNET_COOKIE_THIRD_PARTY=#10
- endnamespace
- //一些自己扩展的字符串操作
- namespace StrEx
- //取两个字符串中间的信息
- //参数1:源字符串
- //参数2:要取的部分所在开头的字符串
- //参数3:结束部分字符,默认为空,表示到到结尾
- function mid(source,startStr,endStr="")
- startpos
- endpos
- temp
- if(startpos=="")
- startpos=0
- else
- startpos=str.findstr(source,startStr)
-
- endif
- temp=str.strsub(source,startpos+str.strleng(startStr),str.strleng(source))
-
- if(endStr=="")
- endpos=str.strleng(temp)
- else
- endpos=str.findstr(temp,endStr)
- endif
-
- if(startpos==-1 || endpos==-1)
- return ""
- endif
- ret=str.strsub(temp,0,endpos)
- return ret
- endfunction
- function getReferer(url)
- pos=str.findstr(url,"http")
- if(pos==-1)
- return ""
- endif
-
- temp=str.strsub(url,str.findstr(url,"//")+2,str.strleng(url))
- ret=str.strsub(url,0,str.findstr(temp,"/")+str.findstr(url,"//")+2)
- return ret
- endfunction
- endnamespace
复制代码 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|