




已閱讀5頁,還剩22頁未讀, 繼續免費閱讀
版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領
文檔簡介
無憂無慮畢設網 ():畢業設計源碼下載 畢業設計源碼下載: 本文配套程序下載地址 : 無憂無慮畢設網 ()-大學生畢業設計站 ,免費畢業設計論文 ,無憂無慮畢設網 大學生畢業設計 ,出售各類畢業設計源碼 ,論文 ,程序源碼 ,網站源碼 ,免費視頻教程 ,我們將竭誠為您服務! 目 錄 前言 . 2 1 系統的可行性分析 . 2 2 系統需求分析 . 3 2.1 系統調查 . 3 2.2 數據流圖 . 4 3 系統概要設計 . 5 3.1 系統功能模塊 . 5 3.2 數據庫概念模型設計 . 6 3.3 開發平臺選擇 . 8 4 詳細設計 . 9 4.1 各功能模塊設計 . 9 4.2 數據庫表的設計 . 10 5 系統實現 . 13 5.1 用戶界面設計 . 13 5.2 基礎信息模塊的實現 . 15 5.3 基礎業務功能模塊的實現 . 17 5.4 系統查詢模塊的實現 . 20 5.5 系統報表模塊 . 23 5.6 系統設置 . 24 5.7 數據備份 . 25 6 結束語 . 25 參考文獻 . 26 1 汽車零件銷售管理系統的實現 摘要 :汽車零件銷售 管理系統是 從銷售公司實際業務出發 ,分析了 汽車零件管理的工作流程,并以入庫管理和出庫管理為重點 ,實現 了對汽車零件 的材料管理、出入庫管理、查詢管理等功能 ,描述了兩 個子系統 的模塊結構設計及實施過程中的技術要點。用戶可以通過相應的模塊,對 汽車零件 的基本情況進行更新、刪除和查詢,對 零件 材料的出庫和入庫進行管理,并實現了 出入庫明細進行查詢,對出庫 、 入庫和 客戶信息的 報表生 成, 同時設計了 數據備份等 系統管理功能。 本系統是使用 Delphi 7.0 開發工具 ,Access 數據庫結合 BDE 數據訪問對象來實現數據庫的操作 。 關鍵詞 :汽車零件銷售管理; Delphi 7;管理信息系統 The Development of Vehicle Components Sale Management System Abstract: The vehicle components sale management system is a management information system which was developed according to the actual operation of the distribution company and the analysis of the vehicle components management process.It makes the vehicle components going into&out of the storage management as its two major modules and has functions to manage the material,going into&out of storage and query of vehicle components.This test makes an particular explanation about the design of these two subsystems module frame and the important technique used in the process of its development.Users can update,delete and search the basic information about vehicle components,manage the going into&out of the storage vehicle components materials according to corresponding modules.This sale management system can create report forms of going into&out of the storage and copy data automatically, at the same time it set popedom according to different users.This system uses the Delphi7 as its development tool, and the Access database as well as BDE data access object to operate the database. Key words:vehicle components sale management; Delphi 7; management information system 2 前言 當今時代是飛速發展的信息時代,在各行各業中離不開信息 的 處理,這正是計算機被廣泛應用于信息管理環境 的原因 。計算機的最大好處在于利用它能夠進行信息管理 ,利用 計算機進行信息 管理 不僅提高了工作效率, 而且 對于復雜的信息計算機能夠充分發揮它的優越性。 信息管理系統是進行信息的采集、存儲、加工、維護和使用的系統。它是隨著管理科學 和技術科學的發展而形成的。 隨著科學技術的不斷提高 ,計算機科學日漸成熟 , 它已進入人類社會的各個領域并發揮著越來越重要的作用。 作為計算機應用的一部分 ,使用計算機對進銷存信息進行管理 ,具有手工管理無法比擬的優點 。 例如 :檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優點能夠極大地提高信息管理的效率 ,也是企業走向科學化、正規化、與世界接軌的重要條件。因此,開發這樣一套管理軟件是有必要的。 1 系統的可行性分析 開發的系統是給用戶提供更方便的操作環境,首先系統要具有可行性。本系統主 要從技術可行性 、 經濟可行性 、 操作可行性三個方面進行分析 。 技術可行性 :該系統所需硬件設備,市場上有銷售且價格適中,操作系統采用 Windows系列操作系統,開發工具采用 Delphi,數據庫管理采用 Access,這些軟件在 MIS開發中已被大量應用,技術上都比較成熟 ,因此在技術上是可行的。 經濟可行性 :該系統所需的成本并不高 ,給企業帶來的效益遠遠超過所需要的成本 ,因此開發這個系統在經濟上是可行的。 操作可行性 :本系統的操作并不需要有很高的計算機專業知識 ,一般的操作員都很容易學會 ,操作簡單易行 ,具有一般電腦操作知識 即可 ,所以本系統在操作上也是可行的。 3 2 系統需求分析 2.1 系統調查 隨著人們生活水平的不斷提高 ,汽車走進企業走單位走進家庭是當前發展的必然趨勢 ,這么多的車輛免不了要修車和換零件 。 零件銷售企業通常都有來自四面八方的客戶 ,要求各種不同型號車輛的零件 ,面對這種較為復雜的情況 ,很多小型零件銷售公司還采用手工記錄 ,因此會有以下一些問題 : 1.對零件的管理工作缺乏規范性 ,有關人員對零件的基本情況缺乏了解 。 2.手工記錄工作量大 ,出錯率高 ,容易給日常工作帶來麻煩 。 3.如果負責人對貨物信息掌握不及時、不準確 ,會影響 到企業的決策效果。 根據現實情況 ,汽車零件銷售管理系統開發工作 ,有以下幾個開發目標 : ( 1) 提高管理效率 ,降低人工成本。 ( 2) 系統具有可移植性、數據共享性 ,能適應企業未來業務的發展。 ( 3) 通過系統加工的數據,及時調整營銷策略。 基于以上的開發目標,系統開發有三個方面的需求 :功能需求 、 報表需求和安全性需求 。 1.功能需求 :系統涉及部分零件資料,包括零件入庫、出庫等功能;提供強大的查詢功能,可進行不同類型查詢;系統還要提供客戶信息的添加 、 修改。 2.報表需求 :系統要對客戶信息和零件的入庫 、 出庫和退貨信息生產報表便于管理者 查看信息 。 3.安全性需求 :根據汽車零件銷售公司的管理流程 ,為了增強系統安全性 ,進入系統前需進行身份驗證 ,用戶登錄后 ,根據不同操作需求 ,完成對汽車零件入庫 、 出庫 、 退貨的管理 。 圖 2-1為登錄時的流程圖 。 N Y N Y 圖 2-1登錄時的流程圖 用戶登錄 身份驗證 正確 ? 主窗體 退出系統 顯示錯誤信息 是否超過三次 ? 4 2.2 數據流圖 數據流圖是對系統調研階段繪制的業務流程圖進行分析的基礎上 ,從系統的科學性 、 管理的合理性 、 實際運行的可行性角度出發 ,將信息處理功能和彼此之間的聯系自頂向下逐層分解 ,從邏輯上精確地描述系統應具有的數據加工功能 、數據輸入 、 數據輸出 。 本系統數據流圖如圖 2-1(系統頂層數據流圖 )和 2-2(系統第 一層數據流圖 )所示 。 事務 信息報表 數據庫信息 數據庫 圖 2-2系統頂層數據流圖 D1 數據庫用戶管理表 數據庫信 息 事務 事務 相關信息報表 相關信息 事務相關信息 D2 數據庫相關表 圖 2-3 系統第一層數據流圖 管理員 汽車零件銷售 管理系統 管理員 管理員 1 接受 事務 2 處理 事務 3 產生 報表 管理員 5 3 系統概要設 計 3.1 系統功能模塊 汽車零件銷售管理系統從功能上可以劃分為如下幾個功能模塊 (如圖 3-1) : 圖 3-1系統功能模塊圖 汽 車零件銷售管理系統 基礎信息 客戶信息管理 基礎業務 入庫登記管理 出庫登記管理 退貨登記管理 產品信息查詢 客戶信息查詢 入庫信息查詢 出庫信息查詢 退貨信息查詢 系統查詢 客戶信息報表 產品信息報表 入庫信息報表 出庫信息報表 退貨信息報表 系統報表 用戶管理 數據備份 系統設置 系統維護 產品信息管理 信息添加 、 修改 田添加 、 修改 用戶添加 、 修改 添加 、 /保存信息 打印報表 6 3.2 數據庫概念模型設計 3.2.1 系統實體圖 系統中涉及到多個實體 ,各自有不同的屬性下面用實體圖來表示各個實體 。主要包括客戶實體、汽車零件實體和用戶實體 (1) 客戶實體圖 圖 3-2 客戶信息實體圖 (2)汽車零件實體圖 圖 3-3 汽車零件實體圖 客戶 Id 客戶全稱 聯系電話 聯系人 手機 地址 傳真 網址 開戶銀行 銀行帳號 納稅號 郵編 汽車零件 Id 產品名稱 產品型號 單價 單位 車型 產地 7 (3)用戶實體圖 圖 3-4 用戶實體圖 3.2.1 系統 E-R 圖 系統各種功能的實現都離不開數據庫的支持 ,因此數據庫的設計是本系統不可缺少的 一部分 。 對數據庫進行 E-R圖的分析幫助我們進一步的了解系統各個功能之間的聯系 ,本系統 E-R圖如 3-5所示 。 1 N N N 1 1 N N 圖 3-5 系統 E-R 圖 用戶 Id 姓名 性別 年齡 登錄身份 登錄口令 職 務 用 戶 汽車零件 客戶 售貨 退貨 入庫 入庫日 期 數量 應付款 數量 金額 出庫日期 數量 退庫日期 金額 8 3.3 開發平臺選擇 本系統的開發選擇了 Delphi 7開發工具和 Access數據庫 ,下面簡單介紹一下 Delphi 7和 Access。 3.3.1 Delphi 7 介紹 本系統是采用 delphi 7 開發工具進行開發的 ,Delphi 不僅是編輯器和編譯器 ,還是一種使用構件進行編程的工具 ,可使軟件開發工作更簡單。 Delphi 作為一種面向對象的可視化開發工具 ,其主要特性主要有以下幾點 : (1) 應用程序的快速開發。 Delphi是基于 Object Pascal的開發工具 ,它具有高性能的 32 位本地優化代碼編譯器。其應用程序像 C+語言編寫的應用程序一樣 ,可直接運行 ,能夠最終生成可單獨執行的 DLL 與 EXE 文件。 (2) 高效的可視化構件庫與面向對象的架構。 (3) 具有集成的快速報表生成工具和集成的圖表構件 ,能將企業數據庫轉換成決策信息。 (4) 能可視化地創建構件 ,通過鼠標拖放生成構件模板 ;具有對 Windows 和Server的完全支持。 (5) 具有多種操作向導 ,可加速程序編寫和減少語法錯誤。 (6) 具有開放式數據庫架構 ,可輕松連接企業內的各式數據庫結 構。 (7) 具有集成的數據庫開發工具、強大的客戶 /服務器運算開發功能。 (8) 具有可伸縮的多層面數據庫架構 ,便于維護和增加重要性。 (9) 具有 Web 數據庫應用程序開發的能力。 在 Delphi 眾多的優勢當中,它在數據庫方面的特長顯得尤為突出:適應于多種數據庫結構,從客戶機服務機模式到多層數據結構模式;高效率的數據庫管理系統和新一代更先進的數據庫引擎;最新的數據分析手段和提供大量的企業組件。 3.3.2 ACCESS 簡介 Microsoft 所推出的 Microsoft SQL Server 與 Microsoft Access 兩大數據庫管理系統是目前應用最廣泛的兩種 。 Access 數據庫系統雖然不如 SQL Server 功能齊全 ,但對于本管理系統的應用來說 ,已經是綽綽有余了 。 Microsoft Access 就是一種采用關系結構的數據庫管理系統 ,它具備一般數據庫管理系統所擁有的功能 ,從而具有易學易用的特性 ,使它成為最適合的數據庫入門軟件 。 相對于其他大型數據庫管理系統 ,Microsoft Access提供了一個經濟 9 實惠的解決方案它不但在價格上比其他系統便宜許多 ,而且 “ 麻雀雖小 ,五臟俱全 ” ,因此十分適合用來開發小 型的數據庫應用系統 。 在 Access數據庫中包含常用的 5個數據庫對象 ,分別是 “ 表 ” 、 “ 查詢 ” 、“ 窗體 ” 、 “ 報表 ” 、 “ 頁 ” 。 表是存放數據的容器,被設計成行和列的格式,就像電子表中的那樣。 查詢是一個 Access 對象,它詢問數據庫中有關數據的問題。根據設計方法的不同,查詢能夠在數據庫中檢索并組合來自不同表的數據 。 窗體是一個窗口,它提供一種很方便的途徑來查看數據庫中已有記錄或向數據庫中增添新記錄。 報表是一個 Access 對象,設計來顯示數據,其作用類似于窗體,但 主要是用于數據打印,不能輸入數據。 頁是一種特殊類型的窗體,它使用戶能夠利用 Web 瀏覽器查看和編輯Access的表。 4 詳細設計 4.1 各功能模塊設計 1.基礎信息模塊 (1) 產品信息管理模塊 :產品信息管理模塊包括產品的添加 、 修改和保存三個部分 。 用戶可以通過前進鍵和后退鍵逐個查看產品信息 。 (2) 客戶信息管理模塊 :客戶信息管理模塊包括客戶信息的添加 、 修改和保存三個部分 。 用戶可以通過前進鍵和后退鍵逐個查看客戶信息 。 2.基礎業務模塊 (1) 入庫登記管理模塊 :入庫登記管理主要是 對入庫零件信息錄入 ,然后生產入庫信息報表 。 (2) 出庫登記管理模塊 :出庫登記管理主要是對出庫零件信息錄入 ,然后生成出庫信息報表 。 (3) 退貨登記管理模塊 :退貨登記管理主要是對客戶不滿意退回的零件信息的記錄 ,然后生成退貨信息報表 。 3.系統查詢模塊 本系統提供了強大的信息查詢功能包括產品信息查詢 、 客戶信息查詢 、 入庫信息查詢 、 出庫信息查詢和退貨信息查詢 5個 。 用戶可以有條件的對這些信息進行查詢 ,如果數據庫中有所要查詢的信息 ,列表中將會列出零件的全部信息 。 10 4. 系統報表模塊 本系統提 供對某些信息的報表輸出 ,主要有客戶信息報表、產品信息報表、入庫信息報表、出庫信息報表和退貨信息報表 ,在用戶對基礎信息和基礎業務進行操作后就會生成相應的報表 ,用戶可以查看相關報表 。 5. 系統設置模塊 系統設置是指用戶管理,系統中只有管理員可以對用戶進行訪問,用戶管理中有用戶的添加、修改 。 系統的用戶包括管理員和操作員。 6. 系統維護 系統維護主要是數據備份,數據備份中有入庫數據備份、出庫數據備份和退貨數據備份三個內容。 系統流程圖如圖 4-1所示。 N Y N Y 圖 4-1系統流程圖 4.2 數據庫表的設計 根據系統的 E-R圖和實體圖 ,本系統所需要的數據表包括客戶信息表、入庫產品信息表、出庫產品信息表、退貨產品信息表、用戶管理表和汽車零件信息表。 用戶登錄 身份驗證 正確 ? 退出系統 顯示錯誤信息 是否超過三次 ? 基礎信息 基本業務 系統查詢 系統報表 系統設置 系統維護 11 表 4-1客戶信息表 kehu 編號 字段名稱 數據類型 說明 1 Id 自動編號 ,長整型 主鍵 2 Khqc 文本 , 長度為 40 客戶全稱 3 Lxdh 數字 , 長整型 聯系電話 4 Lxr 文本 , 長度為 20 聯系人 5 Sj 數字 , 長整型 手機 6 Di 文本 , 長度為 40 地 址 7 Yb 數字 , 長整型 郵編 8 Cz 數字 , 長整型 傳真 9 Wz 文本 , 長度為 20 網址 10 Khyh 文本 , 長度為 20 開戶銀行 11 Yhzh 數字 , 長整型 銀行帳號 12 Nsh 數字 , 長整型 納稅號 表 4-2入庫零件信息表 chanrk 編號 字段名稱 數據類型 說明 1 Id 自動編號 , 長整型 主鍵 2 Cpmc 文本 , 長度為 40 產品名稱 3 Cpxh 文本 , 長度為 20 產品型號 4 Jsr 文本 , 長度為 20 經手人 5 Rdate 日期 /時間 , 長日期 入庫日期 6 Danjia 貨幣 單價 7 Dan 文本 , 長度為 4 單位 8 Shuliang 數字 , 長整型 數量 9 Cx 文本 , 長度為 20 車型 10 Cd 文本 , 長度為 20 產地 11 Pi 貨幣 批發價 12 Ling 貨幣 零售價 13 Ying 貨幣 應付款 14 Shi 貨幣 實付款 12 表 4-3出庫零件信息表 chanck 編號 字段名稱 數據類型 說明 1 Id 自動編號 ,長整型 主鍵 2 Cpmc 文本 , 長度為 40 產品名稱 3 Cpxh 文本 , 長度為 20 產品型號 4 Cdate 日期 /時間 ,長日期 出庫日期 5 Jsr 文本 , 長度為 20 經手人 6 Dan 文本 , 長度為 4 單位 7 Shuliang 數字 , 長整型 數量 8 Cx 文本 , 長度為 20 車型 9 Cd 文本 , 長度為 40 產地 10 Khbh 數字 , 長整型 客戶編號 11 Khqc 文本 , 長度為 40 客戶全稱 12 Lxdh 數字 , 長整型 聯系電話 13 Ling 貨幣 零售價 14 Je 貨幣 金額 15 Ying 貨幣 應付款 表 4-4退貨零件信息表 chanth 編號 字段名稱 數據類型 說明 1 Id 自動編號 ,長整型 主鍵 2 Cpmc 文本 , 長度為 40 產品名稱 3 Cpxh 文本 , 長度為 20 產品型號 4 Rdate 日期 /時間 ,長日期 出庫日期 5 Tui 文本 , 長度為 20 退貨經手人 6 Tdate 日期 /時間 ,長日期 退貨日期 7 Dan 文本 , 長度為 4 單位 8 Shuliang 數字 , 長整型 數量 9 Khbh 數字 , 長整型 客戶編號 10 Khqc 文本 , 長度為 40 客戶全稱 11 Lxdh 數字 , 長整型 聯系電話 12 Je 貨幣 金額 13 表 4-5用戶信息管理表 pass 編號 字段名稱 數據類型 說明 1 Id 自動編號 ,長整型 主鍵 2 Xm 文本 , 長度為 20 姓名 3 Xb 文本 , 長度為 5 性別 4 Nl 文本 , 長度為 5 年齡 5 Dlsf 文本 , 長度為 20 登錄身份 6 Zw 文本 , 長度為 20 職務 7 Kl 文本 , 長度為 50 登錄口令 表 4-5汽車零件信息表 chanji 編號 字段名稱 數據類型 說明 1 Id 自動編號 ,長整型 主鍵 2 Cpmc 文本 ,長度為 40 產品名稱 3 Cpxh 文本 ,長度為 20 產品型號 4 Danjia 貨幣 單價 5 Dan 文本 ,長度為 4 單位 6 Cx 文本 ,長度為 20 車型 7 Cd 文本 ,長度為 40 產地 4.3 系統運行環境 系統要正常運行 ,必然要一個穩定的運行環境 。 一般用戶對 windows 界面比較熟悉 ,因此建議使用 windows98/2000/xp 操作系統 。 另外系統的 硬件配置是根據用戶對系統的穩定性要求、系統的容量以及用戶的維護水平來決定 。 本系統的硬件配置要求在 256MB/20G 以上的計算機 。 5 系統實現 5.1 用戶界面設計 由于汽車零件管理系統的最終使用者是對計算機并不精通的業務管理人員 ,從他們的應用需求出發 ,系統采用了傳統的基于菜單選擇、填寫表格和簡單回答等友好的人機互交方式。 14 為了保證系統的安全性 ,進入系統之前必須經過必要的安全性驗證。簡潔、清晰、友好是此界面設計的風格。圖 5-1 是用戶登錄界面。 圖 5-1 用戶登錄證界面 主要代碼實現是 : procedure TPASS.FormCreate(Sender: TObject); begin Table1.DatabaseName:=moed; /設置與該組件連接的數據庫名 / table1.DatabaseName:=db1; TAble1.TableName:=pass; /指定該組件封裝的數據表名 TAble1.open; end; procedure TPASS.FormShow(Sender: TObject); begin EDIT1.setfocus; / 將焦點定位到操作員輸入框 pass1:=0; /設置變量為 0 end; procedure TPASS.Edit1KeyDown(Sender: TObject; var Key: Word;Shift: TShiftState); begin If Key = 13 Then edit2.SetFocus ; /回車移動焦點 end; procedure TPASS.Edit2KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin If Key = 13 Then BITBTN1.SetFocus ; /回車移動焦點 end; procedure TPASS.BitBtn1Click(Sender: TObject); /確定 begin if TAble1.locate(DLSF;KL,VARarrayOF(Edit1.TExt,edit2.Text),loCaseInsensitive) then begin MRQP.Label1.caption:=Table1.FieldByName(xm).Asstring; MRQP.statusbar1.panels1.text:=操作員: +PASS.Table1.fieldbyname(xm).asstring; /主窗體狀態欄顯示操作員 close; End 15 Else begin pass1:=pass1+1; /累計密碼輸入錯誤次數 showmessage(口令錯誤,請從新輸入。 ); Edit2.Text:=; Edit2.setfocus; /重新輸入密碼 if pass1=3 then begin /三次輸入錯誤密碼 showmessage(沒有口令,系統無法識別您的身份。 ); PASS.close; /退出 MRQP.close; end; end; end; procedure TPASS.BitBtn2Click(Sender: TObject); /退出 begin pass.close; mrqp.close; end; end. 主界面由主菜單、樹形目錄和工具欄組成 ,如圖 5-2,在界面的上方為主菜單區 ,用于顯示本菜單子功能 ,用戶 可以用鼠標或光標來選擇下拉菜單項選擇。用戶雙擊左邊的樹形目錄也可進入工作狀態 ,工具欄只要單擊即可進行工作。 圖 5-2 系統界面 5.2 基礎信息模塊的實現 5.2.1 產品信息管理模塊 本模塊主要是對零件信息進行錄入 ,主要含有以下信息 :產品編號、產地、 16 產品名稱、平日單價、產品型號、批發價、單位、零售價、車型、建議價等主要信息,本模塊有添加 、 修改和查詢功能 。 圖 5-3 產品信息管理模塊界面 5.2.2 客戶信息管理模塊 本模塊主要是對客戶信息進行錄 入 ,主要含有以下信息 :客戶編號、聯系電話、網址、客戶全稱、地址、開戶銀行、聯系電話、郵編、銀行帳號、聯系人、傳真、納稅號等信息 , 本模塊有添加、修改、查詢等功能。 模塊設計界面如圖 5-4: 圖 5-4客戶信息管理界面 產品信息管理 (CPXXGL)和客戶信息管理 (KHXXGL)的實現代碼如下 : procedure TCPXXGL.Button1Click(Sender: TObject);/添加新產品 (TKHCCG 為添加客戶信息 ) var I:integer; begin try 17 Table1.Last; if table1.fieldbyname(cpbh).asstring then I:=strtoint(table1.fieldbyname(cpbh).asstring)+1 else i:=1; Table1.close; Table1.open; Table1.append; ENFALSE; dbedit1.Text:=formatfloat(000000,i); /生成 6 位產品編號 Dbedit2.setfocus; Except on Exception do showmessage(數據連接錯誤! ); end; end; procedure TCPXXGL.Button3Click(Sender: TObject); /保存產品信息 begin try Table1.Post; Table1.close; Table1.open; ENTRUE; table1.indexfieldnames:=id; button1.setfocus; Except on Econverterror do showmessage(aaaaaaaa); on Exception do showmessage(數據連接錯誤! ); end; end; procedure TCPXXGL.FormKeyPress(Sender: TObject; var Key: Char); begin if key=#13 then /回車 begin if (activecontrol is TDBedit) then Perform(WM_nextdlgctl,0,0); end; end; procedure TCPXXGL.FormClose(Sender: TObject; var Action: TCloseAction); /退出 begin CPXXGL.Release; end; 5.3 基礎業務功能模塊的實現 5.3.1 產品入庫登記模塊 本模塊主要是對入庫信息進行管理 ,主要含有以下信 息: 客戶信息添加 (客戶 18 編號、聯系人、郵編、客戶全稱、地址等等 )、產品信息添加 (產品編 號、 批發價、數量、產品名稱、零售價、產品標識、單價、實付款等等 ),添加的結果在表格中列出。 本模塊界面如 5-5所示 : 圖 5-5 產品入庫登記模塊界面 5.3.2 產品出庫登記模塊 有入庫模塊就會有相對應的出庫模塊 ,本模塊是登記出庫信息 ,主要有 :客戶信息 (編號、全稱、電話等 )、 產品信息 (編號、產品名稱、價格、數量、金額等 )添加完成后 ,便可在下列表查看得到。 本模塊主要界面如圖 5-6 所示 : 圖 5-6產品出庫登記模塊 5.3.3 產品退貨登記管理模塊 本模塊包含出貨信息一覽、信息查詢欄和系統操作欄 ,其中 出貨信息一覽中包括全部的產品信息和客戶信息。系統操作欄包括了查詢、刷新、退貨、退出四個操作。信息查詢欄的選擇條件有客戶編號、客戶全稱等 。 其界面如 5-7所示 : 19 圖 5-7產品退貨登記管理模塊 退貨子系統的實現代碼主要有 : procedure Tcpckth.FormShow(Sender: TObject); begin Combobox1.itemindex:=0; / 設置默認查詢框查詢字段 edit1.text:=; /默認查詢 值為空 tuihou:=cpbh; /默認查詢字段 end; procedure Tcpckth.ComboBox1Click(Sender: TObject); begin case combobox1.ItemIndex of /選擇查詢字段 0:begin tuihou:=cpbh; end; 1:begin tuihou:=cpmc; end; 2:begin tuihou:=cpxh; end; 3:begin tuihou:=khbh; end; 4:begin tuihou:=khqc; end; 5:begin tuihou:=jsr; end; end; end; procedure Tcpckth.BitBtn2Click(Sender: TObject); /刷新 20 begin table1.Filtered:=false; end; procedure Tcpckth.BitBtn1Click(Sender: TObject); /查詢 begin table1.filtered:=true; table1.filter:=format(tuihou+=+%s,edit1.text); end; procedure Tcpckth.BitBtn3Click(Sender: TObject); /退貨 begin if table1.fieldbyname(cpmc).asstring then begin if messagedlg(您真的要 退貨嗎! , mtInformation,mbyes,mbno,0)=mryes then begin cpckthsl.showmodal; /調入退貨數量輸入窗體 end; 5.4 系統查詢模塊的實現 5.4.1 產品信息查詢 產品信息錄入完了之后 ,就可以通過本查詢模塊對數據庫中的信息進行有條件的查詢。產品信息查詢的界面如下 : 圖 5-8產品信息查詢模塊 5.4.2 客戶信息查詢 客戶信息查詢可以通過 客戶編號、客戶全稱、聯系電話和聯系人四個元素進行查詢 ,在選擇查詢條件進行查詢后就會顯示所要查詢的內容 ,要返回按刷新按鈕即可 ,退出則按退出按鈕。 客戶信息查詢的界面如圖 5-9: 21 圖 5-9客戶信息查詢界面 5.4.3 入庫 /出庫 /退貨查詢 入庫出庫退貨的查詢是對產品進出的記錄 ,它們都擁有相同的界面 ,查詢方法也是一樣的。系統的入庫、出庫和退貨查詢可以供管理人員及時的了解產品的銷售情況 ,為決策提供進一步的證據。圖 5-10、 5-11、 5-12分別是出庫、入庫和退貨的查詢報表。 5-10產品出庫查詢界面 5-11產品退貨查詢界面 22 圖 5-12 產品出庫查詢界面 在產品出庫查詢中數據刷新、查詢用到的主要的代碼如下。 procedure Trkxxcx.BitBtn2Click(Sender: TObject); /刷新數據 begin table1.filtered:=false; end; procedure Trkxxcx.BitBtn1Click(Sender: TObject); /查詢數據 begin table1.filtered:=true; table1.filter:=format(tuihou+=+%s,edit1.text); end; procedure Trkxxcx.FormShow(Sender: TObject); /設置默認查詢字段和內容 begin Combobox1.itemindex:=0; edit1.text:=; /查詢內容為空 tuihou:=cpbh; /默 認查詢字段為產品編號 end; procedure Trkxxcx.Edit1KeyPress(Sender: TObject; var Key: Char); /開始查詢 begin if key=chr(13) then begin table1.filtered:=true; table1.filter:=format(tuihou+=+%s,edit1.text); end; end; procedure Trkxxcx.BitBtn3Click(Sender: TObject); /退出 begin close; end; 23 5.5 系統報表模塊 系統報表主要供管理員較為直觀明了、全面的了解產品及客戶的情況。本系統含有產品信息報表、客戶信息報表、入庫信息報表、出庫信息報表和退貨信息報表等。報表的界面如 5-13(產品信息報表和入庫信息報表 )所示。 產品信息報表 產品入庫信息報表之一 產品出庫信息報表之一 圖 5-13 在系統中調用報表語句如下 : if treeview1.selected.text=客戶信息報表 then begin /調入客戶信息報表 application.Createform(tKHXXBB,KHXXBB); khXXBB.quickrep1.previewmodal end; if treeview1.selected.text=產品信息報表 then begin /調入產品信息報表 application.Createform(tCPXXBB,CPXXBB); CPXXBB.quickrep1.previewmodal end; if treeview1.selected.text=入庫信息報表 then begin /調入入庫信息報表 application.Createform(tRKBB,RKBB); 24 RKBB.quickrep1.previewmodal end; if treeview1.selected.text=出庫信息報表 then begin /調入出庫信息報表 application.Createform(tCKBB,CKBB); CKBB.quickrep1.previewmodal end; if treeview1.selected.text退貨信息報表 then begin /調入退貨信息報表 application.Createform(Tthbb,thbb); thbb.quickrep1.previewmodal end; 5.6 系統設置 本系統的用戶管理是對系統使用者相關信息的管理 ,可以添加 、 修改和刪除用戶 ,用戶信 息有 :用戶編號 、 年齡 、 用戶名稱 、 性別 、 登錄身份 、 登錄口令 、 職務等信息 。 系統中只有管理員才可以對用戶管理進行操作。 用戶管理的界面如圖 5-14所示 : 圖 5-14用戶管理 用戶管理模塊用添加用戶的代碼有 : procedure TYHGL.BitBtn1Click(Sender: TObject); var I:integer; begin table1.First; I:=1; while not table1.Eof do begin I:=I+1; table1.next; end; 25 5.7 數據備份 數據備份是企業最基本的存儲需求 ,其基本目標是保證數據的一致性和完整性 。 一般來說 ,完善的備份系統必須符合穩定性 、 安全性 、
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經權益所有人同意不得將文件中的內容挪作商業或盈利用途。
- 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
- 6. 下載文件中如有侵權或不適當內容,請與我們聯系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 車位尾盤包銷合同協議
- 2025-2030年中國合同環境服務行業市場發展分析及發展前景策略與投資研究報告
- 綠色建筑材料供應與質量保證合同
- 共有產權房產權比例調整與社區創新發展合同
- 網紅KOL品牌合作銷售合同
- 海外房產限購資格確認與承諾合同
- 水利建筑工程合同終止及水資源保護服務協議
- 檔案館庫房貨架租賃與檔案數字化存儲服務合同
- 休閑食品電商平臺入駐及物流配送服務合同
- 婚前財產分割與數據資產歸屬合同
- ISO9001設計變更管理程序
- 2024年重慶八中中考數學一模試卷
- MOOC 中國特色文化英語教學-蘇州大學 中國大學慕課答案
- 職業道德與法律說課稿市公開課一等獎省賽課微課金獎課件
- 職業教育教學成果獎申報與實施路徑
- 廣東省廣州市天河區2024年八年級下冊數學期末考試試題含解析
- RoHS2.0 HF與REACH法規培訓教材
- 【大數據“殺熟”的法律規制探究17000字(論文)】
- 股權轉讓協議(工商局版本)
- 鐵道概論(第八版)佟立本主編
- 全國各省市名稱大全
評論
0/150
提交評論