Visual FoxPro 3.0中標題的淡入淡出

    很多游戲的開始時的解說字幕和爆機后的創作人員表都使用了字符的淡入淡出方式，在Visual FoxPro 3.0中我們也可以制作有淡入淡出效果的標題。

進入Visual FoxPro 3.0系統環境，在命令行窗口中鍵入Create Form或在‘文件’菜單中選擇‘新建’、‘表單’，即可建立一個新的表單（FORM1），并設置FORM1的Backcolor屬性為一個RGB(0,128,128)。 
鼠標點擊“表單控制欄”中的“標簽”，并在FORM1上拉出一個矩形方框（LABEL1）。設置它的屬性Caption為“淡入淡出效果演示”，Autosize為 .T.，Backstyle為0，Forecolor為RGB（0,128,128），Fontname為“隸書體”,Fontbold為 .T.，Fontsize為28。 
鼠標點擊“表單控制欄”中的“計時器”，再在FORM1上點擊一下，即可在FORM1上創建一個計時器（TIMER1）。設置它的屬性Interval為100，Enabled屬性為 .F.。 
鼠標點擊“表單控制欄”中的“命令按鈕”，并在FORM1上拉出一個矩形方框（COMMAND1）。設置它的屬性Caption為“開始”。 
雙擊COMMAND1，編寫COMMAND1的Click過程如下： 
If Thisform.Timer1.Enabled = .F.

Thisform.Timer1.Enabled = .T.

EndIf

雙擊FORM1，編寫FORM1的Activate過程如下： 
Public I

I = 0

雙擊TIMER1，編寫TIMER1的Timer過程如下： 
I = I + 10

If I >= 255 * 2

    Thisform.Timer1.Enabled = .F.

    I = 0

EndIf

If I >= 255

    Thisform.Label1.Forecolor = RGB(255 * 2 - I,128,128)

Else

    ThisForm.Label1.Forecolor = RGB(I,128,128)

EndIf

按鼠標右鍵點擊FORM1，在彈出菜單中選擇“運行”。用鼠標點“開始”按鈕，可以看到標題由背景色漸變為紅色，然后由紅色漸變為背景色。 
以上程序在Visual FoxPro 3.0及WINDOWS 95中運行通過。