delphi工資管理系統(tǒng)-資料下載頁
2025-04-07 05:31本頁面
【正文】 界面模塊中各功能的詳細(xì)設(shè)計(jì)如下：（1）密碼修改功能管理員都有修改自己密碼的權(quán)利，不論其權(quán)限的大小。42工資管理系統(tǒng)修改密碼界面其NS圖如圖4３：圖4３（2）操作員管理添加、刪除、修改管理員的信息是系統(tǒng)用戶中權(quán)限為系統(tǒng)設(shè)置權(quán)的管理員所專有的權(quán)利，可為系統(tǒng)添加管理員的登錄號(hào)和口令及使用權(quán)限。操作員必須是在員工表中存在的記錄，也就是說系統(tǒng)管理員也是員工的一部份，它除了有員工的上下班的考勤密碼外，還是管理員登陸密碼。兩個(gè)密碼的概念不同。普通員工只能登錄考勤欄。而管理員能根據(jù)權(quán)限的不同登錄不同的窗體。 在系統(tǒng)管理系統(tǒng)進(jìn)行刪除過程中系統(tǒng)會(huì)先判斷用戶要?jiǎng)h除的用戶是否存在，若存在則在確認(rèn)一下是否真的要?jiǎng)h除該用戶，得到確認(rèn)后才能刪除該系統(tǒng)用戶，否則則返回。其NS圖如圖44：輸用戶號(hào)Y 用戶存在嗎？N確定刪除嗎？Y N刪除 返回 出錯(cuò) 圖44圖45工資管理系統(tǒng)操作員管理界面（3）數(shù)據(jù)備份圖46工資管理系統(tǒng)數(shù)據(jù)備份界面管理員負(fù)責(zé)每隔一段時(shí)間對(duì)數(shù)據(jù)庫(kù)對(duì)進(jìn)備份，防止在數(shù)據(jù)以外丟失時(shí)不至于找不回以前的記錄。備份是很重要的一個(gè)工作，由于考慮到客戶機(jī)子硬盤和速度關(guān)系，我沒有設(shè)置定時(shí)自動(dòng)完全備份，所以管理員最好每2周對(duì)數(shù)據(jù)庫(kù)進(jìn)行一次完全備份。（4）重新登錄重新登錄就是在登錄一次系統(tǒng)的進(jìn)入窗體，不過它并沒有將軟件從內(nèi)存中釋放從而加快了管理員的操作，只有在系統(tǒng)退出時(shí)軟件才從內(nèi)存中釋放。注意在登錄窗口中密碼不能為空，每個(gè)管理員不能以空做為自己的密碼。其NS圖如圖47：i:=1 to 3輸入用戶號(hào)輸入用戶口令 Y 是系統(tǒng)用戶嗎？ N 登錄 出錯(cuò)提示繼續(xù)輸入 系統(tǒng) I3嗎? Y N 退出 返回系統(tǒng) 圖47圖48工資管理系統(tǒng)登錄界面第五章 編 碼，利用Delphi在數(shù)據(jù)庫(kù)方面的特性和其強(qiáng)大的功能，運(yùn)用它強(qiáng)大的界面設(shè)計(jì)功能，讓我能將我的想法在界面中得到實(shí)現(xiàn)。，節(jié)省了很多時(shí)間和精力。如下是關(guān)于系統(tǒng)管理模塊的代碼：〈1 操作員管理procedure (Sender: TObject)。begin if not assigned(operateform) then begin (Toperateform, operateform)。 。 end else begin 。 :=wsNormal。 end。end?！?修改密碼procedure (Sender: TObject)。begin if not assigned(changepasswordform) then begin (Tchangepasswordform, changepasswordform)。 。 end else begin 。 :=wsNormal。 end。end?！?數(shù)據(jù)備份procedure (Sender: TObject)。begin if not assigned(databackform) then begin (Tdatabackform, databackform)。 beifen:=true。 。 end else begin beifen:=true。 。 :=wsNormal。 end。end?！?數(shù)據(jù)還原procedure (Sender: TObject)。beginif not assigned(databackform) then begin (Tdatabackform, databackform)。 huiyuan:=true。 。 end else begin huiyuan:=true。 。 :=wsNormal。 end。end。〈5歷史表數(shù)據(jù)初始化procedure (Sender: TObject)。begin if (39。您是否繼續(xù)進(jìn)行初始化！，是 或 否?39。,39。提示信息39。,mb_YesNo)=IDYes then begin :=39。工資歷史資料初始化....39。 :=true。 。 while not do begin 。 。 end。 MessageDlg(39。初始化完畢！39。,mtWarning,[mbOK],0)。 end。 :=39。工資管理系統(tǒng)39。end?！?更改操作員procedure (Sender: TObject)。begin :=true。 passing:=false。 。 。 :=poScreenCenter。// (Tcheckform, checkform)。end?！?系統(tǒng)初始化procedure (Sender: TObject)。begin if (39。您確定要進(jìn)行初始化嗎，它將刪除所有的數(shù)據(jù)，最好將記錄備份，默認(rèn)的管理員是admin，密碼11!，Yes Or No?39。,39。提示信息39。,mb_YesNo)=IDYes then begin { //刪除記錄時(shí)間表 :=true。 if not then begin 。 while not do begin 。 。 end。 end。 :=false。 } //刪除檢測(cè)表 :=true。 while not do begin 。 while not do begin 。 。 end。 end。 :=false。 //刪除價(jià)錢登記表 :=true。 while not do begin 。 while not do begin 。 。 end。 end。 :=false。 本設(shè)計(jì)來自：我要畢業(yè)設(shè)計(jì)網(wǎng)在畢業(yè)設(shè)計(jì)網(wǎng)注冊(cè)后聯(lián)系客服均可獲贈(zèng)您要求的畢業(yè)設(shè)計(jì)資料客服：8191040 說明：本軟件/論文系有償閱讀、使用，完整CAD圖紙或源代碼請(qǐng)聯(lián)系客服購(gòu)買******************************************************************全國(guó)最全畢業(yè)設(shè)計(jì)，詳細(xì)目錄請(qǐng)加8191040索取模具畢業(yè)設(shè)計(jì)（注塑模，沖壓模），計(jì)算機(jī)畢業(yè)設(shè)計(jì)（ASP, , C, Delphi, JAVA, JSP, PB, VC,VB,VFP等）機(jī)械畢業(yè)設(shè)計(jì)，電子信息類畢業(yè)設(shè)計(jì)，土木路橋畢業(yè)設(shè)計(jì)等等7萬余篇本科碩士論文，工商管理畢業(yè)論文 漢語言文學(xué)畢業(yè)論文 國(guó)際貿(mào)易學(xué)畢業(yè)論文 經(jīng)濟(jì)管理畢業(yè)論文 會(huì)計(jì)學(xué)論文 教育類畢業(yè)論文等
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1