【正文】 v 28 V v v v v v v v v v v V v v v v v v v v v v 34 V v v v v v v v V v v v v v v v v 40 V v v v v v v v V v v v v v v v 免責(zé)聲明：文檔在線網(wǎng)（文檔中國）中所有的文檔資料均由文檔在線網(wǎng)會員提供。該文檔資料的版權(quán)屬于提供者所有，有關(guān)版權(quán)的問題請直接與提供者聯(lián)系。 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ShellAPI,Menus, ActnList, StdCtrls, Buttons, XPMenu, jpeg, ExtCtrls。 Actxsgl: TAction。 ActZHGL: TAction。 SpeedButton1: TSpeedButton。 SpeedButton3: TSpeedButton。 BitBtn1: TBitBtn。 BitBtn3: TBitBtn。 f1: TMenuItem。 fgfg1: TMenuItem。 N1: TMenuItem。 N3: TMenuItem。 免責(zé)聲明：文檔在線網(wǎng)（文檔中國）中所有的文檔資料均由文檔在線網(wǎng)會員提供。該文檔資料的版權(quán)屬于提供者所有，有關(guān)版權(quán)的問題請直接與提供者聯(lián)系。 Image1: TImage。 procedure ActcjglExecute(Sender: TObject)。 procedure ActibbglExecute(Sender: TObject)。 procedure BitBtn2Click(Sender: TObject)。 procedure N3Click(Sender: TObject)。 procedure N1Click(Sender: TObject)。 private { Private declarations } public { Public declarations } end。 implementation uses Uxsgl, Ucjgl, Uzhgl, Ubbgl, ABOUT, Uhelp。 begin 。 procedure (Sender: TObject)。 end。 begin 。 procedure (Sender: TObject)。 end。 免責(zé)聲明：文檔在線網(wǎng)（文檔中國）中所有的文檔資料均由文檔在線網(wǎng)會員提供。該文檔資料的版權(quán)屬于提供者所有，有關(guān)版權(quán)的問題請直接與提供者聯(lián)系。 。 procedure (Sender: TObject)。 。 procedure (Sender: TObject)。真的退出 ?39。提示 39。 end。 begin BitBtn1Click(Sender)。 procedure (Sender: TObject)。 end。 begin BitBtn3Click(Sender)。 procedure (Sender: TObject)。 begin filename:=39。 end。文檔在線網(wǎng)會對會員提供的文檔資料進(jìn)行篩選和編輯，但是并不聲明或保證其內(nèi) 容的合法性、正確性或可靠性。 ClientHeight = 488 ClientWidth = 732 Color = clBackground = DEFAULT_CHARSET = clWindowText = 11 = 39。 = [] = {。文檔在線網(wǎng)會對會員提供的文檔資料進(jìn)行篩選和編輯，但是并不聲明或保證其內(nèi) 容的合法性、正確性或可靠性。 Width = 401 Height = 105 Cursor = crHandPoint Hint = 27426368142080920210 ParentShowHint = False = {。amp。 TabOrder = 0 OnClick = BitBtn1Click = {。amp。 TabOrder = 1 OnClick = BitBtn2Click = {。amp。 TabOrder = 2 OnClick = BitBtn3Click = {。文檔在線網(wǎng)會對會員提供的文檔資料進(jìn)行篩選和編輯，但是并不聲明或保證其內(nèi) 容的合法性、正確性或可靠性。 OnExecute = ActxsglExecute end object Actcjgl: TAction Caption = 25104324893164929702 Hint = 25104324893164929702 OnExecute = ActcjglExecute end object ActZHGL: TAction Caption = 36873358383199532479 Hint = 36873358383199532479 OnExecute = ActZHGLExecute end object Actibbgl: TAction Caption = 25253349202998325104 Hint = 25253349202998325104 OnExecute = ActibbglExecute end end object PopupMenu1: TPopupMenu Left = 336 Top = 216 object f1: TMenuItem Action = Actxsgl end object gfg1: TMenuItem Action = Actcjgl end object fgfg1: TMenuItem Action = ActZHGL end object gfgf1: TMenuItem Action = Actibbgl end object N2: TMenuItem Caption = 39。 end object N3: TMenuItem Caption = 2085120210 OnClick = N3Click end object N4: TMenuItem Caption = 2411021161 OnClick = N4Click end object N5: TMenuItem Caption = 39。 end object N1: TMenuItem Caption = 3686420986 免責(zé)聲明：文檔在線網(wǎng)（文檔中國）中所有的文檔資料均由文檔在線網(wǎng)會員提供。該文檔資料的版權(quán)屬于提供者所有，有關(guān)版權(quán)的問題請直接與提供者聯(lián)系?！蔽业谌问褂?Delphi進(jìn)行程序開發(fā)，完成了一個(gè)“大學(xué)生成績信息管理系統(tǒng)”的課程設(shè)計(jì)。 Delphi 軟件開發(fā)工具是一個(gè)完全導(dǎo)向的可視化系統(tǒng)開發(fā)環(huán)境的工具。 Delphi可以你用最少的程序量來得到最高的開發(fā)效率，從而迅速的開發(fā) Windows 的應(yīng)用程序，它提供了易于使用的圖形化工具供軟件開發(fā)人員創(chuàng)建程序中的可視化部分。Delphi是以面向?qū)ο蟮姆绞皆O(shè)計(jì)程序代碼的，有著面向?qū)ο蟮乃拇筇卣鳎悍庋b性、可維護(hù)性、繼承性和多態(tài)性。編寫面向?qū)ο蟮某绦蚰軌蛑貜?fù)的使用開發(fā)者自己的工作成果，并使程序維護(hù)起來更容易，同時(shí)程序的擴(kuò)展也更加方便。比如，該系統(tǒng)用到了幾個(gè)非通用的組件，故源程序的編譯不具通用性（所需部分組件以附上）。當(dāng)然，還有些細(xì)節(jié)問題需要更加完善。 “聰明的程序員使用 Delphi”，讓我們都成為聰明的程序員，一起走進(jìn) Delphi的世