超市進(jìn)銷存管理系統(tǒng)畢業(yè)論文-預(yù)覽頁(yè)
【正文】 _main）進(jìn)貨退貨表用于存儲(chǔ)進(jìn)貨退貨中主要的和相同的信息。表414 銷售明細(xì)表字段名數(shù)據(jù)類型長(zhǎng)度主鍵否功能描述billcodevarchar20單據(jù)編號(hào)tradecodevarchar20商品編號(hào)fullnamevarchar20商品全稱typevarchar10商品型號(hào)standardvarchar10商品規(guī)格unitvarchar4單位producevarchar20產(chǎn)地qtyfloat8數(shù)量pricefloat8單價(jià)tsumfloat8金額billdatedatetime8錄單日期（15）銷售表（tb_sell_main）銷售表用于保存銷售信息中主要的和相同的信息。表416 庫(kù)存商品表結(jié)構(gòu) 字段名數(shù)據(jù)類型長(zhǎng)度主鍵否功能描述tradecodevarchar6商品編號(hào)fullnamedvarchar20是商品全名namevarchar10商品簡(jiǎn)稱typevarchar10商品類型standardvarchar10商品規(guī)格unitvarchar4單位producevarchar20產(chǎn)地qtyfloat8庫(kù)存數(shù)量pricefloat8進(jìn)貨時(shí)的最后一次進(jìn)價(jià)averagepricefloat8加權(quán)平均價(jià)salepricefloat8銷售時(shí)的最后一次銷價(jià)checkedfloat8盤(pán)點(diǎn)數(shù)量upperlimitint4存貨報(bào)警上限lowerlimitint4存貨報(bào)警下限provideinfvarchar40商品供貨信息memovarchar40備注shortcodevarchar10拼音簡(jiǎn)碼（17）本單位信息表（tb_unit）本單位信息表用于保存本單位的信息。表418 往來(lái)單位信息表結(jié)構(gòu)字段名數(shù)據(jù)類型長(zhǎng)度主鍵否功能描述unitcodevarchar5單位編號(hào)fullnamevarchar20是單位全名namevarchar10單位簡(jiǎn)稱taxvarchar30稅號(hào)telvarchar20單位電話linkmanvarchar10聯(lián)系人addressvarchar60單位地址accountsvarchar80開(kāi)戶行及帳號(hào)gatheringfloat8累計(jì)應(yīng)收款paymentfloat8累計(jì)應(yīng)付款shortcodevarchar10拼音簡(jiǎn)碼第五章 主要功能模塊設(shè)計(jì) 主窗體設(shè)計(jì)主窗體是程序的控制中心，其他模塊都是通過(guò)主窗體來(lái)調(diào)用，所以主窗體的界面要設(shè)計(jì)的美觀易操作。 圖52 添加TActionToolBar對(duì)象（3）選擇“Actions”選項(xiàng)卡，單擊【New Action】按鈕，添加“TAction”對(duì)象，并在“Object Inspector”窗口中設(shè)置Caption屬性，如圖53所示。（7）在“Win32”組件頁(yè)中點(diǎn)選“TStatusBar”組件，添加到窗體上，命名為“StatusBar1”。在窗體上添加3個(gè)TPanel組件，分別命名為“Panel3”、“Panel1”、“Panel4”，分別設(shè)置其Align屬性為“alTop”、“alLeft”、“alClient”。（10）在“Additional”組件頁(yè)中點(diǎn)選“TSpeedButton”組件，將TSpeedButton組件添加到圖片相應(yīng)的位置，設(shè)置其Flat屬性為“True”；Caption屬性為空。 Shift: TShiftState)。在窗體的OnCloseQuery事件處理過(guò)程中讓用戶確認(rèn)是否關(guān)閉窗體。是否退出系統(tǒng)？39。end。 //設(shè)置面板在最前面end。 //創(chuàng)建窗體 。指定TCheckBox組件的父對(duì)象并設(shè)置該組件的大小和位置。 :=75。 基礎(chǔ)窗體創(chuàng)建創(chuàng)建基礎(chǔ)窗體主要為了提高開(kāi)發(fā)速度和代碼的利用率，從基礎(chǔ)窗體繼承的子窗體具有基礎(chǔ)窗體的全部功能。代碼如下：procedure (Sender: TObject。 數(shù)據(jù)模塊設(shè)計(jì)數(shù)據(jù)模塊窗體主要功能是統(tǒng)一管理數(shù)據(jù)組件。TADOConnection組件用于連接數(shù)據(jù)庫(kù)，其他數(shù)據(jù)庫(kù)組件通過(guò)它連接數(shù)據(jù)庫(kù)。圖511 數(shù)據(jù)庫(kù)連接設(shè)置界面（6）單擊【測(cè)試連接】按鈕，如果連接成功，則提示成功，單擊【確定】按鈕完成數(shù)據(jù)庫(kù)的連接。圖512 庫(kù)存商品模塊運(yùn)行界面1．窗體設(shè)計(jì)步驟（1）選擇“File”/“New”/“Other”菜單項(xiàng)，打開(kāi)“New Items”對(duì)話框，選擇“ima”選項(xiàng)卡，點(diǎn)選“F_base”選項(xiàng)，以繼承方式使用該窗體。右鍵單擊TToolBar組件，在彈出的菜單中選擇“New Button”菜單項(xiàng)，并設(shè)置其Style屬性為“tbsDivider”。點(diǎn)選TComboBox組件，在“Object Inspector”窗口中，單擊Items屬性，在彈出的對(duì)話框中添加項(xiàng)目，如圖513所示。（5）在“Data Controls”組件頁(yè)中點(diǎn)選“TDBGrid”組件，添加到窗體上，命名為“DBGrid1”，設(shè)置其Align屬性為“alClient”；DataSource屬性為“DataSource1”，雙擊DBGrid1組件，在彈出的列編輯器中設(shè)置字段標(biāo)題，如圖514所示。代碼如下：procedure (Sender: TObject)。 change:=False。Select * from tb_stock order by tradecode asc39。end。 //調(diào)用父類的同名方法 (TF_sbjbcx, F_sbjbcx)。在【刪除】按鈕的單擊事件處理過(guò)程中當(dāng)用戶確認(rèn)刪除后刪除數(shù)據(jù)。是否刪除當(dāng)前記錄？39。 except (39。,mb_yesno)。代碼如下：procedure (Sender: TObject)。 if =False then begin searchwhat:=39。 1: searchwhat:=39。 3: searchwhat:=39。 。 //寫(xiě)SQL語(yǔ)句 (39。+searchwhat+39。)。%39。 end。提示39。select * from tb_stock order by tradecode39。 except (39。,mb_ok)。在【打印】按鈕的單擊事件處理過(guò)程中指定報(bào)表文件、預(yù)覽報(bào)表。39。商品基本信息模塊運(yùn)行結(jié)果如圖515所示。在GroupBox1組件上添加2個(gè)TLabel組件和2個(gè)TEdit組件。2．程序相關(guān)代碼在窗體的OnShow事件處理過(guò)程中如果為修改，將要修改的記錄顯示在窗體的編輯框中。fullnamed39。).AsString。 :=fieldbyname(39。standard39。).AsString。 :=fieldbyname(39。memo39。).AsInteger)。 end else begin (sender)。end。 if =0 then spbh:=39。,1) //格式化編號(hào) else spbh:=39。,strtoint(copy([0].AsString,2,5))+1)。圖516 進(jìn)貨單錄入模塊運(yùn)行界面1．窗體設(shè)計(jì)步驟（1）從基礎(chǔ)窗體繼承一個(gè)窗體，命名為“F_jhd”，設(shè)置其Caption屬性為“進(jìn)貨單錄入”。（3）在窗體上添加TSpeedButton組件，通過(guò)Glyph屬性為其指定圖標(biāo)。（5）在窗體上添加TADOQuery組件，命名為“ADOQuery1”，設(shè)置其Connection屬性為“”。 :=1。 Cells[2,0]:=39。 Cells[4,0]:=39。 Cells[6,0]:=39。 Cells[8,0]:=39。 end。select * from tb_warehouse_main39。 (sender)。代碼如下：procedure (Sender: TObject)。 。39。 end。 //將數(shù)據(jù)添加到單元格中 end。 :=grow。在初步了解的基礎(chǔ)上，我根據(jù)老師給予的關(guān)于進(jìn)銷存管理系統(tǒng)設(shè)計(jì)思路的講解，對(duì)系統(tǒng)進(jìn)行了詳細(xì)的需求分析。到了數(shù)據(jù)庫(kù)設(shè)計(jì)階段，首先選擇了SQL Server 2005作為數(shù)據(jù)庫(kù)管理系統(tǒng)。我經(jīng)過(guò)反復(fù)的改正后，界面固定下來(lái)。在經(jīng)過(guò)和老師的交流討論之后，我的設(shè)計(jì)也逐漸進(jìn)入了尾聲。 出品人：林康禁、巫茂森、楊智雄
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1