【正文】 以‘ ，’格式化小數(shù)點前的部分 ? 合并字符串并返回 SQLQuery . 函數(shù)說明 通用查詢函數(shù) function SQLQuery(sSQL: String。 overload。 var cds: TClientDataSet。 overload。 var cds: TClientDataSet): Boolean。 . 輸入值 ? sCode:段編號 . 返回值 ? True:成功 ? False:失敗 . 程序流 程 ? 根據(jù)段編號組成相應(yīng)的查詢語句 ? 從后臺查詢數(shù)據(jù)更新數(shù)據(jù)字典 投資管理系統(tǒng)監(jiān)控部分需求說明 原則 : ☉用途： IT部門監(jiān)控本系統(tǒng)的運行情況。 ☉監(jiān)控目標：在線操作員、交易日志、通訊線路。 ☉日間不實時分析數(shù)據(jù)庫的性能，在批處理時給出一些數(shù)據(jù)庫的參數(shù)。 ? 實時監(jiān)控要求： ☉可設(shè)置刷新率； ☉導(dǎo)出，打??； 2. 查詢顯示上海的 SQL庫和深圳的 DBF文件 ☉查詢包括委托庫、委托確認庫、成交回報庫； ☉按照條件查詢，條件包括證券代碼、時間； ☉查詢導(dǎo)出打??； 3. 事后查詢 ☉ 目的：查詢記錄的監(jiān)控情況； ☉主要查詢某日系統(tǒng)的工作情況是否正常，出現(xiàn)錯誤說明錯誤原因； ☉查詢導(dǎo)出打??； 投資管理系統(tǒng)監(jiān)控部分詳細設(shè)計 . 監(jiān)控部分編程規(guī)范 6. 程序結(jié)構(gòu)清析，簡單易懂，單個函數(shù)的 程序行數(shù)最好不要過多。 8. 盡量使用標準庫函數(shù)和公共函數(shù)。 10. 表達式使用括號以避免二義性 . 可讀性要求 17. 可讀性優(yōu)先。 19. 每個源程序文件，都有文件頭說明，說明規(guī)格見規(guī)范。 21. 主要變量定義或引用時，注釋能反映其含義。 23. 處理過程的每個階段都有相關(guān)注釋說明。 25. 利用縮進來顯示程序的邏輯結(jié)構(gòu)，縮進量一致并以 2個空格為單位 。 27. 注釋可以與語句在同一行，也可以在上行。 29. 一目了然的語句不加注釋。 31. 不要輕易用條件分支去替換邏輯表達式。 10. 少用 GOTO語句。禁止 ELSE GOTO。 13. 避免從循環(huán)引出多個出口。 15. 不使用條件賦值語句。 . 正確性與容錯性要 求 9. 程序首先是正確，其次是優(yōu)美 10. 無法證明你的程序沒有錯誤，因此在編寫完一段程序后，應(yīng)先回頭檢查。 12. 所有變量在調(diào)用前必須被初始化。 14. 不要比較浮點數(shù)的相等。 16. 單元測試也是編程的一部份，提交聯(lián)調(diào)測試的程序必須通過單元測試。 4. 公共控件或類或函數(shù)應(yīng)考慮面向?qū)ο蟮乃枷?，減少外界聯(lián)系，考慮獨立性或封裝性。宏定義的名字原則上應(yīng)與后臺 server保持一致，以下為符合規(guī)范的宏定義名字： . 變量命名基本規(guī)則 程序中所有變量的命名遵循以下的組成規(guī)則： 作用域名 +類型前綴名 +自定義名 其中作用域名區(qū)分局部變量和全局變量；類型前綴名是單個或幾個不同基本數(shù)據(jù)類型的組合，基本數(shù)據(jù)類型前綴名在以下各節(jié)作說明；變量的自定義名字由英文字母和數(shù)字組成，使用大小寫字母區(qū)分各單詞，首字符為大 寫英文字母。 . 基本數(shù)據(jù)類型的前綴名 整型變量前綴名 (包括 Shortint, Smallint, Longint, Int64, Byte, Word, and Longword.) 整型（ integer,int64）變量的類型名為‘ i’，例如： iIntegerVar : integer。 字符串變量前綴名 字符串變量的類型名 為‘ s’，例如： sStringVar : string。 . 常用控件的命名： 控件命名采用 [控件前綴 ]+[自定義命名 ] 控件 類名 控件 前綴 TActionList, TAction 表示動作的列表項 act TButton, TSpeedButton, TBitBtn 等所有的按鈕類 btn TCheckBox, TDBCheckBox 等所有的檢查框 chk TRadioButton 單選按鈕類 rdo TToolBar 工具條 tb TMainMenu 所有的主菜單類 mm TMainMenuItem 所有的菜單項類 mi TPopupMenu 所有的彈出式菜單類 ppm TPopupMenuItem 所有的彈出式菜單項類 pmi TLabel, TStaticText 等所有用來顯示的標簽類 lbl TPanel 等所有的面板類 pnl TPageControl 等所有的頁式控件類 pgc TEdit, TMaskEdit 等所有的單行編輯框類 edt TMemo, TRichEdit 等所有的多行編輯 框類 mmo TDrawGrid, TStringGrid 等所有的網(wǎng)格類 grd TsmartGrid 數(shù)據(jù)網(wǎng)格類 dbg TAnimate 等所有的動畫類 ani TImageList 等所有的圖片列表類 imgl TImage 等圖片類 img TChart 圖表類 cht TComboBox, TDBComboBox 等所有的下拉式列表框類 cmb TListBox, TDBList 等所有的列表框類 lst TTreeView tv TListView lv THotKey hk TSplitter 等所有的分隔符類 spt TOpenDialog 等所有的對話框元件類 dlg TTable 等所有的數(shù)據(jù)表類 tbl TQuery 等所有的 SQL 查詢類元件 qry TClientDataSet 所有的客戶數(shù)據(jù)集元件 cds TDataSource ds TDatabase db TSockConnection,TDCOMConnection 等連接元件類 conn TQuickRep, TFastReport 等所有的報表元件類 rpt TDDEClientConv,TDDEClientItem 等所有的 DDE 元件類 dde TMonthCalendar 等所有的日歷類 cal TGroupBox 等控件類 grp . 用戶界面 17) 系統(tǒng)主頁要求美觀大方，登錄后的頁面能體現(xiàn)系統(tǒng)的總體功能框架。 18) 主頁面采用 MDI多文檔管理窗口，菜單提供相應(yīng)的快捷方式。 19) 密碼輸入要用“ *”屏蔽。 21) 完成相同或相近功能的按妞用邊框分隔起來，按鈕要支持快捷方式 。 23) 按 TAB鍵自動切換的順序應(yīng)該與界面上控件的排列順序保持一致。 25) 界面上首先要輸入的和重要的信息控件應(yīng)該是 TAB 鍵順序靠前，而且在比較醒目的位置，使對應(yīng)控件在一開始就獲得焦點。 27) 復(fù)選框和選項框按選擇幾率的高低先后排列，并且有默認的選項。 29) 對于編號、代號等的輸入可以提供小按鈕查詢來得到，對可能有多種選擇的提供向?qū)?。輸入長度應(yīng)該按數(shù)據(jù)庫長度進行約束。 應(yīng)當注意排除無意的無效數(shù)據(jù)錄入，如數(shù)值形態(tài)的控件要防止錄入字符等。 對可能引起致命錯誤或系統(tǒng)出錯的輸入字符和動作要加以限制和屏蔽。而且日期的合理性必須得到驗證。 費率等數(shù)值不能錄入負數(shù)值。不能出現(xiàn) A處有 A的說法， B處有 B的說法，其實是一個意思。 提示或警告信息必須具有向?qū)?，能?知用戶錯誤原因，禁用懲罰性語言，自動使需改變的控件在第一時間內(nèi)獲得焦點。整個系統(tǒng)應(yīng)該采用統(tǒng)一的界面按鈕邏輯風格。 如果執(zhí)行的處理時間比較長要有相應(yīng)進度條或者等待界面提示用戶等待系統(tǒng)響應(yīng)。 32) 美觀與協(xié)調(diào)性原則 圖形按鈕的圖標必須具有代表性 ,能產(chǎn)生感官上的功能認同。 布局要合理切忌過于密 集或過于空曠，合理利用空間。所有控件排列要力求整齊，左右都能對齊， Label內(nèi)容一律右對齊，不要用冒號。from的背景色選 clBtnFace. 所有按鈕大小相同，使用缺省的立體風格，功能相近的按鈕放在一起，退出按鈕一般放在右下角，與最右邊的控件右邊對齊。 能夠使用局 部變量解決邏輯問題的應(yīng)盡可能使用局部變量，盡可能地少使用全局變量。變量長度可以使用類似 sizeof()得到，不允許直接使用常數(shù)標識長度。有關(guān)自定義類型名和變量名的命名方法請參見命名規(guī)則。每行最多只能有一條語句。 除了字符及字串常數(shù)外，源程序和頭文件中不應(yīng)含有其他不可見字符（不包括 TAB鍵）。例如以下的單語句應(yīng)包含在花括號內(nèi)： if (iIntVar 0) then begin return。 任何一個可以獨立運行的程序，它應(yīng)該盡可能地只有一個退出口，本規(guī)范不禁止有多出口的程序編寫，但也不建議這樣做。有以下幾中提示類型 : 錯誤警告 : 顯示帶警告標志的信息窗口 ,按確認關(guān)閉窗口 . 一般信息 : 顯示帶信息標志的信息窗口，按確認關(guān)閉窗口 . 用戶確認 : 顯示帶是 /否選擇的信息窗口 . 監(jiān)控部分界面風格標準 . Form BorderIcons := [biSystemMenu,biMinimize] ， BorderStyle := bsSingle ， := GB2312_CHARSET， := 宋體 := 9， FormSytle := (待定 )[ fsMDIForm、fsStayOnTop ]， Postion := poScreenCenter . Lable 右對齊 . Edit 左對齊， Width:=1 3 5 7 9 11 137… . . Combobox 左對齊， Width:=1 3 5 7 9 11 137… . . Button Width := 75， Heigth := 25， Caption := ‘增加 (amp。B) ‘ . StringGrid Align := alTop ， Ctrl3D:=False， DefautlRowHeigth := 18， FixedCols := 0 . Shape := clBtnFace , Shape := stRectangle . Panel Align := [alBottom,alTop,alClient,alLeft,alRigth]， BevelOuter := bvNone， BorderStyle := bsSingle， Ctrl3D := False . SmartGrid Align := alClient， DataSource := []， LookAndFeel := lfFlat， := True， := True ， ShowBands := True ， ShowGroupPanel := True ， := True， := False Name := (請先設(shè)置這個屬性，因為在生成的 Column. Name 與這個屬性有關(guān) ) Bands (按需要設(shè)置 ) Columns (使用 [Add All Fields… ]增加，對不需要的 Field 設(shè)置 Visible := False) DataSource := := True (按需要設(shè)置 ) KeyField := LookAndFeel := lfFlat := False := True (按需要設(shè)置 ) := True (插入記錄后設(shè)置 ) ShowGroupPanel := True (按需要設(shè)置 ) ShowRowFooter := True (按需要設(shè)置 ) ShowSummaryFooter := True (按需要設(shè)置 ) SummaryGroups (按需要設(shè)置 ) . 監(jiān)控部分設(shè)計思路 總體結(jié)構(gòu) 監(jiān)控部分需要監(jiān)控投資管理系統(tǒng)的運行情況，要求不論監(jiān)控人員是否熟悉本系統(tǒng) ,都能正確和方便地了解系統(tǒng)運行情況，使系統(tǒng)能盡量少的從后臺直接打開數(shù)據(jù)庫。 為了保證后臺數(shù)據(jù)庫的一致性，監(jiān)控部分只能讀數(shù)據(jù)庫的內(nèi)容，而不能進行插入、更新、刪除操作。 監(jiān)控人員登錄系統(tǒng)時，要根據(jù) Oracle 中所存儲的操作員信息驗證身份。 ? 數(shù)據(jù)庫訪問控制： 訪問數(shù)據(jù)庫的用戶名和密碼存放在注冊表中，密碼經(jīng)過加密存放的是密文。系統(tǒng)管理員可以通過設(shè)置方便的修改訪問數(shù)據(jù)庫的用戶名和密碼。039。運行中 39。139。未響應(yīng) 39。 查詢上交所數(shù)據(jù)庫 ? 源代碼： ? 功能： 根據(jù)監(jiān)控人員所輸入的席位、證券代碼，起始時間、截止時間查詢上交所的委托庫、確認庫、成交回報庫。 ? 數(shù)據(jù)庫訪問方式： ADO直聯(lián) SQL Server ? 訪問數(shù)據(jù)庫名 : ashare_ordwth, ashare_ordwth2, ashare_cjhb ? 查詢語句 : 根據(jù)用戶輸入的查詢條件，使用公用函數(shù) MakeSQL()動態(tài)生成查詢語句。并按要求打印文檔。 ? 訪問數(shù)據(jù)庫名 : ? 查詢語句 : 根據(jù)用戶輸入的查詢條件，使用公用函數(shù) MakeSQL()動態(tài)生成查詢語句。 輸入值 ? 無 返回值 ? true: 驗證成功 ? false: 驗證失敗 程序流程 ? 檢查操作員是否存在； ? 檢查操作員密碼是 否正確； GetSeatInfo 函數(shù)說明 獲取當日有效席位； 函數(shù)原形 fu