delphi面試題及答案

1、delphi 面試題及答案delphi 程序期末試題答案】一、單選題（每小題2 分，共 30 分）1 在 radiogroup 組件中有4 個(gè)單選框，當(dāng)選中第2 個(gè)單選框時(shí)，radiogroup 組件中的itemindex 屬性值應(yīng)為（ b）。a 0 b 1c 2d 3 2 函數(shù)和過程的區(qū)別為（a）。a 函數(shù)執(zhí)行后返回一個(gè)值，而過程不需返回值b 過程執(zhí)行后返回一個(gè)值，而函數(shù)不需返回值c.過程在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方d 函數(shù)在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方3 32 and 27 的值是（b）。a 59b 0c 27d 32 4 窗體與數(shù)據(jù)模塊的擴(kuò)展

2、名是（b）。a .dcu b .dfm c .pas d .dpr 5 delphi 中用什么函數(shù)來(lái)析構(gòu)一個(gè)組件（c）。a constructor b destroy c free d create 6 一個(gè)指針變量ptr 的域成員fs 訪問的方法是（c）。 a ptr-fsb. ptr.fsc . ptrAfs d . ptrfs7 type aarrays=1?8,1?5 of integer ，該類型定義了多少個(gè)下標(biāo)元素（d）。a 45 b 54 c 48 d 40 8 delphi 的所有類都是從什么類繼承下來(lái)的（b ）。 a tcomponent b tobject c tstrea

3、md tnull9 定義構(gòu)造函數(shù)時(shí)用到的保留字是（c ）。a class b .implementation c create d construction10 下列組件中屬于可視組件的是哪一個(gè)（d ）。a tdatasource b topendialog c ttable d tscrollbar11 設(shè)有過程procedure pro（var x,y:integer）; 變量 a , b 為整型變量，其值分別為5、 6，則合法的過程調(diào)用語(yǔ)句是（a pro（5,6）b pro（5,b） c pro（a,6）d pro（a,b） 12 下列組件中不能獲取焦點(diǎn)的是（b）。a tedit b t

4、labelc trichedit d ttreeview13 定義抽象類必須使用的指令字是（a）。a abstractb virtualc dynamicd override ” 14 delphi 是哪個(gè)公司的產(chǎn)品（c）。a microsoft b ibm c borland d dom15.窗體上放置有一個(gè) tedit類控件editl ,當(dāng)在editl中按下維 時(shí)觸發(fā)的事件和事件順序是（a）。a onkeydown-onkeypress-onkeyup b onkeydown-onkeyupc onkeypressd onkeydown-onkeyup-onkeypress 二、判斷題（每

5、小題1 分，共 10 分）1 pascal 語(yǔ)言中可以把一個(gè)實(shí)數(shù)賦值給一個(gè)整型變量，系統(tǒng)會(huì)自動(dòng)取整。（錯(cuò) ） 2 所有類都有name 屬性。（錯(cuò) ）3 variant 類型的變量被動(dòng)態(tài)賦值為一個(gè)特定的數(shù)據(jù)類型后，不能再賦值為一個(gè)其它的數(shù)據(jù)類型。（錯(cuò) ）4 函數(shù) messagedlgpos 與 messagedlg 極為相似，只是messagedlgpos 函數(shù)能夠控制信息對(duì)話框的出現(xiàn)位置。（對(duì) ）5 bitbtn 控件可以用來(lái)制作一個(gè)帶圖片的按鈕，而speedbutton則不能。（錯(cuò) ） 6 mediaplayer 控件的 autoenable 屬性是用來(lái)控制該控件是否可用。（錯(cuò) ）7 圖形組

6、件沒有輸入焦點(diǎn)，不能接受用戶的輸入，它只具有向用戶顯示的功能。（對(duì) ）8 timer 組件常稱為“定時(shí)器 ”，它每隔固定的時(shí)間間隔可以觸發(fā)一個(gè) ontimer 事件。（對(duì) ）9 tobject 是 delphi 的基類，系統(tǒng)中的每一個(gè)類都是tobject 的子類。（對(duì) ）10在mdi 應(yīng)用程序窗口中，如果將一個(gè)窗體設(shè)為父窮窗體，要將它的 formstyle 屬性設(shè)為fsstayontop 。（ 錯(cuò) ） 三、填空題（每空2 分，共 20 分）1 用于建立菜單項(xiàng)的下劃線快捷方式的字符是。2 在設(shè)計(jì)階段，利用image 對(duì)象的 picture 屬性，可以加載一幅圖片。 3 所有可視化的vcl 控件都

