【導讀】加入SERVICES文件InterBase服務器訪問所需的協(xié)議描述，InterBase服務器還可支持其它通信協(xié)議，如SPX/1PX，如果成功，狀態(tài)信息會出現(xiàn)，并繼續(xù)步驟⑵。⑵檢驗InterBaseSQLLinks驅動程序是否正確安裝。①輸入TELNET命令，確認TCP庫是否正確安裝。注冊入網檢查數據庫是否存在。有你的主機名和IP地址的人口。如果用TELNET是成功的，但仍然無法正確聯(lián)接，則沒有正確安裝InterBase。PING成功但TELNET不成功，則idaemon可能有問題。如果底層協(xié)議不正常，請詢問數據庫管理員，否則繼續(xù)幫助⑹。運行BDE配置工具檢查InterBase別名。Client\Server的數據庫應用程序，采用的例子是CSDEMOS。如果不需要控制數據。時，會自動創(chuàng)建一個臨時的TDatabase部件。拖放在數據模塊或窗體中。可以設置初始值和編寫OnLogin事件處理過程。用戶提供了第一次注冊數據庫服務器時定制服務器安全參數，如口令，的能力。DataSet部件能引用該名字以取代直接使用。當TDatabase部件的Connected屬性為True時不能修改該屬性。為True時強行設置DriveName屬性將引發(fā)異常。DriveName是BDE驅動程序，如STANDARD、ORACLE、SYBASE、INFORMIX. 如果設置AliasName，則該屬性值將被清除。

　　

