Setting this option to FALSE suppresses "control notresponding" errors. 13. 等待鼠标状态。 [-] void WaitForMouseIdle(integeriTimeOut) [ ] integeriTime=1 [-]while(Cursor.GetType()=="WAIT" || Cursor.GetType()=="DELAY" iTime iTimeOut) [ ] sle
Setting this option to FALSE suppresses "control not responding" errors.
13. 等待鼠标状态。
[-] void WaitForMouseIdle(integer iTimeOut)[ ] integer iTime=1
[-] while(Cursor.GetType()=="WAIT" || Cursor.GetType()=="DELAY" && iTime [ ] sleep(1)
[ ] iTime = iTime+5
[-] if(iTime > iTimeOut)
[ ] Log.Fail("Cursor status is not idle in {iTimeOut} seconds")
[ ] sleep(5)
14. 使用 ListRead（）从一个文本中读取list变量，是一种数据驱动的好办法。
List of string lsFileContents
ListRead( lsFileContents,"C:\test.txt" )
ListPrint( lsFileContents )
ListInsert (lsFile, i, lsNewInfo[i])
ListWrite (lsFile,
"{GetProgramDir ()}\Sample.txt")
15. silktest 中使用递归实现清空文件夹内容方法：
[+] void glClearFolder(String filepath)
[+] //---------------------Log---------------------//
[ ] // Author : Cheers Li
[ ] // Date : 2009-09-15
[ ] //-----------------------------------------------//
[ ] filepath=Trim(filepath)
[+] if(SubStr(filepath,Len(filepath),1)=="")
[ ] filepath=SubStr(filepath,1,Len(filepath)-1)
[+] else
[ ] filepath=SubStr(filepath,1,Len(filepath))
[ ] String tempfilepath
[ ] String tmDir
[+] if(!SYS_DirExists(filepath))
[ ] RaiseError(13,"The path : {filepath} does not exists! ")
[ ] List of FILEINFO fFileContents=SYS_GetDirContents(filepath)
[-] FILEINFO item
[-] for each item in fFileContents
[ ] tempfilepath="{filepath}"+item.sName
[-] if(item.bIsDir)
[-] if(ListCount(SYS_GetDirContents(tempfilepath))==0)
[ ] SYS_RemoveDir(tempfilepath)
[-] else
[ ] glClearFolder(tempfilepath)
[ ] SYS_RemoveDir(tempfilepath)
[-] else
[ ] SYS_RemoveFile(tempfilepath)
16. Silktest 将 字符串转换成 List of String 的方法
List of STRING lsConvertLineToList( String sLinfOfText)//--------------------------------------Log---------------------------------
// Author : Cheers Li September 24, 2010
// Description: This function is for getting Strings of line, and convert it to a list.
[ ] String sTest=trim(sLinfOfText)
[ ] long ltemp
[ ] integer i,k=0
[ ] boolean blTemp
[ ] List of STRING lsTestString
[ ] ltemp=len(sTest)
[ ]
[+] for (i=1;i [-] if(IsSpace(substr(sTest,i,1))==false)
[ ] k++
[ ] blTemp=false
[-] else
[-] if (blTemp==false)
[ ] ListAppend(lsTestString,substr(sTest,i-k,k))
[ ] blTemp=true
[ ] k=0
[ ] ListAppend(lsTestString,substr(sTest,i-k,k))
[ ]
[ ] return lsTestString
17. 通过api sendmessage（）来关闭窗口。
[ ] use "msw32.inc"[-] testcase testmenu() appstate none
[ ] wRefSYSMain.Invoke()
[ ] wRefSYSMain.SetActive()
[ ] SendMessage(wRefSYSMain.hWnd,WM_CLOSE,0,0)
查看更多关于silktest 技巧积累<一&gt的详细内容...