首先,請將作出的動畫(背景為白色)以BMP圖象格式逐幀存放在所建項目的子目錄下,
本例為title1.bmp,title2.bmp,......,title25.bmp.
然后,在表單里增加一個圖象類對象,名為Image1,將BackStyle屬性改為"透明";并在其Picture屬性中填入第一幀圖象的文件名,本例為title1.bmp. 接著,在增加一個計時器對象,在其Interval屬性中填入100(每秒10幀,改動該值可控制動畫顯示速度),并在Timer Event事件中填入如下代碼a=Thisform.Image1.Pictures=5 ’s為圖象文件名前綴的英文字符個數(shù),本例為5zs=25’zs為圖象的幀數(shù),本例為25幀b=subst(a,Rat(’’,a)+1+s) n=Val(b) n=Iif(n=zs,1,n+1) Thisform.Image1.Picture=strtran(a,b,alt(str(n)+’.bmp’) 最后,按下"運(yùn)行"按鈕,圖象動起來了. 記住把所有bmp文件添加到項目管理器的"其他文件"里,這樣在編譯成exe文件時,VFP會將所有BMP文件數(shù)據(jù)嵌入exe文件中并自動調(diào)用,運(yùn)行時只需拷一個exe文件即可.
一般情況下,在使用VFP系統(tǒng)開發(fā)的應(yīng)用系統(tǒng),只要經(jīng)過編譯、發(fā)布和安裝過程就可以脫離VFP運(yùn)行環(huán)境而在中直接運(yùn)行。其實(shí)這只是應(yīng)用系統(tǒng)的一種運(yùn)行方式,我們完全可以利用活動文檔(Active Documents)的功能,實(shí)現(xiàn)將單純操作系統(tǒng)方式下的應(yīng)用系統(tǒng)向基于HTML的客戶界面應(yīng)用程序的轉(zhuǎn)變。通過活動文檔可順利地將以前編寫的應(yīng)用程序移植到Web頁面上,并可將VFP的功能傳遞到瀏覽器上。下面以一個人員情況應(yīng)用程序?qū)崿F(xiàn)在瀏覽器中運(yùn)行為例,介紹具體的實(shí)現(xiàn)過程:
1.新建一個項目命名為new,并在該項目器添加一個表單BD1到項目中,設(shè)定該表單的屬性如下:
TitleBar=0 &&&&關(guān)閉表單的標(biāo)題欄
WindowState=2 &&&&設(shè)定表單運(yùn)行時為化方式
ScollBar=3 &&&&設(shè)定當(dāng)表格處于非整屏顯示時,可以使用垂直和水平滾動條
在表單對象的Destory Events事件中加入如下程序代碼:
clear Events&&&&保證當(dāng)表單關(guān)閉時,用戶能夠退出應(yīng)用程序的運(yùn)行
2.在表單中添加數(shù)據(jù)環(huán)境和控件對象。
在表單的數(shù)據(jù)環(huán)境中添加一個數(shù)據(jù)表作為表單中的數(shù)據(jù)源,在這里我們增加的是一個人員情況表。
利用鼠標(biāo)拖動數(shù)據(jù)環(huán)境中的相應(yīng)字段選項添加到表單中,作為表單的編輯對象,并添加一個對數(shù)據(jù)記錄進(jìn)行操作的類對象,設(shè)置完畢.
3.添加活動文檔類到項目,在建立好用戶應(yīng)用程序界面后,就可以向項目中添加活動文檔類,其步驟如下:
在項目管理器中選擇“類”頁面,單擊“新建”按鈕,創(chuàng)建一個活動文檔類,設(shè)定其基類為活動文檔,將之于自定義的類庫文件中。
設(shè)定好新類后雙擊對象,打開新類對象的代碼窗口,為新類對象的Destory Events事件設(shè)定程序代碼如下:
DO FORM BD1
READ EVENTS
設(shè)定新類對象的屬性:
ContainerReleaseType=1
&&&&用戶離開活動文檔時,VFP將自動退出
本例為title1.bmp,title2.bmp,......,title25.bmp.
然后,在表單里增加一個圖象類對象,名為Image1,將BackStyle屬性改為"透明";并在其Picture屬性中填入第一幀圖象的文件名,本例為title1.bmp. 接著,在增加一個計時器對象,在其Interval屬性中填入100(每秒10幀,改動該值可控制動畫顯示速度),并在Timer Event事件中填入如下代碼a=Thisform.Image1.Pictures=5 ’s為圖象文件名前綴的英文字符個數(shù),本例為5zs=25’zs為圖象的幀數(shù),本例為25幀b=subst(a,Rat(’’,a)+1+s) n=Val(b) n=Iif(n=zs,1,n+1) Thisform.Image1.Picture=strtran(a,b,alt(str(n)+’.bmp’) 最后,按下"運(yùn)行"按鈕,圖象動起來了. 記住把所有bmp文件添加到項目管理器的"其他文件"里,這樣在編譯成exe文件時,VFP會將所有BMP文件數(shù)據(jù)嵌入exe文件中并自動調(diào)用,運(yùn)行時只需拷一個exe文件即可.
一般情況下,在使用VFP系統(tǒng)開發(fā)的應(yīng)用系統(tǒng),只要經(jīng)過編譯、發(fā)布和安裝過程就可以脫離VFP運(yùn)行環(huán)境而在中直接運(yùn)行。其實(shí)這只是應(yīng)用系統(tǒng)的一種運(yùn)行方式,我們完全可以利用活動文檔(Active Documents)的功能,實(shí)現(xiàn)將單純操作系統(tǒng)方式下的應(yīng)用系統(tǒng)向基于HTML的客戶界面應(yīng)用程序的轉(zhuǎn)變。通過活動文檔可順利地將以前編寫的應(yīng)用程序移植到Web頁面上,并可將VFP的功能傳遞到瀏覽器上。下面以一個人員情況應(yīng)用程序?qū)崿F(xiàn)在瀏覽器中運(yùn)行為例,介紹具體的實(shí)現(xiàn)過程:
1.新建一個項目命名為new,并在該項目器添加一個表單BD1到項目中,設(shè)定該表單的屬性如下:
TitleBar=0 &&&&關(guān)閉表單的標(biāo)題欄
WindowState=2 &&&&設(shè)定表單運(yùn)行時為化方式
ScollBar=3 &&&&設(shè)定當(dāng)表格處于非整屏顯示時,可以使用垂直和水平滾動條
在表單對象的Destory Events事件中加入如下程序代碼:
clear Events&&&&保證當(dāng)表單關(guān)閉時,用戶能夠退出應(yīng)用程序的運(yùn)行
2.在表單中添加數(shù)據(jù)環(huán)境和控件對象。
在表單的數(shù)據(jù)環(huán)境中添加一個數(shù)據(jù)表作為表單中的數(shù)據(jù)源,在這里我們增加的是一個人員情況表。
利用鼠標(biāo)拖動數(shù)據(jù)環(huán)境中的相應(yīng)字段選項添加到表單中,作為表單的編輯對象,并添加一個對數(shù)據(jù)記錄進(jìn)行操作的類對象,設(shè)置完畢.
3.添加活動文檔類到項目,在建立好用戶應(yīng)用程序界面后,就可以向項目中添加活動文檔類,其步驟如下:
在項目管理器中選擇“類”頁面,單擊“新建”按鈕,創(chuàng)建一個活動文檔類,設(shè)定其基類為活動文檔,將之于自定義的類庫文件中。
設(shè)定好新類后雙擊對象,打開新類對象的代碼窗口,為新類對象的Destory Events事件設(shè)定程序代碼如下:
DO FORM BD1
READ EVENTS
設(shè)定新類對象的屬性:
ContainerReleaseType=1
&&&&用戶離開活動文檔時,VFP將自動退出

