作者：自由編程

    在當今眾多的編程語言中，VFP的簡單、方便和實用使我一直情有獨衷。它不僅提供了對中、小型數據庫完善的管理和操作機制，在應用程序界面的設計上也提供了豐富的手段。比如說，VFP的表單設計器提供了圖像控制，允許我們直接在表單中添加.BMP圖片。稍顯不足的是它不支持其他格式的圖像，更不用說是動畫了。    由于圖像控制和其他控制一樣，具有自己一整套的屬性，在設計時可以動態地改變它，因此我在實踐中摸索到一種變通的方法，在VFP的表單中加入模擬的“動畫”。其設計思想是準備幾幀連貫的.BMP圖像(可用相關的繪圖軟件自行制作)，利用計時器的計時功能，在規定的時間間隔內動態地改變所顯示的.BMP圖像。下面我就通過一個演示實例來加以說明。    首先，我準備了四幅連貫的紅旗飄圖像，分別取名為：1.bmp,2.bmp,3.bmp和4.bmp。如右圖所示。然后使用表單設計器設計表單如下：演示表單其中包括三個控制：Image(圖像)，Timer(計時器)和Command(命令按鈕)。設置屬性如下：Image.Picture=1.bmpTtimer.Enabled=.t.Timer.Interval=200Command.Caption=退出演示在表單的Activate事件中添加如下代碼：Public II=1在計時器的Timer事件中添加代碼如下：If I>=4I=1ElseI=I+1EndifPic=Str(I,1)+".bmp"Thisform.Image.Picture= Pic在命令按鈕的Click事件中添加代碼如下：Thisform.Release最后，保存并運行表單，我們會看到窗口中一幅鮮艷的紅旗在迎風招展。單擊“退出演示”命令按鈕，模擬動畫的演示就結束了。