【文章內(nèi)容簡介】 ID Bigint 是 標(biāo)識本次用戶的統(tǒng)計 Da_year Int 否 標(biāo)識統(tǒng)計年份 Da_month Int 否 標(biāo)識統(tǒng)計月份 Da_day Int 否 統(tǒng)計日期 Da_gongzi Money 否 每日工資收入 Da_shangye Money 否 每日商業(yè)收入 Da_qitashou Money 否 每日其他收入 Da_huoshi Money 否 每日伙食開銷 Da_jiaotong Money 否 每日交通開銷 Da_qitakai Money 否 每日其他開銷 Da_beizhu text 否 備注信息 月收支統(tǒng)計信息表： 該表存儲用戶進(jìn)行月收支統(tǒng)計時的信息，包括統(tǒng)計年份，統(tǒng)計月份，一些月收入信息，月支出信息，備注等字段。 表 43 月收支統(tǒng)計表 字段名稱 字符類型 是否主鍵 說明 ID Bigint 是 標(biāo)識本次用戶統(tǒng)計 Mo_year Int 否 統(tǒng)計年份 Mo_month Int 否 統(tǒng)計月份 Mo_yuexin money 否 每月月薪收入 Mo_shangye Money 否 每月商業(yè)收入 Mo_touzi Money 否 每月投資收入 Mo_qitashou Money 否 每月其他收入 Mo_shenghuo Money 否 每月伙食開銷 Mo_jiaotong Money 否 每月生活開銷 Mo_zhufang Money 否 每月交通開銷 Mo_shuidian Money 否 每月水電開銷 Mo_touzifei Money 否 每月投資開銷 Mo_qitafei Money 否 每月其他開 銷 Mo_beizhu text 否 備注信息 年收支統(tǒng)計信息表存儲用戶進(jìn)行年收支統(tǒng)計時的信息，包括統(tǒng)計年份，一些年收入信息，月支出信息，備注等字段。 表 44 年收支統(tǒng)計表 字段名稱 字符類型 是否主鍵 說明 ID bigInt 是 標(biāo)識用戶本次統(tǒng)計 Ye_year Int 否 所統(tǒng)計年份 Ye_gongzi money 否 年工資收入 Ye_shangyeli Money 否 年商業(yè)利潤 Ye_touzili Money 否 年投資利潤 Ye_lilv Money 否 年利息收入 Ye_daikuan Money 否 年貸款收入 Ye_qitashou Money 否 年其他收入 Ye_yishi Money 否 年吃穿開銷 Ye_fangfei Money 否 房租開銷 Ye_touzi Money 否 投資開銷 Ye_shangye Money 否 商業(yè)投資 Ye_shuishoufei Money 否 年上繳稅收 Ye_huaizaifei Money 否 償還貸款 Ye_qitafei Money 否 其他開銷 Ye_beizhu text 否 備注信息 資產(chǎn)信息統(tǒng)計表： 保存資產(chǎn)信息的統(tǒng)計，包括了用戶資產(chǎn)狀況模塊的銀行存款，物品房 產(chǎn)的信息統(tǒng)計情況。例如銀行存款模塊里面的所有字段，物品信息情況的所有字段，以及房產(chǎn)信息的所有字段。 表 45 資產(chǎn)信息統(tǒng)計表 字段名稱 字符類型 是否主鍵 說明 ID Bigint 是 標(biāo)識用戶本次的資產(chǎn)統(tǒng)計 Ba_yinhang Char 否 用戶存款銀行名稱 Ba_zhanghu Char 否 用戶存款賬戶名 Ba_zhanghao Int 否 存款賬號名 Ba_cunkuan Money 否 存 款金額 Ba_lilv Float 否 存款利率 Ba_riqi Date 否 存款日期 Ba_bizhong Char 否 存款幣種 Ba_fangshi Char 否 存款方式 Ba_beizhu Text 否 存款信息備注 Wu_name Char 否 物品名稱 Wu_jiage Money 否 物品價格 Wu_riqi Date 否 物品購買日期 Wu_beizhu text 否 物品信息備注 Ho_hao Int 否 房產(chǎn)證書號 Ho_suozaidi Text 否 房屋所在 地 Ho_fangzhu Char 否 房主 Ho_mianji Float 否 房屋面積 Ho_danjia Money 否 單位面積價格 Ho_beizhu text 否 備注信息 投資信息情況表： 存儲用戶的投資信息的情況，包括證券投資和商業(yè)投資的一些基本信息。 表 46 投資信息情況表 字段名稱 字符類型 是否主鍵 說明 ID Bigint 是 標(biāo)識此次統(tǒng)計 Zh_name Char 否 證券名稱 Zh_leixing Char 否 證券類型 Zh_danwei Char 否 證券 發(fā)型單位 Zh_shuliang Int 否 購買證券數(shù)量 Zh_danjia Money 否 證券單價 Zh_jiage Money 否 證券目前價格 Zh_riqi Datetime 否 證券日期 Zh_beizhu Text 否 備注信息 Sy_name Char 否 商業(yè)投資項目名稱 Sy_riqi Datetime 否 投資日期 Sy_jine Money 否 投資金額 Sy_kaishi Datetime 否 商業(yè)項目開始日期 Sy_wancheng Datetime 否 商 業(yè)項目完成時期 Sy_shouyi Money 否 投資收益 Sy_beizhu text 否 備注信息 存儲用戶貸款信息的情況： 表 47 貸款信息表 字段名稱 字符類型 是否主鍵 說明 ID Bigint 是 標(biāo)識用戶此次統(tǒng)計 Dk_xiangmu Text 否 貸款項目名稱 Dk_yinhang Text 否 貸款銀行 Dk_jine Money 否 貸款金額 Dk_lixi Float 否 貸款利息 Dk_riqi Datetime 否 貸款日期 Dk_huankuan Datetime 否 還款日期 Dk_danbao Text 否 擔(dān)保單位 Dk_beizhu text 否 備注信息 圖 42 數(shù)據(jù)庫表的關(guān)系圖 系統(tǒng)登陸模塊的設(shè)計 在該系統(tǒng)模塊中，用戶通過輸入用戶名和密碼，點確定之后，通過語句將輸入的用戶名稱和密碼通過數(shù)據(jù)庫語句與用戶登陸數(shù)據(jù)表中的信息進(jìn)行對比，如果對比結(jié)果相同，則提示登陸成功信息，用戶進(jìn)入主界面窗口，如果對比結(jié)果不相同，則提示用戶輸入 信息錯誤，信息提示框清空，提示用戶重新輸入。 圖 43 系統(tǒng)登陸模塊流程圖 用戶注冊模塊功能的設(shè)計 該模塊實現(xiàn)了用戶的注冊功能，在確認(rèn)按鈕的代碼中，將用戶輸入的用戶名稱與數(shù)據(jù)庫中已經(jīng)有的用戶名做個對比，如果判斷已經(jīng)存在的用戶名，則提示用戶輸入的用戶名稱已經(jīng)存在；如果用戶名沒有被使用過，則判斷兩次輸入的密碼是否一致，如果不一致，返回重新輸入，如果一致，則將用戶信息保存到數(shù)據(jù)庫中，提示用戶注冊 成功。 登陸窗體 輸入用戶名密碼 判斷是否正確 進(jìn)入主界面 是 否 注冊窗體 輸用戶名稱和密碼 是否存 在的戶 戶名 兩次密碼輸是否一致 用戶信息存入數(shù)據(jù)庫 是 是 是 否 圖 44 用戶注冊模塊流程圖 密碼修改模塊功能的設(shè)計 在本模塊中，代碼先對用戶輸入的舊密碼進(jìn)行判斷，和原來的密碼進(jìn)行對比，如果是不同的，則提示用戶輸入密碼錯誤，要求用戶重新輸入密碼，如果是相同的，則判斷兩次輸入的新密碼是否一致，如果不一致，要求用戶重新輸入新的密碼。如果一致，則提示修改成功信息，將新的密碼取代原來數(shù)據(jù)庫中舊的密碼。下次用戶登陸的時候必須輸入新的密碼才可以進(jìn)入系統(tǒng)。為了保證用戶 輸入信息的安全性，在密碼輸入框中都采用的密文輸入形式，不會看到明文的密碼輸入。 圖 45 密碼修改模塊流程圖 收入統(tǒng)計和查詢模塊的設(shè)計 包括年，月，日統(tǒng)計的模塊，代碼判斷用戶是否輸入正確的年，月，日期，如果輸入不正確或者沒有填，則要提示用戶輸入正確的日期。日期判斷正確后，則用戶在輸入完成后點擊確定，系統(tǒng)通過數(shù)據(jù)庫語句將這些數(shù)據(jù)保存在對應(yīng)本用戶操作的各個收入統(tǒng)計表當(dāng)中去。查詢時候按照日期查詢，代碼通過用戶 的 ID號，和用戶輸入的日期信息查詢數(shù)據(jù)庫，將查詢的結(jié)果分別輸出到各個字段所對應(yīng)的表上去。在輸入數(shù)據(jù)時候如果有重復(fù)的日期數(shù)據(jù)話，系統(tǒng)通過判斷，會提示密碼修改窗體 輸入舊密碼和新的密碼 舊密碼是否正確 兩次密碼一致 密碼修改成功 否 是 否 是 用戶該日期已經(jīng)存在，請重新輸入。在該模塊中，按所有統(tǒng)計字段的個數(shù)定義變量，通過加法函數(shù)和減法函數(shù)，來進(jìn)行總共收支統(tǒng)計的計算和凈收入的計算。 圖 46 收支統(tǒng)計模塊流程圖 圖 47 收支查詢模塊流程圖 進(jìn)入收支查詢界面 輸入查詢條件 查詢條件是否完整 查詢?nèi)掌谑欠裰貜?fù) 從數(shù)據(jù)庫中讀取數(shù)據(jù) 是 否 是 否 將相關(guān)的數(shù)據(jù)返回界面 收支統(tǒng)計界面 收支信息輸入 是否輸入日期 日期是否重復(fù) 統(tǒng)計成功，存到數(shù)據(jù)庫 是 否 是 否 資產(chǎn)情況的統(tǒng)計和查詢的設(shè)計 該模塊中分為銀行存款模塊和固定資產(chǎn)模塊，在這些模塊中，代碼將用戶的輸入的信息與數(shù)據(jù)庫進(jìn)行連接，如果信息輸入格式正確，并且完整的話，則將用戶的 ID 連同相關(guān)的統(tǒng)計信息一起保存到資產(chǎn)情況的數(shù)據(jù)表中去。查詢時，代碼語句將用戶的 ID 和相關(guān)的統(tǒng)計字段作為關(guān)鍵字查詢，將查詢的結(jié)果返回到相應(yīng)的編輯框當(dāng)中去。 圖 48 資產(chǎn)統(tǒng)計模塊流程圖 投資情況的統(tǒng)計和查詢的設(shè)計 在本模塊中分為證券投資和商業(yè)投資，證券投資中主要包括證券類不是型，名稱，發(fā)型單位，購買數(shù)量，購買單價，日期等信息，代碼可以完成判斷這些輸入信息是否完整，格式是否正確，如果判斷正確，則使用數(shù)據(jù)庫語句將這些信息輸入到投資數(shù)據(jù)庫表中去；同時提示用戶數(shù)據(jù)輸入成功，輸入框清空；在查詢的時候，輸入證券名稱，則代碼通過相應(yīng)的 ID 號和證券名稱對照數(shù)據(jù)庫查詢相關(guān)的數(shù)據(jù)紀(jì)錄，查找到以后將其他的數(shù)據(jù)顯示到字段對應(yīng)的編輯框里。商業(yè)投資基本上也是如此，其數(shù)據(jù)也是存儲在投資情況數(shù)據(jù)表的里面。 資產(chǎn)統(tǒng)計 輸入統(tǒng)計信息 信息是否完整 保存到數(shù)據(jù)庫 否 是 圖 49 投資情況查詢模塊流程圖 貸款情況的統(tǒng)計和查詢的設(shè)計 該模塊主要功能是用戶對自己的貸款情況進(jìn)行統(tǒng)計，查詢，統(tǒng)計時候需要輸入貸款項目名稱，貸款銀行名稱，貸款金額，貸款利息，擔(dān)保人等信息，代碼使用數(shù)據(jù)庫語句將這些信息統(tǒng)計到貸款情況數(shù)據(jù)表中去。在查詢的時候，通過輸入貸款的項目名稱，系統(tǒng)通過數(shù)據(jù)庫查詢語句找到對應(yīng)的 ID 號和項目名稱所對應(yīng)的數(shù)據(jù)表，將相關(guān)的數(shù)據(jù)返回到查詢界面各個相應(yīng)的編輯框中去。 實現(xiàn)用戶登陸模塊的 代碼 procedure (Sender: TObject)。 begin CheckUser:=。 with do//使用 ADODataSet組件連接數(shù)據(jù)庫 begin Active:=false。 Active:=true。 end。 if ( =39。39。) or (=39。39。) then begin 投資情況查詢 輸入查詢信息 查詢條件是否完整 在數(shù)據(jù)庫中查找記錄 返回查詢結(jié)果 否 是 showmessage(39。用戶名和密碼不能為空 39。)。 end else if (39。username。PWd39。,vararrayof([,]),//對比數(shù)據(jù)庫中存放的帳戶密碼信息是否和輸入的一致 [locaseinsensitive]) then begin 。 。 end else begin showmessage(39。用戶名或密碼名不正確 !39。)。 。//編輯框獲取焦點 exit。 end。 end。 收入統(tǒng)計模塊的代碼 procedure (Sender: TObject)。 begin if Leng