delphi小區(qū)物業(yè)管理系統(tǒng)課程設計(編輯修改稿)
2025-02-08 04:40 本頁面
【文章內(nèi)容簡介】 數(shù)據(jù)庫建立 直接打開 SQL2022，新建一個數(shù)據(jù)庫名為“ xqwy”然后在建好的數(shù)據(jù)庫中根據(jù)需要新建表 。 3. 功能模塊圖 編號 字段名稱 數(shù)據(jù)結(jié)構(gòu) 主鍵 允許空 1 住戶編號 nvarchar 是 否 2 住戶姓名 nvarchar 否 3 報修范圍 Nvarchar 否 4 時間 Nvarchar 否 5 備注 nvarchar 否 編號 字段名稱 數(shù)據(jù)結(jié)構(gòu) 主鍵 允許空 1 管理帳號 nvarchar 是 否 2 密碼 nvarchar 否 物業(yè)管理用戶登錄 住戶 樓房 繳費 報修 住戶查詢 增加住戶 修改住戶 管理 報修查詢 報修修改 退出 修改密碼 增加管理員 查詢樓房 增加房屋 修改房屋 車位查詢 物業(yè)查詢 9 program Project2。 uses Forms, windows, dialogs, Unit1 in 39。39。 {Form1}, Unit2 in 39。39。 {Form2}, Unit3 in 39。39。 {Form3}, Unit4 in 39。39。 {Form4}, Unit5 in 39。39。 {Form5}, Unit6 in 39。39。 {Form6}, Unit7 in 39。39。 {Form7}, Unit8 in 39。39。 {Form8}, Unit9 in 39。39。 {Form9}, Unit10 in 39。39。 {Form10}, Unit11 in 39。39。 {Form11}, Unit12 in 39。39。 {Form12}, Unit13 in 39。39。 {Form13}, Unit14 in 39。39。 {Form14}, Unit15 in 39。39。 {Form15}, Unit16 in 39。39。 {Form16}, Unit17 in 39。39。 {Form17}, Unit18 in 39。39。 {dm: TDataModule}。 {$R *.res} begin 。 (Tdm, dm)。 Form2:=(application)。 。 10 。 sleep(1000)。 Form3:=(application)。 。 if =100 then begin (TForm1, Form1)。 。 end。 End. unit Unit1。 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, jpeg, ExtCtrls, Menus,unit4,unit5,unit6 ,Unit8, Unit9, Unit7, Unit10, Unit11, Unit12,unit13,unit14,unit15。 type TForm1 = class(TForm) MainMenu1: TMainMenu。 N1: TMenuItem。 N2: TMenuItem。 N3: TMenuItem。 N4: TMenuItem。 N5: TMenuItem。 N6: TMenuItem。 N7: TMenuItem。 N8: TMenuItem。 N9: TMenuItem。 11 N10: TMenuItem。 N11: TMenuItem。 N12: TMenuItem。 N13: TMenuItem。 N14: TMenuItem。 N15: TMenuItem。 N16: TMenuItem。 N17: TMenuItem。 N18: TMenuItem。 Image1: TImage。 Label1: TLabel。 Label2: TLabel。 N19: TMenuItem。 N20: TMenuItem。 procedure N4Click(Sender: TObject)。 procedure N2Click(Sender: TObject)。 procedure N6Click(Sender: TObject)。 procedure N7Click(Sender: TObject)。 procedure N10Click(Sender: TObject)。 procedure N11Click(Sender: TObject)。 procedure N8Click(Sender: TObject)。 procedure N12Click(Sender: TObject)。 procedure N14Click(Sender: TObject)。 procedure N19Click(Sender: TObject)。 procedure N20Click(Sender: TObject)。 pr
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1