【正文】 )。 begin inherited。,39。 begin inherited。 2: searchwhat:=39。select * from tb_stock 39。+39。%39。 。,39。 begin inherited。 （ 2）在“ Additional”組件頁中點選“ TBevel”組件，為每一類數(shù)據(jù)添加邊框。 begin inherited。name39。 :=fieldbyname(39。).AsString。lowerlimit39。 getspbh 過程完整代碼如下： procedure (sender:Tobject)。+Formatfloat(39。在“ Additional”組件頁中點選“ TStringGrid”組件，添加到窗體上，命名為“ StringGrid1”。代碼如下： procedure (Sender: TObject)。 Cells[3,0]:=39。 Cells[7,0]:=39。 。 end。 在彈出的信息提示窗體 的【確定】按鈕單擊事件處理過程中將數(shù)據(jù)添加到TStringGrid 組件中。 if xh=2 then gcol:=gcol+1。 33 總結(jié) 在這個軟件設(shè)計的最初，我即按照老師的要求一步一步往下做，努力作好需求分析。 下一階段就到了編程階段了，在這個階段我們首先考慮的是界面，一個界面設(shè)計的好壞直接關(guān)系到使用者的方便程度，于是老師提出的要求就是實用。 在接下來的時間里，我繼續(xù)對設(shè)計進(jìn)行優(yōu)化， 包括界面的美觀，以及程序的設(shè)計。在經(jīng)過和老師的交流討論之后，我的設(shè)計也逐漸進(jìn)入了尾聲。 到了數(shù)據(jù)庫設(shè)計階段，首先選擇了 SQL Server 2021 作為數(shù)據(jù)庫管理系統(tǒng)。 :=grow。 end。 。 (sender)。 end。 Cells[6,0]:=39。 Cells[2,0]:=39。 （ 5）在窗體上添加 TADOQuery組件，命名為“ ADOQuery1”，設(shè)置其 Connection屬性為“ ”。 30 圖 516 進(jìn)貨單錄入模塊運行界面 1．窗體設(shè)計步驟 （ 1）從基礎(chǔ)窗體繼承一個窗體，命名為“ F_jhd”，設(shè)置其 Caption 屬性為“進(jìn) 貨單錄入”。,1) //格式 化編號 else spbh:=39。 end。).AsInteger)。 :=fieldbyname(39。standard39。).AsString。 2．程序相關(guān)代碼 在窗體的 OnShow 事件處理過程中如果為修改，將要修改的記錄顯示在窗體的編輯框中。商品基本信息模塊運行結(jié)果如圖 515 所示。 在【打印】按鈕的單擊事件處理過程中指定報表文件、預(yù)覽報表。 except (39。提示 39。%39。+searchwhat+39。 。 1: searchwhat:=39。代碼如下： procedure (Sender: TObject)。 except (39。 在【刪除】按鈕的單擊事件處理過程中當(dāng)用戶確認(rèn)刪除后刪除數(shù)據(jù)。 end。 change:=False。 （ 5）在“ Data Controls”組件頁中點選“ TDBGrid”組件，添加到窗體上，命名為“ DBGrid1”，設(shè)置其 Align 屬性為“ alClient”； DataSource 屬性為“ DataSource1”，雙擊 DBGrid1 組件，在彈出的列編輯器中設(shè)置字段標(biāo)題，如圖514 所示。右 鍵單擊 TToolBar 組件，在彈出的菜單中選擇“ New Button”菜單項，并設(shè)置其 Style 屬性為“ tbsDivider”。 23 圖 511 數(shù)據(jù)庫連接設(shè)置界面 （ 6）單擊【測試連接】按鈕，如果連接成功，則提示成功，單擊【確定】按鈕完成數(shù)據(jù)庫的連接。 數(shù)據(jù)模塊設(shè)計 數(shù)據(jù)模塊窗體主要功能是統(tǒng)一管理數(shù)據(jù)組件。 基礎(chǔ)窗體創(chuàng)建 創(chuàng)建基礎(chǔ)窗體主要為了提高開發(fā)速度和代碼的利用率，從基礎(chǔ)窗體繼承的子窗體具有基礎(chǔ)窗體的全部功能。指定TCheckBox 組件的父對象并設(shè)置該組件的 大小和位置。 //設(shè)置面板在最前面 end。是否退出系統(tǒng)？ 39。 Shift: TShiftState)。在窗體上添加 3 個 TPanel組件，分別命名為“ Panel3”、“ Panel1”、“ Panel4”，分別設(shè)置其 Align 屬性為“ alTop”、“ alLeft”、“ alClient”。 圖 52 添加 TActionToolBar 對象 （ 3）選擇“ Actions”選項卡，單擊【 New Action】按鈕，添加“ TAction” 18 對象，并在“ Object Inspector”窗口中設(shè)置 Caption 屬性，如圖 53 所示。 表 416 庫存商品表結(jié)構(gòu) 字段名 數(shù)據(jù)類型 長度 主鍵否 功能描述 tradecode varchar 6 商品編號 fullnamed varchar 20 是 商品全名 name varchar 10 商品簡稱 type varchar 10 商品類型 standard varchar 10 商品規(guī)格 unit varchar 4 單位 produce varchar 20 產(chǎn)地 qty float 8 庫存數(shù)量 price float 8 進(jìn)貨時的最后一次進(jìn)價 averageprice float 8 加權(quán)平均價 saleprice float 8 銷售時的最后一次銷價 checked float 8 盤點數(shù)量 upperlimit int 4 存貨報警上限 lowerlimit int 4 存貨報警下限 provideinf varchar 40 商品供貨信息 memo varchar 40 備注 shortcode varchar 10 拼音簡碼 （ 17）本單位信息表（ tb_unit） 本單 位信息表用于保存本單位的信息。 表 412 進(jìn)貨退貨明細(xì)表 字段名 數(shù)據(jù)類型 長度 主鍵否 功能描述 billcode varchar 20 單據(jù)編號 tradecode varchar 20 商品編號 fullname varchar 20 商品全稱 type varchar 10 商品型號 14 standard varchar 10 商品規(guī)格 unit varchar 4 單位 produce varchar 20 產(chǎn)地 qty float 8 數(shù)量 price float 8 進(jìn)價 tsum float 8 金額 billdate datetime 8 錄單日期 （ 13）進(jìn)貨退貨表（ tb_rewarehouse_main） 進(jìn)貨退貨表用于存儲進(jìn)貨退貨中主要的和相同的信息。 表 48 收款信息表結(jié)構(gòu) 字段名稱 字段類型 字段大小 主鍵否 功能描述 billdate datetime 8 錄單日期 billcode varchar 20 是 單據(jù)編號 units varchar 20 付款單位 gathering float 8 金額 handle varchar 20 經(jīng)手人 summary varchar 40 摘要 （ 9）付款信息表（ tb_payment） 付款信息表用于保存付款信息。 表 44 用戶權(quán)限表結(jié)構(gòu) 字段名稱 字段類型 字段大小 主鍵否 功能描述 number Varchar 20 是 用戶編號 users Varchar 20 用戶名稱 password Varchar 20 用戶密碼 stock Bit 1 進(jìn)貨管理 vendition Bit 1 銷 售管理 checked Bit 1 庫存管理 money Bit 1 錢流管理 system Bit 1 系統(tǒng)維護(hù) base Bit 1 基本信息 （ 5）費用表（ tb_cf） 費用表用于記錄費用信息。 （ 1）職員信息表（ tb_employ） 職員信息表用來保存職員信息。 ? 系統(tǒng)運行穩(wěn)定、安全可靠。 ? 強大的庫存預(yù)警功能，在意外中將損失降到最低。 ? 統(tǒng)計分析模塊 統(tǒng)計分析模塊主要實現(xiàn)進(jìn)貨統(tǒng)計分析、銷售統(tǒng)計分析和成本分析等功能。 可行性分析 開發(fā)任何一個基于計算機(jī)的系統(tǒng)，都會受到時間和資源上的限制。 對這些功能需求進(jìn)行分類，主要包含有以下幾種：進(jìn)貨管理模塊、庫存管理模塊、銷售管理模塊、員工管理模塊和系統(tǒng)模塊。這種需求對開發(fā)人員在數(shù)量上和素質(zhì)上的要求也是非常迫切的。 課題的研究目的 研究該課題是為了通過對 “ 超市進(jìn)銷存管理系統(tǒng) ” 的設(shè)計 與實現(xiàn)，熟悉這類的信息管理系統(tǒng)的開發(fā)原理及流程。隨著信息時代的發(fā)展，對效率的要求日益提高，企業(yè)經(jīng)營涉及進(jìn)、銷、存多個環(huán)節(jié) ,涉及商品種類繁多 ,業(yè)務(wù)量大 ,庫存管理復(fù)雜 ,使用手工管理已無法勝任，因而軟件控制銷售和管理已經(jīng)取代了傳統(tǒng)全手工方式。但正由于員工較少，使用軟件控制成為必須。這正是本次設(shè)計的根本目的所在。面 向?qū)ο蟮某绦蛟O(shè)計將數(shù)據(jù)及對數(shù)據(jù)的操作方法封裝在一起 ,作為一個互相依存、不可分離的整體。 在進(jìn)貨、退貨時存在一對多的關(guān)系，要求支持多行錄入功能。 5 第三章 總體設(shè)計 項目規(guī)劃 超市進(jìn)銷存管理系統(tǒng)是一個典型的數(shù)據(jù)庫應(yīng)用程序，由登錄模塊、主界面、基本信息模塊、進(jìn)貨管理和銷售管理模塊、庫存管理模塊、系統(tǒng)維護(hù)模塊等組成。 6 圖 31 系統(tǒng)功能模塊圖 數(shù)據(jù)庫設(shè)計 本系統(tǒng)根據(jù)上面的設(shè)計規(guī)劃出的主要實體有職員信息、進(jìn)貨、用戶、費用、收款、進(jìn)貨退貨。 ? 圖形化數(shù)據(jù)分析。 運行平臺： Windows xp/ Windows 2021。進(jìn)貨主表的結(jié)構(gòu)如表 42 所示。往來賬明細(xì)表結(jié)構(gòu)如表46 所示。銷售退貨明細(xì)表結(jié)構(gòu)如表 410所示。銷售明細(xì)表結(jié)構(gòu)如表 414 所示。往來單位信息表結(jié)構(gòu)如表 418 所示。 19