7、是從tcontrol 基類派生而來(lái)的。）。 d 裝訂線4 delphi 有三種控制循環(huán)的語(yǔ)句：repeat 語(yǔ)句， while 語(yǔ)句，for 語(yǔ)句。 5 delphi 支持 3 種類型的注釋： 注釋， （* *） 注釋，/ 注釋。6 關(guān)閉文件需要使用closefile （） 函數(shù)。 四、簡(jiǎn)答題（共20 分） 1 簡(jiǎn)述什么是對(duì)象和類。（4 分）在面向?qū)ο蟮某绦蚍治龊驮O(shè)計(jì)技術(shù)中，“類 ”就是對(duì)具有相同屬性和相同操作的一組相似對(duì)象的定義。從另一個(gè)角度來(lái)看，對(duì)象就是類的一個(gè)實(shí)例。2 簡(jiǎn)述程序錯(cuò)誤的類型有哪些。（4 分） （ 1）設(shè)計(jì)期錯(cuò)誤（2 ）編譯期錯(cuò)誤（3）運(yùn)行期錯(cuò)誤（4）邏輯錯(cuò)誤3 根據(jù)下列代碼

8、，請(qǐng)回答。（12 分） program infoprocusesforms,unit1 in unit1.pas forminfoinput,unit2 in unit2.pas forminfoshow; $r *.res begin ? end.問題1：以上代碼是項(xiàng)目/工程文件的組成部分。問題2：根據(jù)以上代碼，可知項(xiàng)目文件名是forminfoinpu 、 forminfoshow 。五、程序題（每小題10 分，共 20 分）1 .定義一個(gè)函數(shù)f,其返回值為1n的和。（function ） f（ n:integer ） ; var i,s:integer; beginend;2 在窗體上面繪

9、制出一條規(guī)則的余弦曲線，使其尺寸約為窗體的procedure tform1.formpaint（sender:tobject）; var x,y:real;j,j,h:integer; beginh:=form1.height div 2; for i:=0 to form1.width do beginx:=i*（2*3.14/form1.height）; y:=cos（x）;j:=trunc（0.8*y*h）+h; canvas.pixelsi,j:=clred: end; end;infoproc ，該項(xiàng)目文件包含（每空2 分 ） 2 個(gè)單元文件，文件名分別是 80% ，寫出編程步驟與代

10、碼。unit1 、 unit2 ，它們對(duì)應(yīng)的窗體名是裝訂線a tdatasource b topendialog c ttable d tscrollbar4設(shè)有過程procedure pro（var x,y:integer）; 變量 a,b 為整型變量，其值分別為5、 6，則合法的過程調(diào)用語(yǔ)句是（a pro（5,6）b pro（5,b） c pro（a,6）d pro（a,b） 5 下列組件中不能獲取焦點(diǎn)的是（ b）。a tedit b tlabelc trichedit d ttreeview6定義抽象類必須使用的指令字是（a）。a abstractb virtualc dynamicd

11、override”7delphi 是哪個(gè)公司的產(chǎn)品（c）。a microsoft b ibm c borland d dom8 窗體上放置有一個(gè)tedit 類的控件edit1 ，并定義了edit1 的onenter事件，下面說(shuō)法正確的是：a.當(dāng)鼠標(biāo)在窗體上移動(dòng)時(shí)產(chǎn)生editionenter 事件b .其他三項(xiàng)都不對(duì) c .當(dāng)editl獲得焦點(diǎn)時(shí)產(chǎn)生edit10enter 事件 d 當(dāng)鼠標(biāo)移動(dòng)到9在 radiogroup 組件中有4個(gè)單選框，當(dāng)選中第2 個(gè)單選框時(shí)，radiogroup 組件中的a 0b 1c 2d 3 10 函數(shù)和過程的區(qū)別為（a）。a 函數(shù)執(zhí)行后返回一個(gè)值，而過程不需返回值b

