--取得文件列表
FileString:=Catalog(FileLocation,"F")
--取得文件個(gè)數(shù)
FileNumber:=LineCount(FileString,Return)
--初始化文件后綴名記錄字符串
FileFixs:=""
--取得總的文件后綴名
repeat with i:=1 to FileNumber
FileNames:=GetLine(FileString,i)
lastindex:=CharCount(FileNames)
FileFix:=SubStr(FileNames,RFind(".",FileNames)+1,CharCount
(FileNames))
FileFixs:=FileFixs^FileFix^Return
end repeat
--篩選后綴名
FixsNumber:=LineCount(FileFixs)
repeat with k:=0 to FixsNumber
str:=LowerCase(GetLine(FileFixs,k))
str3:=str3^str
str1:=LowerCase(GetLine(FileFixs,k+1))
if Find(str1,str3)=0 then
fixs:=fixs^str1^Return
end if
end repeat
標(biāo)題:如何將時(shí)鐘曰期改成中文形式出現(xiàn)?
描述:[解答](網(wǎng)友kiwi)
其實(shí)這可用一個(gè)很簡單的方法來實(shí)現(xiàn),具體如下:
計(jì)算圖標(biāo)中輸入:
months := ["一月", "二月", "三月", "四月", "五月", "六月", "
七月", "八月", "九月", "十月", "十一月", "十二月"]
days := [#Sunday:"星期曰", #Monday:"星期一", #Tuesday:"星期
二", #Wednesday:"星期三", #Thursday:"星期四", #Friday:"星期
五", #Saturday:"星期六"]
顯示圖標(biāo):
{days[Symbol(DayName)]} {months[Month]}
這樣就可以顯示中文 星期幾 和月份
標(biāo)題:如何避免程序被多次同時(shí)執(zhí)行的方案?
描述:[解答]
避免重復(fù)執(zhí)行的腳本:
在程序流程開始處放置一計(jì)算圖標(biāo)并寫入一下代碼:
方法一:
在程序流程最開始處添加計(jì)算腳本(假設(shè)程序標(biāo)題為“魔巖工作室”)
:
Result:=FindWindow("APWMainClass","魔巖工作室")
if Result0 then Quit(0)
SetWindowText(WindowHandle,"魔巖工作室")
方法二:(網(wǎng)友kwwx)
利用budapi中的bawindowlist函數(shù)。
返回值為目前運(yùn)行的所有符合要求的程序的句柄,每個(gè)句柄之間用換行
符分開。如果返回值多于一行,既意味著發(fā)現(xiàn)了一個(gè)以上的程序?qū)嵗?/p>
運(yùn)行,當(dāng)前程序便退出。
在程序中寫:
win_list:=bawindowList("APWMainClass","yourname")
if LineCount(win_list)>1 then
Quit(0)
end if
標(biāo)題:如何將AW中的變量值傳給FLASH?
描述:[解答](from Y)
傳遞變量值用:CallSprite(@"Flash Icon", #setVariable,
variableName, value).
第1個(gè)參數(shù)是圖標(biāo)名,第2個(gè)參數(shù)不要變, 第3個(gè)參數(shù)是變量名,第4個(gè)參
數(shù)是變量值。
CallSprite(@"Flash Icon ", #getVariable, variableName)
用來取得FLASH 中變量的值。
標(biāo)題:如何恢復(fù)交互Flash的手型鼠標(biāo)指針?
描述:[解答](版權(quán)所有 魔巖工作室 Rock Studio)
版權(quán)所有:魔巖工作室 Rock Studio
在authorware中直接插入交互Flash動(dòng)畫的時(shí)候,鼠標(biāo)移到交互按鈕上
時(shí),鼠標(biāo)指針并不會(huì)自動(dòng)變?yōu)槭中蜖睿潜3植蛔儯绾谓鉀Q這個(gè)問
題呢?這里提供一個(gè)完美的解決方法:在插入的Flash Movie...圖標(biāo)后
添加一顯示圖標(biāo),雙擊打開,用文本工具輸入以下一行代碼:
{Test((GetSpriteProperty(@IconPrev
(IconID),#mouseOverButton)),SetCursor(6),SetCursor(0))}
顯示圖標(biāo)必須保證緊跟插入的Flash圖標(biāo)后面,同時(shí)勾選上顯示圖標(biāo)的“
Update Displayed Variables”,此時(shí)你再播放帶交互的Flash動(dòng)畫,
發(fā)現(xiàn)熟悉的手型呈現(xiàn)出來了,這招絕吧。。呵呵
標(biāo)題:AW7.01中變量、函數(shù)、知識對象等面板窗口最大化無法恢復(fù)。
描述:[解決辦法]:
在注冊表中修改
HKEY_CURRENT_USER\Software\Macromedia\authorware\7
\panellocs鍵的訪問權(quán)限,拒絕修改。
標(biāo)題:如何將AW窗口置于最頂層?
描述:[解答]
在程序流程的開始處運(yùn)行以下代碼:
setwindowpos(windowhandle,-1,0,0,0,0,3)
setwindowpos是winapi.u32里的函數(shù)
標(biāo)題:在AW里怎樣用代碼創(chuàng)建備注字段及布爾字段?
描述:Create Table lushibin8(真假 bit,姓名 char(20),備注 MEMO)