【正文】
39。839。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。139。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。239。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。339。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。439。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。a39。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。b39。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。c39。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。d39。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。e39。)nil then :=true else :=false。 if strpos(pchar(auth_desc),39。f39。)nil then :=true else :=false。 。 。 end else begin showmessage(39。該員工編號不存在!請輸入正確的員工代碼!39。)。end。十二:授權(quán)選擇界面授權(quán)確定代碼:var auth:string。begin if (=true) then auth:=auth+39。139。 if =true then auth:=auth+39。239。 if =true then auth:=auth+39。339。 if =true then auth:=auth+39。439。 if =true then auth:=auth+39。639。 if =true then auth:=auth+39。a39。 if =true then auth:=auth+39。b39。 if =true then auth:=auth+39。739。 if =true then auth:=auth+39。d39。 if =true then auth:=auth+39。f39。 if =true then auth:=auth+39。c39。 if =true then auth:=auth+39。e39。 with adoquery1 do begin close。 。 (39。update xg0301worker set quanxian=39。39。39。+auth+39。39。39。 where pno=39。39。39。++39。39。39。39。)。 execsql。showmessage(39。員工39。39。39。++39。39。39。的權(quán)限設(shè)置成功!39。)。七、課程設(shè)計(jì)總結(jié)這次的課程設(shè)計(jì)對自己來說難度有點(diǎn)大,考慮的東西要比較全面。首先需求分析很重要,要?jiǎng)?chuàng)建一個(gè)好的系統(tǒng),所以要做足前面的需求分析。要先了解這個(gè)系統(tǒng)是用來做什么的,它要滿足用戶什么需求。只有先做好了需求分析,了解了該系統(tǒng)主要要實(shí)現(xiàn)哪些功能,這樣才能為后面的設(shè)計(jì)提供一個(gè)良好的思路。在第一周的時(shí)候我和搭檔兩個(gè)人主要是做需求分析這塊,先確定了該系統(tǒng)要實(shí)現(xiàn)的功能等。在第二周的時(shí)候主要就是進(jìn)行界面的設(shè)計(jì)以及功能的實(shí)現(xiàn)。通過這學(xué)期的CS實(shí)驗(yàn),學(xué)到了很多東西,在看到老師布置的任務(wù)的時(shí)候心里還是躑躅了下,覺得自己能力沒有達(dá)到可以做系統(tǒng)的水平,未開始就畏懼。也不懂怎么開始,后來在老師指導(dǎo)下,做最開始的分析。我選的是倉庫管理系統(tǒng),所以先要弄清楚倉庫管理系統(tǒng)的作用和職能。以前一直認(rèn)為倉庫庫存管理只要將物品進(jìn)出倉記錄這一關(guān)鍵一步做好了就差不多了,其他的并沒有太多的想法。但原來倉庫內(nèi)部的管理同樣也很重要。在與同學(xué)討論之后,我覺得倉庫存在著這么幾個(gè)問題: 一 物品的分類,如果物品沒有進(jìn)行很好的分類,整個(gè)倉庫的物品存放將會很凌亂,給生產(chǎn)運(yùn)作或物品清點(diǎn)造成很多不必要的麻煩,降低生產(chǎn)績效,浪費(fèi)人力物力、二 物品記錄,需要建立明確的進(jìn)出庫記錄,而不是隨筆記著、倉庫管理系統(tǒng)有入庫出庫盤點(diǎn)三個(gè)基本職能,還有能夠查詢。然后是ER圖與需求分析,包括需要用到的表,比如員工表,入庫單,出庫單,商家信息,產(chǎn)品信息表等。屬性的設(shè)置以及數(shù)據(jù)流圖的繪制。在做完分析后,才感覺要做得系統(tǒng)有了個(gè)大概的思路,包括后面的界面設(shè)計(jì)及數(shù)據(jù)庫的建立。建表是件容易的事情,只是要將屬性搞清楚,比如主鍵的設(shè)置,唯不唯一,參照的是哪個(gè)表,等等。細(xì)節(jié)問題處理好后,表就建好了。接下來就是大工程界面的設(shè)計(jì)和代碼的編寫了,在代碼編寫上是弱項(xiàng),所以在跟同學(xué)討論后做了界面的設(shè)計(jì),包括登錄界面,出入庫,對于delphi的界面設(shè)計(jì),大部分是簡單的,由于每個(gè)表基本都會查詢,所以建立了DM,用于整個(gè)數(shù)據(jù)庫的連接查詢。在做得過程中才慢慢發(fā)現(xiàn),系統(tǒng)設(shè)計(jì)沒有想象中那么難,如果一點(diǎn)點(diǎn)做下去,很多事情會迎刃而解。遇到的問題:最大的問題是在設(shè)計(jì)通過前臺DELPHI連接到數(shù)據(jù)庫后臺,并進(jìn)行相應(yīng)的操作時(shí)候。在這上面費(fèi)了很大的功夫,因?yàn)榇a是弱項(xiàng),連第一個(gè)登錄界面的代碼都寫了很久,因?yàn)榈卿洐?quán)限的問題,我們小組想做個(gè)完整的登錄界面,只有廠里的員工才能登錄該系統(tǒng)。因?yàn)橛行┎僮髦荒苁枪芾韱T才能進(jìn)行,所以我們就在登錄的界面上設(shè)置了一個(gè)職位的選擇,分為管理員和一般員工。兩者登錄后進(jìn)入的界面是不同的。這樣就方便信息的管理。接著便是出入庫的代碼編寫了,主要是添加和修改,出入庫還有盤點(diǎn)的代碼基本是相似的,在探討出入庫的代碼后便解決了出庫和盤點(diǎn)的代碼,最后是查詢,分為三種查詢。分別為按時(shí)間查詢,按入庫單查詢,按出庫單查詢。在弄庫存表的時(shí)候考慮到在填寫入庫和出庫的時(shí)候可以通過觸發(fā)器來使庫存表同時(shí)進(jìn)行更改,這樣就可以節(jié)省很多時(shí)間而且也減少出錯(cuò)的可能性??偟膩碚f,這次的專周收獲蠻大的,雖然還是存在很多的不足。在以后的學(xué)習(xí)中,會更認(rèn)真的在編寫程序這方面鉆研,這樣才能成為合格的計(jì)算機(jī)人才。29 / 29