12、 過程執(zhí)行后返回一個(gè)值，而函數(shù)不需返回值 c.過程在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方d 函數(shù)在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方11 32 and 27 的值是（b）。a 59b 0c 27d 32 12 diskfree（c） 是用來(lái)返回c 盤的剩余空間。a 1b 2 c 3 d 4 13 delphi 中用什么函數(shù)來(lái)析構(gòu)一個(gè)組件（ c ）。a constructor b destroy c free d create 14 下面的數(shù)據(jù)類型不屬于在object pascal 語(yǔ)法中的數(shù)據(jù)類型是（c）。a.布爾型b 整型c 關(guān)系型d 字符型15 type aa

13、rrays=1?8,1?5 of integer ，該類型定義了多少個(gè)下標(biāo)元素（d）。a 45 b 54 c 48 d 40 二、判斷題（每小題1分，共 10 分）16 mediaplayer 控件的 autoenable 屬性是用來(lái)控制該控件是否可用。（ 錯(cuò) ）17 圖形組件沒有輸入焦點(diǎn)，不能接受用戶的輸入，它只具有向用戶顯示的功能。（對(duì) 3 1 、 pascal 語(yǔ)言中可以把一個(gè)實(shí)數(shù)賦值給一個(gè)整型變量，系統(tǒng)會(huì)自動(dòng)取整。（錯(cuò) ） 4所有類都有name 屬性。（錯(cuò)）18 variant 類型的變量被動(dòng)態(tài)賦值為一個(gè)特定的數(shù)據(jù)類型后，不能再賦值為一個(gè)其它的數(shù)據(jù)類型。6函數(shù)messagedlgpos

14、 與messagedlg 極為相似，只是messagedlgpos 函數(shù)能夠控制信息對(duì)話框的出現(xiàn)位置。7 bitbtn 控件可以用來(lái)制作一個(gè)帶圖片的按鈕，而 speedbutton 則不能。（錯(cuò) ）8 timer 組件常稱為“定時(shí)器 ”，它每隔固定的時(shí)間間隔可以觸發(fā)一個(gè) ontimer 事件。（9 tobject 是 delphi 的基類，系統(tǒng)中的每一個(gè)類都是 tobject 的子類。（對(duì) ）10在 mdi 應(yīng)用程序窗口中，如果將一個(gè)窗體設(shè)為父窗體，要將它的 formstyle 屬性設(shè)為三、填空題（每空2 分，共 20 分）1 用于建立菜單項(xiàng)的下劃線快捷方式的字符是。 2 binbtn 組件的

15、 kind 屬性預(yù)定義了一些常用的位圖按鈕種類。3 memo1.lines.delete（ 1 ）; 是用來(lái)刪除tmemo 組件的第2 行。d（ c）edit1 的上面時(shí)產(chǎn)生edit1onenter itemindex 屬性值應(yīng)為（ 錯(cuò) ）（ 對(duì) ）對(duì) ） fsstayontop 。（ 錯(cuò) ） ）。事件 ）。b ）裝訂線4 delphi 有三種控制循環(huán)的語(yǔ)句：repeat 語(yǔ)句， while 語(yǔ)句，for 語(yǔ)句。5 在 delphi 的 dialog 標(biāo)簽中提供了多個(gè)專用對(duì)話框，其中包括：opendialog ， savedialog ， fontdialog 。6關(guān)閉文件需要使用closef

16、ile （） 函數(shù)。 四、簡(jiǎn)答題（共20 分） 1 簡(jiǎn)述什么是對(duì)象和類。（4 分）在面向?qū)ο蟮某绦蚍治龊驮O(shè)計(jì)技術(shù)中，“類 ”就是對(duì)具有相同屬性和相同操作的一組相似對(duì)象的定義。從另一個(gè)角度來(lái)看，對(duì)象就是類的一個(gè)實(shí)例。2 簡(jiǎn)述程序錯(cuò)誤的類型有哪些。（4 分）（1 ）設(shè)計(jì)期錯(cuò)誤（2）編譯期錯(cuò)誤（3）運(yùn)行期錯(cuò)誤（4）邏輯錯(cuò)誤3 根據(jù)下列代碼，請(qǐng)回答。（12 分） program infoprocusesforms,unit1 in unit1.pas forminfoinput,utn2i in unit2.pas forminfoshow; $r *.res begin ? end.問題1：以上代碼

