程序運行時添加表到表單的數(shù)據(jù)環(huán)境

概述
    表或視圖可以在運行時添加到 Visual 表單中. 雖然 你可以用 USE 命令打開表, 但將其添加到表單的數(shù)據(jù)環(huán)境更好. 如果表單是設(shè)置為私有數(shù)據(jù)工作期, 則該表會只添加到當(dāng)前數(shù)據(jù)工作期的數(shù)據(jù)環(huán)境中.
    更多信息
    逐步演示
    用表單器創(chuàng)建一個新表.
    設(shè)置表單的 DataSession 屬性為 2-私有數(shù)據(jù)工作期.
    添加一個命令按鈕到表單, 并放入以下代碼到它的 Click 事件中:
    WITH THISFORM.DataEnvironment
    .ADDOBJECT("mycursor","cursor")
    .mycursor.Database= SYS(2004)+"samples\data\testdata.dbc"
    .mycursor.CursorSource="customer"
    .CloseTables()&& 關(guān)閉所有的表和與數(shù)據(jù)環(huán)境相關(guān)的視圖
    .OpenTables()&& 打開所有的表和與數(shù)據(jù)環(huán)境相關(guān)的視圖
    ENDWITH
    保存表單. 然后運行表單的兩個實例.
    單擊表單的第一個實例上的命令按鈕, 但不要
    單擊表單的第二個實例上的按鈕.
    在調(diào)試窗口中打入:
    _SCREEN.ACTIVEFORM.DataEnvironment.mycursor.CursorSource
    當(dāng)你在兩個表單間切換時, 注意調(diào)試窗口中的值的改變與活動的數(shù)據(jù)工作期有關(guān). 表只在表單的第一個實例的數(shù)據(jù)環(huán)境中.