MasteringVFP/6/3

在2006年8月4日 (五) 06:52由Elleryq (對話 | 貢獻)所做的修訂版本

(差異) ←上一修訂 | 最新修訂 (差異) | 下一修訂→ (差異)

第一個class 免不了也要來個Hello World ~ 現在我們來做一個沒有介面的class 只有一個功能,就是說Hello World

先定義出這一個class

define class talk_to_you as custom

procedure say_hello
 ?[hello world]
endproc

enddefine

如何使用呢?在command window 中先指定要使用的 procedure. 假定剛剛我們所定義的 talk_to_you class 是存到 your_prg.prg 裡面那麼

set procedure to your_prg additive
xx=createobject("talk_to_you")
?xx.say_hello()

如此在foxpro 中的 screen 中也就會出現 Hello world

簡單吧,如此就進入了 design class 的第一步 ^_^