17、是項(xiàng)目/工程文件的組成部分。問題2：根據(jù)以上代碼，可知項(xiàng)目文件名是infoproc ，該項(xiàng)目文件包含 forminfoinpu 、 forminfoshow 。 五、程序題（每小題10 分，共 20 分）1 填空：向一個(gè)已存在的文本文件后面追加一行文本（我成功的在這個(gè)文件后面加了一行文本）varf: textfile; beginif opendialog1.（ execute ） then beginassignfile （f, opendialog1.filename ）; append （f）;writenln（f, 我成功的在這個(gè)文件后面加了一行文本。 flush（f）;closefi

18、le（f）; end; end;2 在窗體上面繪制出一條規(guī)則的余弦曲線，使其尺寸約為窗體的procedure tform1.formpaint（sender:tobject）; var x,y:real;j,j,h:integer; beginh:=form1.height div 2; for i:=0 to form1.width do beginx:=i*（2*3.14/form1.height）; y:=cos（x）;j:=trunc（0.8*y*h）+h; canvas.pixelsi,j:=clred: end; end;2 個(gè)單元文件，文件名分別是。）; 80% ，寫出編程步驟與

19、代碼。unit1 、 unit2 ，它們對(duì)應(yīng)的窗體名是裝訂線a tdatasource b topendialog c ttable d tscrollbar4設(shè)有過程procedure pro（var x,y:integer）; 變量 a,b 為整型變量，其值分別為5、 6，則合法的過程調(diào)用語(yǔ)句是（da pro（5,6）b pro（5,b） c pro（a,6）d pro（a,b） 5 下列組件中不能獲取焦點(diǎn)的是（b）。a tedit b tlabelc trichedit d ttreeview6 定義抽象類必須使用的指令字是（a）。a abstractb virtualc dynamic

20、d override ” 7 delphi 是哪個(gè)公司的產(chǎn)品（c）。a microsoft b ibm c borland d dom8 .窗體上放置有一個(gè) tedit類控件editl ,當(dāng)在editl中按下維時(shí)觸發(fā)的事件和事件順序是（a）。a onkeydown-onkeypress-onkeyup b onkeydown-onkeyupc onkeypressd onkeydown-onkeyup-onkeypress9 在 radiogroup 組件中有4 個(gè)單選框，當(dāng)選中第2 個(gè)單選框時(shí)，radiogroup 組件中的itemindex 屬性值應(yīng)為（a 0 b 1c 2d 310 函數(shù)

21、和過程的區(qū)別為（a）。a 函數(shù)執(zhí)行后返回一個(gè)值，而過程不需返回值b 過程執(zhí)行后返回一個(gè)值，而函數(shù)不需返回值c.過程在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方d 函數(shù)在被調(diào)用時(shí)，能執(zhí)行某種特殊功能并能返回到調(diào)用它的地方11 32 and 27 的值是（b）。a 59b 0c 27d 32 12 窗體與數(shù)據(jù)模塊的擴(kuò)展名是（b）。a.dcu b .dfm c .pas d .dpr13delphi中用什么函數(shù)來(lái)析構(gòu)一個(gè)組件（c）。a constructor b destroy c free d create 14 一個(gè)指針變量ptr 的域成員fs 訪問的方法是（c）。aptr-fsb. p

22、tr.fsc . ptrAfs d . ptrfs15 type aarrays=1?8,1?5 of integer ，該類型定義了多少個(gè)下標(biāo)元素（d）。 a 45 b 54 c 48 d 40 二、判斷題（每小題1分，共 10 分）1 函數(shù) messagedlgpos 與 messagedlg 極為相似，只是messagedlgpos 函數(shù)能夠控制信息對(duì)話框的出現(xiàn)位置。（對(duì) ）2 bitbtn 控件可以用來(lái)制作一個(gè)帶圖片的按鈕，而speedbutton則不能。（錯(cuò) ） 3 mediaplayer 控件的 autoenable 屬性是用來(lái)控制該控件是否可用。（錯(cuò) ）4 圖形組件沒有輸入焦點(diǎn)，

