Fields Editor 是設計期建立永久欄位的視覺化工具,提供五大核心功能:
TTable/TQuery視窗標題顯示「表單名 - 資料集名」,Fields 列表框列出已建立的永久欄位。拖曳列表項目可調整 DBGrid 顯示順序;上方導航鈕可移動記錄指標預覽資料。
右鍵 → Add Fields,對話框 Available Fields 列出尚未建立永久欄位的實體欄位。預設全選,Ctrl+點選可部分勾選,確定後自動建立對應永久欄位並加入 Fields 列表。
選取 Fields 列表中項目 → 右鍵 → Delete。或 Select All → Delete 清空所有。刪除後可重新 Add Fields,但先前屬性設定不保留。
FieldName 輸入名稱(如 Balance)FieldType 選 CurrencyField計算欄位無實體儲存,值由 OnCalcFields 事件動態產生:
procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
Table1Balance.Value := Table1ItemsTotal.Value - Table1AmountPaid.Value;
end;
TReport 負責執行由 ReportSmith 設計的報表檔(.rep)。
| 屬性 | 說明 |
|---|---|
ReportName | 報表檔名稱 |
ReportDir | 報表檔路徑 |
Preview | True=螢幕預覽,False=直接列印 |
AutoUnload | True=執行後卸載 ReportSmith 釋放記憶體 |
InitialValues | 報表變數初始值,格式 ReportVar := Value |
Report1.Run; // 執行報表
Report1.Connect; // 預先連接報表與資料庫
Report1.SetVariable('Var', Val); // 修改報表變數
Report1.ReCalcReport; // 變數變更後重算報表
核心規則:
TDataSource 可共享同一 TTable/TQueryTDataSource,但僅一個視窗放 TTable// Form2 執行期動態指向 Form1 的 Table1
Form2.DataSource1.DataSet := Form1.Table1;
範例專案 C:\Delphi\DEMOS\DB\TwoForms\TWOForms.DPR 示範:Form1 顯示國家名稱/首都/洲,Form2 顯示面積/人口,雙視窗同步導航。