11、 超級SYS(1037,1)
USE report1.frx
SYS(1037,1) &&自動讀取report1.frx里面的打印環(huán)境
確定一下看看,**!
SYS(1037,1)的設置自動保存到report1.frx里面呢
哎,紅雨的打印設置表單又白做呢
12、 在WITH … ENDWITH 和FOR EACH … OR中支持智能感應
為在WITH ... ENDWITH 和FOR EACH ... E□□□OR中支持IntelliSense,這兩個命令的語法格式增加了AS Type子句,如下所示:
WITH ObjectName [AS Type [OF ClassLibrary]]
Commands
ENDWITH
FOR EACH ObjectName [AS Type [OF ClassLibrary]] IN Group
Commands
[EXIT]
[LOOP]
OR
Type 可以引用任何有效類型,包括數(shù)據(jù)類型、類類型或ProgID,如果類名稱無法找到,Visual FoxPro將忽略該類名稱并不顯示IntelliSense。
注意:Type引用不影響運行時應用程序的實際功能,這種引用僅是為了使用IntelliSense。ObjectName 表達式可以引用一個內(nèi)存變量或數(shù)組。
ClassLibrary參數(shù)指定的類庫需要在可以被Visual FoxPro發(fā)現(xiàn)的路徑中,如果指定的類庫不能發(fā)現(xiàn),IntelliSense不顯示。
輸入特定的ProgIDs和類庫不需要引號圍住它們,除非在名稱中包含有空格。當輸入了一個關鍵詞, IntelliSense將顯示一個在FoxCode (Type="T")中注冊的類型列表。如果指定了一個有效類型,在WITH ... ENDWITH 或FOR EACH ... E□□□OR中輸入一個圓點,將顯示對于該對象的IntelliSens。
必須指定一個有效類庫,對已存在對象引用則無效,例如下面的語句不支持IntelliSense:
WITH THISFORM AS APPLICATION
ENDWITH
WITH THISFORM AT THIS
ENDWITH
有效的書寫方式如下:
WITH This AS Form &&在一個表單事件中書寫
.Caption="標題"
ENDWITH
又如:
WITH This.Pageframe1.Page1 AS Page
.Caption="頁框1"
ENDWITH
Visual FoxPro支持嵌套WITH ... ENDWITH和FOR EACH ... E□□□OR命令,下面是在一個叫Program1.prg的.prg中定義類中的嵌套WITH ... ENDWITH命令。在做這個示例前,首先需要在磁盤中保存一下Program1.prg文件,然后重新打開,可以在WITH和ENDWITH之間輸入一個圓點,然后就可以看見IntelliSense,如圖5所示。
DEFINE CLASS f1 AS form
MyVar1 = 123
ADD OBJECT t1 AS mytext
PROCEDURE Init
WITH THIS AS f1 OF program1.prg
WITH .t1 AS mytext OF program1.prg
ENDWITH
ENDWITH
ENDPROC
ENDDEFINE
DEFINE CLASS mytext as textbox
MyVar2 = 123
ENDDEFINE
13、 報表可以有多個細節(jié)區(qū)了