23、不能接受用戶的輸入，它只具有向用戶顯示的功能。（對(duì) ） 5 1 、 pascal 語(yǔ)言中可以把一個(gè)實(shí)數(shù)賦值給一個(gè)整型變量，系統(tǒng)會(huì)自動(dòng)取整。（錯(cuò) ）6 所有類都有name 屬性。（ 錯(cuò) ）7 variant 類型的變量被動(dòng)態(tài)賦值為一個(gè)特定的數(shù)據(jù)類型后，不能再賦值為一個(gè)其它的數(shù)據(jù)類型。（錯(cuò) ） 8 在 mdi 應(yīng)用程序窗口中，如果將一個(gè)窗體設(shè)為父窗體，要將它的formstyle 屬性設(shè)為fsstayontop 。（ 錯(cuò) ）9 tobject 是 delphi 的基類，系統(tǒng)中的每一個(gè)類都是tobject 的子類。（ 對(duì) ）10 timer 組件常稱為“定時(shí)器 ”，它每隔固定的時(shí)間間隔可以觸發(fā)一個(gè) o

24、ntimer 事件。（對(duì) ） 三、填空題（每空2 分，共 20 分）1 delphi 有三種控制循環(huán)的語(yǔ)句：repeat 語(yǔ)句， while 語(yǔ)句， for語(yǔ)句。 2 delphi 支持 3 種類型的注釋： 注釋， （* *） 注釋， /注釋。 3 所有可視化的vcl 控件都是從tcontrol 基類派生而來(lái)的。）。）。 b【篇二：delphi 程序設(shè)計(jì)試題及解答】lass=txt> 一、填空題（20 分，每空2 分）2 、現(xiàn)實(shí)世界中對(duì)象具有自己的狀態(tài)和行為。對(duì)應(yīng)著，面向?qū)ο蠹夹g(shù)中的對(duì)象可以具有自己的屬性和。3 、 delphi 應(yīng)用程序中項(xiàng)目文件的擴(kuò)展名是。4 、結(jié)構(gòu)化程序設(shè)計(jì)要求程序

25、中僅采用順序、分支和循環(huán)三種控制結(jié)構(gòu)，其中每種結(jié)構(gòu)只能有和一個(gè)出口。4、在 delphi 集成開發(fā)環(huán)境中，如果想要直接設(shè)置或者修改對(duì)象的屬性，可以通過對(duì)象查看器（object inspector ）中的 窗口直接進(jìn)行設(shè)置。5 、 listbox 對(duì)象列表框中的內(nèi)容是通過6 、時(shí)鐘組件（timer） 能有規(guī)律的以一定時(shí)間間隔觸發(fā)事件。7 、如果讓界面上的一個(gè)按鈕變?yōu)椴豢捎?，需要將它的false 。8 、 image 組件可通過設(shè)置其true 使 image 組件根據(jù)圖像的大小自動(dòng)調(diào)整顯示窗口大小。9 、 delphi 的一個(gè)項(xiàng)目由若干文件組成，其中文件名后綴含有“ ”的文件為。10、與數(shù)學(xué)表達(dá)式

26、cos（a?b）3x2?5 對(duì)應(yīng)的 object pascal 表達(dá)式是二、單項(xiàng)選擇題（30 分，每題3 分）1 、 delphi 程序設(shè)計(jì)的基本特點(diǎn)是（）a 可視化程序設(shè)計(jì)b 代碼程序設(shè)計(jì)c 事件驅(qū)動(dòng)編程d a 和 c2 、修改窗體的標(biāo)題時(shí)，應(yīng)當(dāng)設(shè)置form 的屬性是（）a captionb name c text d label3 、下列哪個(gè)常量說(shuō)明語(yǔ)句是正確的（）a. const x := （c 16）;b. const x : 16 ;c. const x := 16 ; d const x = 16 ;4、 “x是小于100的非負(fù)數(shù)”的object pascal表達(dá)式是（）a. 0

27、< x 100 b. x = 0, x100c （x =0） and （x 100） d （x = 0 ） or （x100）5 、編輯框（edit ）中的文本發(fā)生改變時(shí)引發(fā)的事件是（）a autosize b onchangec setfocusd settext6 、表達(dá)式30 19 div 2 的值是（）a 37 b 49c 39d 407 、現(xiàn)建立一個(gè)簡(jiǎn)單報(bào)表，僅包含報(bào)表標(biāo)題欄、數(shù)據(jù)欄和匯總欄，則在 bands 屬性的子屬性中，不需要選擇的是（）a hascolumnheaderb detailc titled summary8 、下面哪個(gè)功能鍵可以調(diào)出delphi 的聯(lián)機(jī)幫助信

