計量管理系統(tǒng)論ppt課件-wenkub.com
2025-01-07 23:11 本頁面
【正文】 end。 :=false。 :=false。 end。 :=true。 :=false。 :=true。 :=false。 :=true。 end。 :=true。 :=true。 :=true。 :=true。 :=true。 :=true。administrator39。 :=false。//實現(xiàn)菜單的動態(tài)改變可操作性 begin if login=false then //沒有用戶登陸的情況 begin :=false。,mtInformation,mbYesNoCancel,0)=mryes then CanClose:=true else CanClose:=false。 exit。 end。+39。dddd39。ss39。mm39。hh39。dd39。mm39。 yyyy39。 :=false。//創(chuàng)建主窗體時的執(zhí)行代碼 begin displaylog:=true。 (Tmainfrm, mainfrm)。 。 startfrm:=(Application)。 提供第四代語言可擴展的編程語言。 具有強大的數(shù)據(jù)編程能力，能夠支持 ODBC和數(shù)據(jù)庫專用接口。 返回 數(shù)據(jù)庫名： jlqjglxt 其中的表，設(shè)計如下： 一 、 操作員表 operator 字段名 數(shù)據(jù)類型 長度 說明 User（ Key） Char 20 用戶名 （ 關(guān)鍵字 ） password Char 20 密碼 power Char 16 權(quán)限 powercode Integer 1 權(quán)限代碼 code Char 10 代號 name Char 16 姓名 duty Char 10 職稱 二 、 計量器具記錄表 jlqjb 字段名 數(shù)據(jù)類型 長度 說明 Cnbh（ Key） Char 10 廠內(nèi)編號 （ 以 “ 編號 — 數(shù)量 ” 表示 ） qjmc Char 30 器具名稱 zzcj Char 50 制造廠家 ccbh Char 10 出廠編號 xhgg Char 16 型號或規(guī)格 clfw Char 12 測量范圍 fdz Char 10 分度值 dcrq Date/Time 到廠日期 yxq Integer 2 有效期 （ 用月份數(shù)表示 ） sycj Char 30 使用車間 bfrq Date/Time 報廢日期 bz Char 200 備注 三 、 器具類別記錄 qjb 字段名 數(shù)據(jù)類型 長度 說明 ID（ Key） 自動編號 記錄號 qjmc Char 30 器具名稱 xhgg Char 16 型號或規(guī)格 bh Char 5 編號 sl Integer 3 數(shù)量 四 、 不合格 （ 報廢 ） 器具通知單記錄 bfb 字段名 數(shù)據(jù)類型 長度 說明 bh（ Key） Char 10 廠內(nèi)編號 qjmc Char 30 器具名稱 sycj Char 30 使用車間 zzcj Char 50 制造廠家 clfw Char 12 測量范圍 fdz Char 10 分度值 bfrq Date/Time 報廢日期 bfly Char 200 報廢理由 jdy Char 16 檢定員 fhy Char 16 復(fù)核員 五 、 新購器具記錄 xgqjb 字段名 數(shù)據(jù)類型 長度 說明 bh（ Key） Char 10 廠內(nèi)編號 qjmc Char 30 器具名稱 zzcj Char 50 制造廠家 ccbh Char 10 出廠編號 xhgg Char 16 型號或規(guī)格 dcrq Date/Time 到廠日期 sycj Char 30 使用車間 clfw Char 12 測量范圍 fdz Char 10 分度值 bz Char 200 備注 六 、 合格證記錄 hgzb 字段名 數(shù)據(jù)類型 長度 說明 ID（ Key） 自動編號 記錄號 bh Char 10 廠內(nèi)編號 qjmc Char 30 器具名稱 hgdj Cha
公司管理相關(guān)推薦
鄂ICP備17016276號-1