Web Application 開 發 利 器 - WebSnap（四）(4…

那 裡 呢 ? 最 佳 的 控 制 位 置 是 在 Apply Action 的 BeforeExecute 及 AfterExecute 事 件 中 ， 我 們 可 以 在 BeforeExecute 中 啟 動 交 易 控 制 ， 在 AfterExecute 中 確 認 是 否 可 以 寫 入 資 料 庫 ， 請 看 以 下 的 片 段 程 式 碼 :

procedure TwdmData.ActionApply3BeforeExecute(Sender: TObject;

Params: TStrings; var Handled: Boolean);

begin

//transaction support

Database1.StartTransaction;

end;

procedure TwdmData.ActionApply3AfterExecute(Sender: TObject;

Params: TStrings);

begin

//transaction support

if dsAdaptItems.Errors.ErrorCount > 0 then

Database1.Rollback

else Database1.Commit;

end;

由 於 我 們 使 用 的 是 PARADOX 的 資 料 庫 ， 所 以 使 用 交 易 前 你 得 先 將 TDatabase.TransIsolation 特 性 值 設 成 tiDirtyRead 。

本 章 後 記

這 一 章 中 我 們 學 到 了 如 何 利 用 Layout 來 排 列 網 頁 上 的 元 件 ， 並 使 用 Custom 特 性 來 訂 製 網 頁 的 外 觀 ， 最 重 要 的 是 我 們 學 到 了 處 理 Master-Detail 資 料 庫 的 技 巧 ， 在 執 行 這 個 程 式 的 過 程 中 你 一 定 會 遇 到 許 多 的 例 外 ， 最 常 見 的 大 概 是 Variant 轉 換 的 錯 誤 ， 在 WebSnap 中 這 些 錯 誤 都 被 完 整 的 處 理 了 ， 因 此 你 可 以 不 必 擔 心 。

<第 五 章 、 使 用 者 管 理 及 Sessions>

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有