28、息（）a f1 鍵b f2 鍵c f3 鍵d f4 鍵9 、數(shù)據(jù)庫(kù)組件中，提供了對(duì)數(shù)據(jù)庫(kù)讀寫操作功能的核心組件是（）a 數(shù)據(jù)源組件b 用戶界面組件c 數(shù)據(jù)集組件d 數(shù)據(jù)感知控件10、以下控件中沒有items 屬性的是（）a comboboxb listbox c radiogroupd memo三、判斷題（10 分，每題2 分）請(qǐng)給下列論述中正確的打上錯(cuò)誤的打上“？”（10分，每題1分）1 、 （ ） 一個(gè)數(shù)組中的各元素的數(shù)據(jù)類型必須相同。2 、（）在一個(gè)項(xiàng)目中，可以根據(jù)需要將任何一個(gè)窗體定義為主窗體。3 、 （ ） 每個(gè)數(shù)據(jù)感知控件都必須指定datasource 和 datafield 兩個(gè)

29、屬性值。4 、 （ ） label 和 edit 組件都可以用于用戶輸入數(shù)據(jù)。5 、 （） 按鈕組件和編輯框組件能夠響應(yīng)的事件有些是相同的。四、程序填空題（30 分，每題10 分）1 、（10 分，每空2 分）本程序根據(jù)用戶選擇的運(yùn)算符對(duì)輸入的二個(gè)操作數(shù)進(jìn)行運(yùn)算，并顯示運(yùn)算結(jié)果。設(shè)計(jì)界面和運(yùn)行界面如圖所示。其中，運(yùn)算符是一個(gè)含有 4 個(gè)單選按紐的radiogroup1 對(duì)象。下面是單擊“運(yùn)算 ”按鈕的事件處理程序，請(qǐng)根據(jù)功能要求完成程序填空。procedure tform1.button1click(sender: tobject);/ 運(yùn)算varx1,x2,y :integer;beginx

30、1 := strtoint( edit1.);x2 := strtoint( edit2.);case .itemindex of0: y := x1 + x2 ;1: y := x1 - x2;2: y := x1 * x2;3: y := x1 div x2;end;edit3. := inttostr( );end;2、（10 分，每空2 分）數(shù)據(jù)庫(kù) mydb 中有關(guān)系表student ，其結(jié)構(gòu)如下：student （ sno 學(xué)號(hào)， sname 姓名， sex 性別， birthday 生日） 現(xiàn)編寫一個(gè)學(xué)生信息瀏覽程序，設(shè)計(jì)界面和運(yùn)行界面如下圖所示：在下劃線處填寫相應(yīng)數(shù)據(jù)庫(kù)組件的屬性

31、值：database1. databasename : mydbtable1. databasename : mydbtable1. tablename : studenttable1. active : datasource1.dataset: dbnavigator1.datasource : dbedit2. datasource: dbedit2. datafield :3 、（10 分，每空2 分）本程序?qū)崿F(xiàn)一個(gè)簡(jiǎn)單的借書界面。程序的設(shè)計(jì)界面和運(yùn)行界面如下圖所示：該程序涉及到數(shù)據(jù)庫(kù)中的兩張表：books （圖書信息）和borrow（借書記錄）。表的結(jié)構(gòu)為：books （ bno ，書

32、號(hào)，bname 書名， num 現(xiàn)有冊(cè)數(shù)）borrow （ rno 讀者號(hào)，bno 書號(hào)， rdate 還書日期）其中， rno 和 bno 都是字符型（3 位）。在用戶界面，操作員選中一本書、輸入借書證號(hào)后，按“借書 ”鍵完成借書功能，即在borrow 表中插入一條借書記錄，并將books 表中該書現(xiàn)有冊(cè)數(shù)減1 。該界面要實(shí)現(xiàn)以下合法性檢查：? 當(dāng)該讀者已經(jīng)借了此書，不能再借。? 當(dāng)所借的書現(xiàn)有冊(cè)數(shù)為0，不能再借。在 form1 上建立的數(shù)據(jù)庫(kù)組件對(duì)象及連接關(guān)系如下：database1 table1 （與 books 表相連）datasource1 dbgrid1 （顯示圖書信息）datab

