畢業(yè)設計-delphi60通用財務管理系統(tǒng)-資料下載頁
2024-12-01 03:49本頁面
【導讀】數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。用DELPHI軟件及其提供的各種面向對象的開發(fā)工具，經(jīng)過調試、編譯與實現(xiàn)，該程序界面友好、程序設計風格樸素，使用起來美觀大方、方便易用。系統(tǒng)的“記錄管理”的功能極大的減輕工作人員的工作量，管理圖示界面與代碼設計實現(xiàn)14,工作學習及生活中，成為我們日常生活中不可缺少的輔助工具。然而，雖然現(xiàn)在世界上已經(jīng)充滿了多如牛毛的各種軟件，但它。以前開發(fā)Windows應用軟件是專業(yè)人員的工作，需要。掌握許多專業(yè)知識和經(jīng)過特殊的培訓才能勝任。夠開發(fā)出功能強大、適合自己特殊需求的應用程序了。來幫助前臺管理員進行更有效的財務管理工作。對于前者要求建立起數(shù)據(jù)一致。性和完整性強、數(shù)據(jù)安全性好的庫。都有待于我在以后的工作學習中進一步改進。它易學易用，如同VB，因而被稱為“第四代編程語。從1995年推出至今已經(jīng)經(jīng)歷了7個版本，運行在win9x或winme，win2021，winxp，這里把“VB”比作是傻瓜相機，De
【正文】 TBitBtn。 ComboBox1: TComboBox。 MaskEdit1: TMaskEdit。 Label1: TLabel。 Label2: TLabel。 XPMenu1: TXPMenu。 procedure BitBtn2Click(Sender: TObject)。 procedure FormCreate(Sender: TObject)。 procedure BitBtn1Click(Sender: TObject)。 private { Private declarations } public { Public declarations } end。 var denglu: Tdenglu。 implementation uses dm,main。 {$R *.dfm} procedure (Sender: TObject)。 begin 。 end。 procedure (Sender: TObject)。 begin with do begin open。 first。 while not eof do begin (fields[0].Value )。 next。 end。 :=0。 end。 end。 procedure (Sender: TObject)。 begin with do begin if locate(39。us39。,[]) then begin if =fields[1].Value then begin hide。 with (self) do showmodal。 end。 。 end。 end。 end。 end. 數(shù)據(jù)庫管理界面與代碼設計 實現(xiàn) 代碼設計 : unit dm。 interface procedure (DataSet: TDataSet)。 begin := 。 end。 end. 管理圖示界面與代碼設計實現(xiàn) 代碼設計 : unit logosrc。 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, jpeg, ExtCtrls。 implementation {$R *.dfm} end. 關于界面與代碼設計 代碼設計 : unit about。 AboutBox: TAboutBox。 implementation {$R *.dfm} end. 財務報表生成界面設計與代碼設計 unit report。 interface public end。 var qr1: Tqr1。 implementation uses dm。 {$R *.DFM} end. 系統(tǒng)主界面與代碼設計 代碼設計 : unit main。 interface
公司管理相關推薦
鄂ICP備17016276號-1