MasteringVFP/6/3

出自VFP Wiki

(修訂版本間差異)
跳轉到: 導航, 搜尋
 
(1個中途的修訂版本沒有顯示)
第1行: 第1行:
 +
===第一個Class===
第一個class 免不了也要來個Hello World ~ 現在我們來做一個沒有介面的class 只有一個功能,就是說Hello World
第一個class 免不了也要來個Hello World ~ 現在我們來做一個沒有介面的class 只有一個功能,就是說Hello World
第25行: 第26行:
簡單吧,如此就進入了 design class 的第一步 ^_^
簡單吧,如此就進入了 design class 的第一步 ^_^
-
<br>
 
-
[http://www.hg-fix.com/ 数据恢复]
 
-
[http://www.hg-fix.com/ 硬盘数据恢复]
 
-
[http://www.hg-fix.com/ 磁带数据恢复]
 
-
[http://www.hg-fix.com/ raid数据恢复]
 
-
[http://www.hg-fix.com/ 磁盘阵列数据恢复]
 
-
[http://www.hg-fix.com/diskrecover.htm 数据恢复]
 
-
[http://www.hg-fix.com/taperecover.htm 数据恢复]
 
-
[http://www.hg-fix.com/raidrecover.htm 数据恢复]
 
-
[http://www.hg-fix.com/ 数据修复]
 
-
[http://www.hg-fix.com/ 硬盘数据修复]
 
-
[http://www.hg-fix.com/ 磁带数据修复]
 
-
[http://www.hg-fix.com/ raid数据修复]
 
-
[http://www.hg-fix.com/diskrecover.htm 数据修复]
 
-
[http://www.hg-fix.com/raidrecover.htm 数据修复]
 
-
[http://www.hg-fix.com/taperecover.htm 数据修复]
 
-
[http://www.hg-fix.com/ 磁盘阵列数据修复]
 

在2006年8月4日 (五) 06:52的最新修訂版本

第一個Class

第一個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 的第一步 ^_^