33、ase1 table2 （與 borrow 表相連，用于插入借書記錄）database1 query1其中為 table1 建立了 3 個(gè)永久字段：table1bno （書號(hào)）、table1bname （書名）、table1num （現(xiàn)有冊(cè)數(shù)）。query1 的 sql 語(yǔ)句如下：select bnofrom borrowwhere rno = :rno and bno = :bno下面是 unit1 的代碼實(shí)現(xiàn)部分，請(qǐng)完成程序填空：implementation$r *.dfmprocedure tform1.button1click(sender: tobject); /借書 “”鍵begi

34、nquery1.close ;query1.parambyname（rno）.value :=;query1.open ;if query1bno null thenbeginshowmessage（ 該讀者正在借閱此書）;exit;end ;if thenbeginshowmessage（ 該書已全部借出）;exit ;end;/插入借書記錄;現(xiàn)有冊(cè)數(shù)減1table1num.value := table1num.value - 1 ; /table1.post ;end;end.五、編程題（10 分）本程序設(shè)計(jì)界面及運(yùn)行界面如下：程序功能是：用戶輸入一個(gè)3 位正整數(shù)后，按“確定 ”鍵，該數(shù)字

35、的個(gè)位、十位、百位數(shù)字分別顯示在輸出框中。如果輸入的數(shù)據(jù)不在規(guī)定范圍之內(nèi)，程序要給出錯(cuò)誤提示。請(qǐng)編寫單擊“確定 ”按鈕的事件處理程序?！酒篸elphi 復(fù)習(xí)題答案版】ss=txt> 持。3 、要想使窗體中的某個(gè)控件獲得焦點(diǎn)，則需調(diào)用方法。文本的格式。p645 、由于 tdbgrid 控件和 tdbnavigator控件是自動(dòng)地訪問數(shù)據(jù)集控件中所有可6、函數(shù) format（ 本場(chǎng) %已進(jìn)了 1 個(gè)球！ ,李鐵 返回的字符串為）本場(chǎng)李鐵已進(jìn)了1 個(gè)球 ! 。7、 tedit 控件的 maxlength 屬性是設(shè)置8、想在 button 按鈕上設(shè)置快捷方式，需要在caption 屬性中應(yīng)用

36、符號(hào)9、通過數(shù)據(jù)庫(kù)字段對(duì)象（例如：ttalbe 部件的字段對(duì)象）的屬性可以讀取字段值，并且將它轉(zhuǎn)換成字符串類型。10 、 delphi 為用戶提供一種append 方法，用來(lái)以便與在文件末尾添加文本。11 、常量是一種內(nèi)容不能改變的標(biāo)識(shí)符，常量聲明采用保留字12、delphi 的計(jì)時(shí)器的interval 屬性設(shè)置為1000，即是每隔秒會(huì)被觸發(fā)一次。1 、以下正確的枚舉類型的定義是（c ）。（ a） type vowel=（ a , e , （ i b） , typtenu, m =u（1.）3, 8.10）（ c） type color=（red, blue, black） （ d） type

37、 realtype=（1.5, 2.5,3.5, 4.5） 2 、已知如下子界類型定義及變量聲明：type ntype= -10 .10; var m: ntype; n: integer;問下列語(yǔ)句哪一個(gè)可能產(chǎn)生錯(cuò)誤：（b ）。（ a） n := m; （ b） m :=n; （ c） n := abs（m）; （ d） n := n+m; 3 、下列哪些符號(hào)哪一個(gè)是delphi6 中的合法變量名（a ）。（ a） ab5 （ b） 0ab （ c） then （ d） ab8 4 、下面哪個(gè)是delphi工程文件的擴(kuò)展名（b ）。（ a） .pas （ b） .dpr （ c） .cfg