【正文】 充分利用服務器的處理能力和速度 ● 減少網絡傳輸的數量 例如，考慮一個需要計算單個值的應用程序，在大批記錄中的標準差值。如果在 Delphi 應用程序中執(zhí)行這項功能就必須從服務器中得到所有在計算中用到的記錄，這必將導致網絡擁塞。因為應用程序所需的只是代表標準差的最終返回值。因此，由服務器上的存儲過程來讀數據，執(zhí)行計算和將值傳給應用程序將更有效。 1. TSoredProc 的關鍵屬性 ⑴ DatabaseName 屬性 DatabaseName 屬性描述要訪問的數據庫的名字。該屬性可以為： ● 已定義的 BDE 別名 ● 本地型數據庫的目錄 ● Local InterBase 服務器的目錄路徑和文件名 ● TDatabase 定義的應用程序別名 在改變 DatabaseName 之前要使用 Close 方法將 Dataset 部件置為非活躍狀態(tài)。 ⑵ StoredProcName 屬性 StoredProcName 屬性表示服務器上的存儲 過程名。 Oracle 服務器允許多個具有相同名字的存儲過程。因此要設置 Overload 屬性來描述執(zhí)行在 Oracle 服務器上的存儲過程名。 ⑶ Overload 屬性 Oracle 服務器允許 Oracle 軟件包中存儲過程的重載。就是說具有相同名字的不同過程，設置 Overload 屬性用來描述執(zhí)行在 Oracle 服務器上的存儲過程。如果 Overload 值為零，則假定沒有重載，如果 Overload 為 1，則 Delphi 執(zhí)行具有同名的第一個存儲過程；如果值為 2，則執(zhí)行第二個存儲過程。 ⑷ Params 屬性 Params 屬性包含傳給存儲過程的參數。 2. 關鍵方法 ⑴ ParamByName 方法 聲明： function ParamByName(const Value: String): TParam。 ParamByName 方法返回 Params 屬性中具有名為 Value 的元素值。一般用該方法在動態(tài)查詢中給參數賦值。 ⑵ Prepare 方法 PrePare 方法準備要執(zhí)行的存儲過程，這允許服務器載入存儲過程，否則準備處理異常。 ⑶ ExecProc 方法 ExecProc 方法執(zhí)行服務器上的存儲過 程。 ⑷ Open方法 Open方法打開 DataSet 部件，并將其置于瀏覽狀態(tài)。這相當于將 Active屬性置為 True。對于 TStoredProc 如果存儲過程返回一個結果集，則使用 Open執(zhí)行存儲過程。如果存儲過程返回單行，早使用 ExecProc 執(zhí)行存儲過程。 TStoreProc 使用方法 1. 建立一個 StoredProc 部件 為數據庫服務器上的存儲過程建立一個 TStoredProc 部件的步驟如下： ⑴ 從 Component Palette 的 Data Access 頁選擇 TStoredProc 部件放在數據模塊上。 ⑵ 將 TStoredProc部件的 DatabaseName屬性設置為存儲過程所在的數據庫名。 DatabaseName 必須是 BDE 別名。 ⑶ 將 TStoredProc 部件的 StoredProcName 屬性設為所用的存儲過程名，或者從下拉式 列表框中選擇。 ⑷ 在 TStoredProc 部件的 Params 屬性中描述輸入參數?？梢允褂脜稻庉嬈鱽碓O置輸 入參數。參數編輯器也可讓用戶察看存儲過程返回給應用程序的值。 2. 設置存儲過程的輸入 參數，察看輸出結果參數 許多存儲過程需要給它們傳入一系列的輸入參數，以確定處理什么和怎樣處理，在 Params 屬性中描述這些參數。所描述的輸入參數的順序是很重要的，它由服務器上的存儲過程來確定。在設計時，最容易和最安全的方法是激活TStoredProc 參數編輯器，編輯輸入參數。參數編輯器以正確的次序列出輸入參數，讓你給它們賦值。 要激活 TStoredProc 的參數編輯器： ① 選擇 TStoredProc 部件。 ② 按鼠標右鍵激活加速菜單 (Speed Menu)。 ③ 選擇 Define Parameters。 參數名列表框顯示過程的所有輸入，輸出和結果參數。有關輸入、輸出參數的信息從服務器中獲得。對于某些服務器而方，參數信息是不可訪問的，如 Sybase，在這種情況下，列表框是空的，因此必須自己按過程要求的順序增加輸入輸出參數。 參數類型復選框中描述所選的參數是輸入、輸出，還是結果參數。如果服務器支持參數可以既是輸入又是輸出。如果在列表框中增添參數，就必須設置參數類型。 數據類型復選框，列出列表框中所選參數的數據類型。如果給列表框真善美參數，必須設置數據類型。 在值編輯框中給輸入參數賦值 。 如果服務器不傳遞存儲過程信息給 Delphi，則可以用 Add 按鈕給存儲過程增添參數。 Delete 按鈕則是將增添的參數刪除， Clear 按鈕將清除列表框中所有參數。 設置完參數后，選擇 OK按鈕。 3. 在運行時建立參數和參數值 在運行時建立參數，可直接訪問 Params 屬性。 Params 屬性是參數字符串的數組。例如，下列代碼將編輯框的文本賦給數組的第一個字串： [0].Asstring := 也能夠用 ParamsByName 方法通過名字訪問參數： (39。Company39。) Asstring := 。 4. 準備和執(zhí)行存儲過程 要使用存儲過程還必須準備并執(zhí)行它。可以有兩種方式準備一個存儲過程： ● 在設計時，通過選擇參數編輯器的 OK按鈕 ● 在運行時，通過調用 TStoredProc 的 Prepare 方法 例如，下面的代碼準備存儲過程的執(zhí)行： 。 要執(zhí)行準備好的存儲過程，調 用 TStroedProc 部件的 ExecProc 方法。下列代碼演示了準備和執(zhí)行存儲過程： [0] Asstring := 。 。 。 當你執(zhí)行一個存儲過程，它返回輸出參數或結果集，有兩種可能的返回類型：單個返回，如單值或值集，和一群結果集，返回很多值。 5. 訪問輸出參數和結果集 存儲過程在輸出參數數組中返回值。如果服務器支持返回值可以是單個結果或者結 果集。 在運行時訪問存儲過程的輸出參數，可以索引 Params 屬性或者用ParamByName 方法訪問這些值。下列表達式都用輸出參數設置了編輯框的值： := [6].AsString。 := (39。Contact39。).AsString。 如果存儲過程返回結果集，則用標準數據相關控制訪問和顯示值會更有用。 在某些服務器上如 Sybase，存儲過程能象查詢語句那 樣返回結果集，應用程序可以使用數據相關控制一顯示這些存儲過程的輸出。 用數據相關控制顯示存儲過程返回結果的方法如下： ① 將 DataSource 部件放在數據模塊上。 ② 將 DataSource 部件的 DataSet 屬性設置為接收數據的 TStoredProc 部件的名字。 ③ 將數據相關控制的 DataSource 屬性設為 DataSource 部件的名字。 這樣，當用于 TStoredProc 部件和 Active 屬性為 True 時，數據相關控制就能顯示從存儲過程返回的結果。 從開發(fā)平臺到 服務器的向上適化