38、（ d） .dfm 5 、 memo 控件的 align屬性用于調(diào)整該對(duì)象在窗口中的對(duì)齊方式，當(dāng)需要該控件頂部對(duì)齊時(shí)，其值可以設(shè)置為（a）。（ a） altop （ b） alclient （ c） albotton （ d） alright 6 、設(shè)有一個(gè)自定義過程聲明如下：procedure silly（a: integer; var b: integer）;var c: integer; begina:=1;b:=12;c:=14; end;執(zhí)行下述程序段：a:=4; b:=8; c:=6;silly（b, a）;則 a, b, c 的值分別是什么？（ a） （12,4,6） （ b）

39、（4,1,14）（ c） （12,8,6） （ d） （12,1,6） 7 、下列（ c ）語(yǔ)句不是標(biāo)準(zhǔn)的sql 語(yǔ)言中的。（ a） select （ b） insert （ c） rename （ d） delete 8 、下列常量說(shuō)明語(yǔ)句中哪個(gè)（c ）是合法的。（ a） const c:=（a6.8） ；（ b） constc: 6.8 ； （ c） const c=6.8 ；（ d） constc:=10 and 20 ；9、設(shè)有如下程序段：5: = 100 ; n: = 3 ;for ch := a to e dobeginif not odd（n） then s := s - n ;

40、 n := n + 5;end;假設(shè)所有變量均已說(shuō)明，程序執(zhí)行后s 的值是：（ a）97（ b）89 （ c） 74（ d） 58 10 、下面哪一條delphi6 語(yǔ)句能夠?qū)崿F(xiàn)如下功能，在列表框listbox1 的第 5 行中插入一個(gè)新選項(xiàng)歡迎使用delphi （ c ）。（ a） listbox1.item.insert（5, 歡迎使用 delphi （）; b） listbox1.item.add（ 歡迎使用 delphi , 5） ;（ c ） listbox1.item.insert（4, 歡迎使用 delphi ）;（ d）li stbox1.item.add（4, 歡迎使用 de

41、lphi ） ;11 、幾何圖形控件shape 位于工具欄上的additional 頁(yè)中，用于在窗體上繪制一些常見的幾何圖形，下面哪個(gè)圖形是不能由shape 繪制的（d ）。（a）圓角正方形（b）矩形（c）圓形 （d）菱形12、有以下程序段：i :=1;repeat j :=j*i;i :=i+2;until j2*i;假設(shè)所有變量均已說(shuō)明，該循環(huán)體的執(zhí)行次數(shù)是（）。（ a） 1 （ b） 2（ c） 3（ d） 4三、判斷題1 、函數(shù) pos（s0, s） 返回子字符串s0 在字符串s 中的位置，若s0 在s 中，則返回為0。（對(duì) ）3、 edit 控件既可用來(lái)供用戶輸入單行和多行文本也可以

42、用來(lái)顯示它們。4、組合框comboxbox 兼有 editbox和 listbox 兩者的功能，其seltext 屬性是用來(lái)存儲(chǔ)顯示于編輯區(qū)中被選中項(xiàng)的內(nèi)容。（對(duì) ） 5、在object pascal 語(yǔ)法中，函數(shù)的返回值通過函數(shù)名或預(yù)定義的result 帶回， 6、當(dāng)容器控件的位置、可視性以及有效性屬性發(fā)生改變時(shí)，其中的子控件也發(fā)生同樣的變化。7、delphi 使用的就是object pascal 語(yǔ)言， object pascal 和 turbopascal 是完全相同的。（錯(cuò) ）8 、要使 speedbutton像復(fù)選框那樣工作，只需將groupindex 屬性設(shè)為大于0，且不與任何其他

43、speedbutton 的 groupindex 屬性值相同。（錯(cuò) ）9 、在 object pascal 語(yǔ)法中，函數(shù)的返回值通過函數(shù)名或預(yù)定義的result 帶回，使用result 完全等同于函數(shù)名。10 、某過程聲明如下：procedure myprocedure （x :real, y: integer=8） ；對(duì)上述過程，下面調(diào)用語(yǔ)句是等效的：myprocedure（b,8） 和 myprocedure（b） 。 11 、從物理上講，全程變量和局部變量在程序編譯時(shí)，系統(tǒng)就在內(nèi)存數(shù)據(jù)區(qū)中為2、長(zhǎng)字型longword 是 4 字節(jié)的大小的數(shù)據(jù)類型。（對(duì) ）使用 result 完全等同于函數(shù)