Delphi_程序设计基础教程_习题答案(hzd)
Delphi程序设计试题及解答
《Delphi 程序设计》试题及解答 卷6一、填空题（20分，每空2分）1、现实世界中对象具有自己的状态和行为。
对应着，面向对象技术中的对象可以具有自己的属性和 。
2、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有 和一个出口。
3、Delphi 应用程序中单元文件的扩展名是 。
4、与数学表达式 53)(cos 2++xb a 对应的Object Pascal 表达式是 。
5、对于下面的条件表达式：（（3 <= x ）AND （x < 0）） OR （x in [1..10]）当x = 3 时， 该表达式的值为 。
6、ListBox 对象列表框中的内容是通过 属性来进行设置的。
7、如果想设计DBGrid 对象的列标题和对齐方式，可以对DBGrid 对象的 属性进行设置。
8、时钟组件（Timer ）能有规律的以一定时间间隔触发 事件9、能够实现格式化输入的编辑框组件是10、利用 对象的LineTo 等方法，可以绘制基本图形。
二、单项选择题（20分，每题2分）1、Delphi 程序设计的基本特点是（ ）。
A ． 可视化程序设计B ． 代码程序设计C ． 事件驱动编程D ． A 和C2、进度显示组件ProgressBar 的当前进度可以通过（ ）属性设置。
A ． StepB ．ScrollC ． PositionD ．Max3、下列变量命名正确的是（ ）。
A ．7ABCB ． My7C ． page@2D ．cmd..14、“x 是小于200的非负数”的Object Pascal 表达式是（ ）。
A ．0 ≤ x < 200B ． x >= 0, x<200C ．(x >=0) AND (x < 200) D ． (x >= 0 ) OR (x<200)5、在窗体上建立多页面的用户界面，需要首先建立的对象是（ ）A ． TabControlB ．PageControlC ． HeaderControlD ．PageScroller6、能够删除edit1中内容的语句是（ ）。
Delphi程序设计试题二及答案
Delphi 程序设计试题二及答案一、填空题（20分，每空2分）1、现实世界中对象具有自己的状态和行为。
对应着，面向对象技术中的对象可以具有自己的属性和 。
2、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有 和一个出口。
3、Delphi 应用程序中单元文件的扩展名是 。
4、与数学表达式 53)(cos 2++xb a 对应的Object Pascal 表达式是 。
5、对于下面的条件表达式：（（3 <= x ）AND （x < 0）） OR （x in [1..10]）当x = 3 时， 该表达式的值为 。
6、ListBox 对象列表框中的内容是通过 属性来进行设置的。
7、如果想设计DBGrid 对象的列标题和对齐方式，可以对DBGrid 对象的 属性进行设置。
8、时钟组件（Timer ）能有规律的以一定时间间隔触发 事件9、能够实现格式化输入的编辑框组件是10、利用 对象的LineTo 等方法，可以绘制基本图形。
二、单项选择题（20分，每题2分）1、Delphi 程序设计的基本特点是（ ）。
A ． 可视化程序设计B ． 代码程序设计C ． 事件驱动编程D ． A 和C2、进度显示组件ProgressBar 的当前进度可以通过（ ）属性设置。
A ． StepB ．ScrollC ． PositionD ．Max3、下列变量命名正确的是（）。
A．7ABC B．My7 C．page@2 D．cmd..14、“x 是小于200的非负数”的Object Pascal表达式是（）。
A．0 ≤x < 200 B．x >= 0, x<200C．(x >=0) AND (x < 200)D．(x >= 0 ) OR (x<200)5、在窗体上建立多页面的用户界面，需要首先建立的对象是（）A．TabControl B．PageControlC．HeaderControl D．PageScroller6、能够删除edit1中内容的语句是（）。
Delphi_程序设计基础教程_习题答案(hzd)
Delphi 程序设计基础教程第 1 章Delphi 集成开发环境1. 填空题(1) Delphi 是一个集成开发环境，从 3程序设计、代码编译、调试，到最布程序的全部工作都可以在这个集成环境中完成。
(2) 在 Delphi 集成环境的主要组成部分中有许多功能强大的工具，如： 3主窗体、对象树状视图、对象观察器、窗体设计器、代码编辑器工具等。
(3) Delphi 集成开发环境的界面分为4个部分，分别是。
主窗口、窗体窗口、代码编辑窗口和对象查看器窗口(4) 对象查看器的功能是：编辑设置窗体、组件的属性，并为窗体、组件添加事件的响应处理过程(5) Delphi 主窗口由：标题栏、菜单栏、工具栏和组件板组成，它是打开其他窗口和退出D elphi 集成环境的主要界面。
2. 选择题D(1) 对象查看器由组成。
A. 标题栏、菜单栏、属性标签和事件标签B. 标题栏、菜单栏、对象选择器和事件标签C. 标题栏、菜单栏、对象选择器和属性标签D. 标题栏、对象选择器、属性标签和事件标签D(2) Delphi 用来管理用户开发的应用程序中的各个文件，有序地管理可以极大地提高应用程序开发的质量和速度。
A. 单元B. 组件C. 属性D. 项目B(3) 用来编写应用程序的代码。
A. 调试器窗口B. 代码编辑窗口C. 报表生成器窗口D. 数据库桌面窗口B(4) 代码编辑窗口分为左、右两部分：。
A. 左边是单元代码窗口，右边是单元浏览器窗口B. 左边是单元浏览器窗口，右边是单元代码窗口C. 左边是单元调试窗口，右边是单元浏览器窗口D. 左边是单元浏览器窗口，右边是单元调试窗口A(5) 属性选项卡即标签名为“Properties”的选项卡，用于设置当前组件的属性，属性选项卡是一个两列的表格，。
A. 左列是属性标题，右列是属性值B. 左列是组件名称，右列是事件名C. 左列是属性标题，右列是事件名D. 左列是组件名称，右列是属性值C(6) 事件选项卡即标签名为“Events”的选项卡，用于为当前组件添加各种响应事件(如单击、拖曳事件等)，它随对象选择器中的所选组件而发生变化。
Delphi习题
第一章 概述习题一、填空题1.Delphi 是＿＿＿＿＿公司开发的＿＿＿＿＿＿＿工具。
2、利用对象查看器可以设置窗体或组件的＿＿＿＿＿。
3、一个Delphi 应用程序必有一个＿＿＿＿＿文件和至少一个单元文件。
4、在Delphi 应用程序中，工程文件的后缀名是＿＿＿＿＿，单元文件的后缀名是＿＿＿＿＿。
5、Delphi 应用程序设计基于＿＿＿＿＿语言。
二、简答题1．如何启动Delphi7？2．Delphi 的可视化开发环境由哪几部分组成？每部分的功能是什么？3．简述Delphi 可视化编程的一般步骤。
第二章object pascal 语言基础习题一﹑填空题1. 在object pascal 语言中，常量定义部分以 保留字开头； 变量定义部分以 保留字开头。
2. s:=0;for i:=3 to 14 dos:=s+i;运行后S 的值为 。
3. 过程与函数的区别在于 。
4. 与数学表达式 53)(cos 2++xb a 对应的Object Pascal 表达式是5. 结构化程序设计要求程序中仅采用 三种控制结构。
6. 以下语句x:=30; y:=3; while y<=x do y:=y+y;的循环执行次数是____________次。
7. 程序 For I:=1 to 5 do for j:=2 to I do writeln('*'); 输出的'*'个数为_______个。
8．与数学表达式2253)(sin x xb a ++对应的Object Pascal 表达式是9．Break 语句和Continue 语句的区别是 。
10．运算符分为 和二．选择题1．“x 是小于1000的非负数”的Object Pascal表达式是（）A．0 ≤ x < 1000 B． (x >= 0 ) OR (x<1000)C．x >= 0, x<1000 D． (x >=0) AND (x < 1000)2．设a是布尔变量，其它是整型变量，下面正确的赋值语句是( )A、 x=y/7B、 x:=y:=z+1C、 a:=x=y mod zD、 x+y:=z3．下列常量定义合法的是（）A、 CONST width=7;B、 CONST case='7';C、 CONST 1A=7.9;D、 CONST century=2006 div 100;4．以下运算符中运算优先级最高的是（）A、 +B、 ORC、 >=D、 DIV5．设a是布尔变量，其它是整型变量，下面正确的赋值语句是（）。
delphi程序试题答案
一、单选题1．在RadioGroup 组件中有 4 个单选框，当选中第 2 个单选框时，RadioGroup 组件中的ItemIndex 属性值应为（ B ）。
A．0 B．1 C．2 D．32．函数和过程的区别为（ A ）。
A．函数执行后返回一个值，而过程不需返回值 B．过程执行后返回一个值，而函数不需返回值C．过程在被调用时，能执行某种特殊功能并能返回到调用它的地方 D．函数在被调用时，能执行某种特殊功能并能返回到调用它的地方3．32 AND 27 的值是（ B ）。
A．59 B．0 C．27 D．324．窗体与数据模块的扩展名是（ B ）。
A．.dcu B．.dfm C．.pas D．.dpr5．Delphi 中用什么函数来析构一个组件（ C ）。
A．Constructor B．Destroy C．Free D．Create6．一个指针变量ptr 的域成员fs 访问的方法是（ C ）。
A．ptr->fs B．ptr.fs C．ptr^fs D．ptr@fs7．Type aarrays=[1…8,1…5] of integer ，该类型定义了多少个下标元素（ D ）。
A．45 B．54 C．48 D．408．Delphi 的所有类都是从什么类继承下来的（ B ）。
A．Tcomponent B．TobjectC．Tstream D．Tnull9．定义构造函数时用到的保留字是（ C ）。
A．Class B．.implementation C．create D．construction10．下列组件中属于可视组件的是哪一个（ D ）。
A．Tdatasource B．Topendialog C．Ttable D．Tscrollbar11．设有过程procedure pro(V AR x,y:integer); 变量a , b 为整型变量，其值分别为5、6，则合法的过程调用语句是（ D ）。
A．Pro(5,6) B．pro(5,b) C．pro(a,6) D．pro(a,b)12．下列组件中不能获取焦点的是（ B ）。
Delphi程序设计试题及解答1-1-111
《Delphi 程序设计》试题及解答 卷6一、填空题（20分，每空2分）1、现实世界中对象具有自己的状态和行为。
对应着，面向对象技术中的对象可以具有自己的属性和 。
2、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构，其中每种结构只能有 和一个出口。
3、Delphi 应用程序中单元文件的扩展名是 。
4、与数学表达式 53)(cos 2++xb a 对应的Object Pascal 表达式是 。
5、对于下面的条件表达式：（（3 <= x ）AND （x < 0）） OR （x in [1..10]）当x = 3 时， 该表达式的值为 。
6、ListBox 对象列表框中的内容是通过 属性来进行设置的。
7、如果想设计DBGrid 对象的列标题和对齐方式，可以对DBGrid 对象的 属性进行设置。
8、时钟组件（Timer ）能有规律的以一定时间间隔触发 事件9、能够实现格式化输入的编辑框组件是10、利用 对象的LineTo 等方法，可以绘制基本图形。
二、单项选择题（20分，每题2分）1、Delphi 程序设计的基本特点是（ ）。
A ． 可视化程序设计B ． 代码程序设计C ． 事件驱动编程D ． A 和C2、进度显示组件ProgressBar 的当前进度可以通过（ ）属性设置。
A ． StepB ．ScrollC ． PositionD ．Max3、下列变量命名正确的是（ ）。
A ．7ABCB ． My7C ． page@2D ．cmd..14、“x 是小于200的非负数”的Object Pascal 表达式是（ ）。
A ．0 ≤ x < 200B ． x >= 0, x<200C ．(x >=0) AND (x < 200) D ． (x >= 0 ) OR (x<200)5、在窗体上建立多页面的用户界面，需要首先建立的对象是（ ）A ． TabControlB ．PageControlC ． HeaderControlD ．PageScroller6、能够删除edit1中内容的语句是（ ）。
(Delphi)计算机程序设计模拟试题一及参考答案
(Delphi)计算机程序设计模拟试题一试题一1 ．一般程序设计都采用高级语言，很少使用汇编语言，因为（ 1 ）。
软件设计和程序设计是两个不同的概念，（2 ）。
一份详细的程序设计说明书常常比程序源代码更有保存价值，这是因为（3 ）。
程序代码重用可以提高编程效率，源代码和编译后的目标代码都可以重用，比较好的重用方法是（4 ）。
设计Windows 程序必须时时想到计算机不是由某个程序独占的，因此（5 ）。
（ 1 ） A ．高级语言编的程序执行效率较高B ．汇编语言不容易学习，使用不方便C ．历史上一直这样沿用下来D ．高级语言种类很多，有更多的选择余地（ 2 ） A ．程序设计不仅包括软件设计，还包括硬件设计B ．程序设计和软件设计涉及完全不同的知识领域C ．如果把软件设计比做桥梁工程设计，程序设计则是桥梁设计D ．软件设计必须考虑各方面的协作问题，而程序设计不涉及此问题（ 3 ） A ．从程序设计说明书可以自动生成源程序B ．设计说明书比源程序更精炼，更容易保存C ．源程序将随着时间的流逝逐渐失去价值，设计说明书则不会D ．从源程序中不容易看出设计中包含的某些关键问题（ 4 ） A ．直接复制源代码，因为这样可以看请代码的功能和接口方法B ．直接复制源代码，因为这样比较容易修改C ．直接调用目标代码，但要通过源代码说明其功能和接口方法D ．直接调用目标代码，但要有清晰的调用接口（ 5 ） A ．应尽快释放程序所占用的资源B ．应该尽量减少打开和关闭文件的操作C ．程序不应长期保持运行状态D ．程序应当减少循环处理，以免影响其他程序运行试题二一般应用程序都有个主窗口，其中包含一个主菜单。
为了使程序操作简便，定义菜单选项需要注意若干问题。
首先，选项名称应该（ 1 ）；其次，层次数不宜过多，每一层选项数也不宜过多；再者，（ 2 ）。
工具栏包含的按钮可以和菜单选项一一对应，也可以不完全对应，但工具栏中包含的功能项应该在菜单中都能找到。
Delphi问题及解答汇总
图一1.未选中的，搞成恢色选中的状态了dbgrideh ，该如何设置呢Delphi2007:keylist设置:正确答案:10;null;2.把数据均分到两栏里面.答案:先把列标题按照两栏的格式设置好,然后对数据集设置成2栏,如下图然后再把对应列的数据来源设好,只设定一边就ok.3.在cds里新加了一个”计算”型字段,点击该列时,提示cds没有这个字段,只要在feildkind 属性设置为ftInternalCalc类型就ok了,一般数据库表有的字段,该属性的值是ftdata.4.网格新增记录后,统计数据刷新dbgrideh.SumList.Active := False;dbgrideh.SumList.Active := True;5.delphi/Oracle字符串反转Result := System.StrUtils.ReverseString(Value);Select reverse('Dan Morgan') from dual;6 TclientDataSet 字段新旧值,即网格列对应字段修改前后值都有记载.old值为未修改之前的值:cds1.FieldByName('关联比例').NewValue < cds1.FieldByName('关联比例').OldValue7DBGridEh1.SumList.SumCollection[1].SumValue 中的"1"表示统计类型为ftsum,且是该网格中的第二2个使用ftsumDBGridEh1.SumList.SumCollection[1].SumValue + DBGridEh2.SumList.SumCollection[0].SumValue;取得某列的脚注footercds1.AppendData(cdswlpz.Data,True); DBGridEh1.SumList.RecalcAll;9下面的如何才改才能显示中文呢下面的如何才改才能显示中文呢?:改下字段的displaylable即可9设置数据集的字段显示格式10DBgridEH导出数据111213 建立,删除索引Dbgrideh排序问题DBGridEH点击标题自动排序的设定①按DataSet源类型的不同，在工程中引用EhLib相应排序单元文件，如uses EhLibAdo，uses EhLibCDS，uses EhLibBDE、uses EhLibDBX等，我一般都会在一个公共文件中进行引用，这样就无须在所有用到DBGridEH的单元中都城加入引用语句了，如在DataModule之类的公共窗体中uses EhLibXXX;一次就行了。
《程序设计基础教程》-高等教育出版社-课后习题参考答案
习题第一章程序与编程环境一、填空题1. 工程，Form_Load2. 事件（触发）3. 空缺，空缺4. CurrentX, CurrentY5. maxButton, BorderStyle = 1 or 3 or 4 or 56. Alignment, 空缺，空缺7. Style, LoadPicture8. Line, Shape9. 重画10. FillStyle, maxLength, Locked 12. 空缺13. sub, 对象名，事件名14. 方法，Object.Method, text1.setfocus()15. Name, minButtom, CurrentX(Y), Caption16. Interval, Enable 17. timer, Interval, ms(毫秒)18. Mouse Down, Click, LoastFocus19. .Frm, .Frx, .bas. cls. Vbp 20. Rem, Rem 语句二、简答题（略）第二章数据的类型、表示以及运算一、请指出下列哪些是VB的合法常量，并说明原因（1）√（2）X 常量不能加类型说明符号改成123.4 （3）X与上题类似，如果是常量，则类型说明符放在后面（4）√等价于2E3 (5) √（6）√等于十进制的4113(7)X 如果是16进制要写&符号（8）X 指数不能为小数（9）X 月份超过12，日超过31 （10）√（11）√（12）√等价于上一题(13)X 8进制数每一位不能超过8 （14）√（15）X 变量，常量要为基本数据类型的值（16）√二、找出合法变量（1）√（2）√如果与控件Label1同在一个应用程序里面，该变量会屏蔽掉控件Label1(3) X 保留字（4）√（5）X 变量不能以数字开头（6）变量不能有小数点（7）√（8）√数组变量（9）X保留字（10）√可以，但rnd()不可以，rnd()是函数 (11) √（12）√（13）√（14）X ’符号表示注释（15）X 这是表达式，不是变量（16）X 同上，是表达式三、指出下列数据x,y,z的声明是否正确，如果正确请指明其类型（1）√ x--long, y—variant, z—integer(2) √ x—long, y—long, z—integer(3) √ x—double, y—double, z—integer(4) X 变量x &中间不能有空格（5）√自动转换成字符串（6）X 变量声明不能直接赋值（7）√（8）√自动转换成字符串（9）X 常量不能把函数写上去（10）√四、写出下列表达式的结果（1）1 (2) 1 (3)false (4) ab12 (5)123 (6)出错，加法表达式中如果有一个是数值类型，则“+”表示加号，而不是字符的链接符号（7）False (8)true (9)true (10) false 默认转换成相同类型（数值），建议这里把2改成D试试（P.S.布尔类型TRUE = -1, FALSE = 0;优先顺序：^(乘方)→-(求负)→*、/→\(整除)→MOD→+、-）五、写出下列函数的结果（1）3 （2）2 （3）-2 （4）0 （5）2 （6）23 （7）23 （8）1 （9）1 （10）21 日期差分函数，参数“m”为两年月份之差六、写出满足以下条件的表达式（1）fix(rnd()*90)+10 (2)chr(fix(rnd()*26)+65) (3) (A mod 100)\10(4) A mod B<>0 (5)A>“A”and A<“Z”(6) A<B OR A<C (7)A>C AND B>C(8) (A>C AND B<C) OR (A<C AND B>C) (9) A+B>C AND B+C>A AND C+A>B(10)A=“及格”XOR B=“及格”(11)Round(A/B,2) (12) Len(A)<>0 或 Len(A)>0 (13) “A10?”(14) Len(A)>=3七、填空题1. “”, # #2. x>=10 and x<203. (y mod 3=0) or (y mod 7 =0)4. sin(x)^2 + (1/2)*sqr(x^2-y^2)5. 166. T, F7. SIN(ATN(1))8. Randomize9. (c>chr(97) and c<chr(122)) or (c<chr(48) and c>chr(57))10. vbCrLf 11. CInt(), 012. 从第12个月开始，循环一年12个月13. ab, cd0 14. Variant, String, Integer15. Now() 16. DateDif(#2011-5-1#,now(), “m”)八、请指明下列程序运行后，各个变量的值（1） 3 5（2） 120(3) False(4) -3九、分析下面程序中的错误并修改，使其能够完成指定的功能（1）Print 20000+0&+20000或 Print 20000&+20000&(2) 改1：A=xA= a+aB=xB=2*b改2：A=a+x+xB=2*(x+b)十. 简答题（略）第三章程序界面与基本输入输出一、填空题1．Textbox, Inputbox, Label, Textbox, Msgbox, Print2. “,” , “;” , CurrentX, CurrentY3. Print4. AutoSize, Stretch5. Textbox, Label, Textbox, True6. Text1=””, Picture1.cls7. Integer, String8. Textbox, Check , Option, Combo, List9. .setFocus, 失去焦点10. Min, Max, Scroll, Change11. TabIndex12. Enabled, Visible二、简答题(略)三、编程题(略)第四章控制结构一、判断题1．X2. X3. √4. X 循环体中改变其值5.√二、填空题1. 顺序，选择，循环2. “A”,”E”, chr(97), “A” to “Z”, Is>0, Else3. 死循环4. 设置计数器5. True/False, 0/16. 0, ListCount-1三、读程序填空1. 88 及格2. Print x; “是偶数”Print x; “是奇数”3.i= Instr（st, “”）right(st, len(st)-i)I = Instr(st, “The”)Left(st, i-1) & right(st, len(st)-i-3)不用填任何东西（这里是旧版书的过程返回）4.is < 0 “无定义”0 to 1 (log(x)/log(2))^2Is >1 sqr(log(x)/log(2))5.40 ,176.*fAbs(x2-x1)<0.000017. while m<>nPrint m (或n)四、编程题（略）第五章数组和自定义类型一、简答题1.Option Base 1, 只能取0或12.很多情况3.动态数组可重定义，静态数组不可以；动态数组可以用变量，静态数组不可以用变量4.不能，Preserve关键字保留数组原有的内容，但是只能够改变数组的最后一维5.将用引号分隔的字符串塞进数组；UBound(), LBound()在不确定数组上下界情况下可使用或写出的程序更通用6.8字节7.6个元素；[0,2] [3,4]8.这里较为特殊的是List框的Text属性，就是List框所选的内容9.组合框=文本框+列表框；组合框可以输入，列表框不可以；组合框无多选，列表框可以10.自定义类型还没有在内存中分配变量，而自定义变量则是在内存中分配了变量。
Delphi程序设计-作业2
Delphi程序设计－作业2班级姓名分数（一）填空题1、当程序运行时，如果要求窗体中的某个按钮不再显示，可以将该按钮的Visible 属性设置为false 即可2、复选框对象是否被选中，是由其checked 属性决定的。
3、Delphi 程序与数据库之间进行数据交换一般要由多个数据库组件协作完成。
如果用户要查询数据库中的一条信息，该指令通过界面组件发出，经数据源组件到达数据集组件。
数据集组件利用自身的读写功能，通过组件与数据库建立连接从数据库中取得数据。
再经组件送到用户界面组件中显示。
4、Delphi中设计应用程序的菜单时，有主菜单和弹出菜单两种菜单，它们各自“Standard”页上的一个组件创建。
主菜单由mainmenu 组件创建；而弹出菜单用popupmenu 组件创建。
窗体中的多页面设计要用到pagecontrol 组件。
5、计时器控件能有规律的以一定时间间隔触发OmTimer 事件，并执行该事件过程中的程序代码。
6、要使ListBox支持多项选择，则应设置Multiselect 属性的值。
7、在只有一个显示区域的状态条组件上显示的文本内容，需要将其Simpletext 属性设置为该文本的内容。
8、Image组件可通过设置其Autosize 属性为True使之根据图像自动调整大小；而通过设置其Stretch 属性为True，使其加载的图片能自动调整大小以适应Image。
9、执行下面程序段后x := 5 ;FOR K := 1 TO 3 DOX := X + K ;结果K= 4 X = 1110、使用窗体的ShowModal 方法可以将一个窗体作为一个模式窗体（modal form）来打开。
（二）单项选择题1、编辑框中的文本发生改变时被触发的事件是（B ）A．AutoSize B．OnChange C．SetFocus D．SetFocus2、下列说法正确的是（ B ）A．组件必须是可视的，这样用户才能使用。
【精品】《面向对象程序设计Delphi》第二次作业答案11
《面向对象程序设计D e l p h i》第二次作业答案11中山大学期末考试样题（参考答案）课程名称：面向对象程序设计(Delphi)专业:年级:学号: 姓名: 成绩：一、选择题（每小题2分，共40分）1.Delphi是基于__________语言的面向对象的开发工具，使用其集成开发环境可以快速地建立应用程序，在开发数据库应用程序方面具有独特的优势。
A. C++B. Object PascalC. BasicD. SQL2.Delphi提供了一个丰富的__________, 它由一些称作“组件”的预制对象所组成, 组件提供了可视设计应用程序的能力。
A. DLLB. OCXC. IDED. VCL3.Delphi中，____________是有效的标识符。
A. CalculateValueB. abc@C. beginD. program4.Delphi中，____________语句用于从For语句、While语句或Repeat语句中强行退出。
A. BreakB. ContinueC. ExitD. Halt5.将数据及对数据的操作方法封装在一起，作为一个相互依存、不可分离的整体，成为一个_________ 。
A. 类B. 对象C. 属性D. 方法6.在面向对象中，________是指在一般类中定义的属性或行为，被特殊类继承之后，可以具有不同的数据类型或表现出不同的行为。
这使得同一个属性或行为在一般类及其各个特殊类中具有不同的语义。
A. 封装B. 重载C. 抽象D. 多态7.类通过一个简单的___________ ，与外界发生关系。
A. 外部接口B. 函数C. 过程D. 全局变量8.Delphi中，对象编辑器的_________页标签可用来观察、设置窗体上组件或窗体本身设计时的属性。
A. PropertiesB. EventsC. UnitD. Project9.Delphi中，____________是特殊的单元文件，可理解为主单元文件，或者说主程序，而其它的单元文件可以看作是被项目文件所调用的子程序。
Delphi试题含答案
Delphi试题含答案《可视化程序设计》试卷适⽤专业及层次（由出卷教研室填写）：信息管理与信息系统、医学信息⼯程本科姓名：班级：学号：（此试卷共8页，答案请填写在答题纸上，答案填写在试卷上者答题⽆效）⼀、单项选择题(15分，每⼩题1分)1.⼀个Delphi应⽤程序必有⼀个⽂件和⾄少⼀个单元⽂件。
A.程序B.⼯程C.数据D.图形2.在窗体中完成多个控件整齐排列，应使⽤的操作是。
A.AlignB.Bring to frontC.ScaleD.Send to back3.下列不能⽤来定义⼦界类型是。
A.实型数据（Real）B.⽤户定义的任何顺序类型C.字符型（Char）D.整型（Integer）4.在事件处理程序中编写代码，可以处理edit编辑框中输⼊的字符，。
A.OnClickB.OnEnterC.OnMouseUpD.OnKeyPress5.关于变量，全局变量与局部变量名相同时，下列说法错误的是。
A.在过程之外是全局变量作⽤B.过程内部是局部变量作⽤C.在过程之外全局变量⽆作⽤D.在过程之外是全局变量作⽤⽽在内部是局部变量作⽤6.procedure和function的结构和功能相似，。
A.前者可以取代后者B.后者可以取代前者C.但前者有返回值，后者没有D.⼆者都可以返回⼀个值7.动态数组与静态数组的区别是。
A.是否是⼀维数组B.元素类型是否是整型C.定义时是否明确了数组元素的个数D.元素类型是否⼀致8.⽤于建⽴菜单项的加速键的字符是。
A.^B.#C.&D.@9.绘制封闭图形时，要指定填充⾊的颜⾊时，可以设置画布对象的属性。
A. pen.colorB. brush.colorC. pen.styleD. bursh.style10.BDE的中⽂含义是，它是数据库应⽤中的⼀种连接⽅法。
A.数据库连接B.数据库引擎C.数据库⽂件D.开放式数据库11.下列语句中，⽴即中断当前循环继续执⾏下⼀次循环的语句是。
delphi实验指导书含答案
选择结构和循环结构的程序设计 ..................................................................5
[实验三] 截取钢管，使剩料最短 ....................................................................8 [实验四] 简单计算器 .......................................................................................8 第三章 数组、过程及函数 ........................................................................................9 [实验一] [实验二] 输入一串字符, 统计字母, 数字及汉字等的数量 ................................ 10 编写一评分程序 ............................................................................. 11
[实验五] ScrollBar 控制 shape 中的颜色 ......................................................... 25 第八章 键盘和鼠标事件 .......................................................................................... 26 [实验一] [实验二] [实验三] 第九章 [实验一] [实验二] 设计一鼠标演示程序 ......................................................................... 26 判断输入框全为数字否，实现 Enter 键代替 Tab 键 ........................... 27 由键盘的方向键或鼠标控制图片的移动 .......................................... 28 paintbox 中画正弦, 椭圆, 画弧, 文本, 色带, 渐变, 五角星 ....................... 29 动态生成控件数组 ............................................................................. 32
完整的delphi程序设计教程课后习题答案
1.239 页 1 题小时钟procedure TForm1.Timer1Timer(Sender: TObject);varxt,yt:integer;h,m,s,ms:word;begin decodetime(time,h,m,s,ms); xt:=paintbox1.clientwidth div 2; yt:=paintbox1.clientheight div 2; paintbox1.refresh;paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=3; paintbox1.canvas.lineto(xt+round(s in((60*h+m)/(12*60)*2*pi)*100), yt-round(cos((60*h+m)/(12*60)*2*pi)*100));paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=2; paintbox1.canvas.lineto(xt+round(s in(m/60*2*pi)*140), yt-round(cos(m/60*2*pi)*140)); paintbox1.canvas.moveto(xt,yt); paintbox1.canvas.pen.width:=1; paintbox1.canvas.lineto(xt+round(s in(s/60*2*pi)*180), yt-round(cos(s/60*2*pi)*180));end;end.2.239 页 3 题求两点间的距离procedureTForm1.Button1Click(Sender: TObject);beginpaintbox1.Refresh;formpaint(sender);end;procedureTForm1.FormPaint(Sender: TObject);var xt,yt:integer;ax,ay,bx,by:integer;begin xt:=paintbox1.ClientWidth div 2; yt:=paintbox1.Clientheight div 2; paintbox1.canvas.MoveTo(xt,0); paintbox1.canvas.lineTo(xt,2*yt); paintbox1.canvas.MoveTo(0,yt); paintbox1.canvas.lineTo(2*xt,yt); ax:=strtoint(edit1.text); ay:=strtoint(edit2.text);bx:=strtoint(edit3.text);by:=strtoint(edit4.text);edit5.Text:=floattostr(sqrt((ax-bx)* (ax-bx)+(ay-by)*(ay-by)));paintbox1.canvas.MoveTo(xt+ax*10,yt-ay*10);paintbox1.canvas.lineTo(xt+bx*10,yt-by*10);end;end.3.226 页 5 题输入学生成绩varForm1: TForm1; typestudentrecord=recordxh,xm:string[6]; xb:boolean;yy,sx,dz:integer; end;implementation {$R *.dfm} procedureTForm1.Button1Click(Sender:TObject); var t:studentrecord;f,f1:file of studentrecord;p1,p2:boolean; beginassignfile(f,'c:\mydocuments\stu.dat'); reset(f);assignfile(f1,'c:\mydocuments\stu1.dat'); rewrite(f1);while not eof(f) do beginread(f,t);p1:=(t.sx>=85)and(t.yy>=85)and(t.dz>=85);p2:=t.sx+t.yy+t.dz>=270;if p1 or p2 thenwrite(f1,t);end;closefile(f);closefile(f1);end;procedureTForm1.FormCreate(Sender:TObject);var t:studentrecord;f:file of studentrecord;xingbie:string;beginassignfile(f,'c:\mydocuments\stu.dat');reset(f);while not eof(f) dobeginread(f,t);if t.xb thenxingbie:=' 男'elsexingbie:=' 女';listbox1.Items.Add(t.xh+' '+t.xm+''+xingbie+' '+inttostr(t.sx)+' '+inttostr(t.yy)+''+inttostr(t.dz));end;closefile(f);end;procedureTForm1.Button2Click(Sender:TObject);beginclose;end;end.4.226页8题保存获得奖学金者varForm1: TForm1; typestudentrecord=recordxh,xm:string[6]; xb:boolean;yy,sx,dz:integer; end;implementation {$R *.dfm} procedureTForm1.Button1Click(Sender: TObject);var t:studentrecord;f,f1:file of studentrecord;p1,p2:boolean;beginassignfile(f,'c:\mydocuments\stu.dat');reset(f);assignfile(f1,'c:\mydocuments\stu1.dat');rewrite(f1);while not eof(f) dobeginread(f,t);p1:=(t.sx>=85)and(t.yy>=85)and(t. dz>=85);p2:=t.sx+t.yy+t.dz>=270;if p1 or p2 thenwrite(f1,t);end;closefile(f);closefile(f1);end;procedureTForm1.FormCreate(Sender: TObject);var t:studentrecord;f:file of studentrecord;xingbie:string;beginassignfile(f,'c:\mydocuments\stu1.dat');reset(f);while not eof(f) dobeginread(f,t);if t.xb thenxingbie:=' 男'elsexingbie:=' 女';listbox1.Items.Add(t.xh+' '+t.xm+' '+xingbie+' '+inttostr(t.sx)+' '+inttostr(t.yy)+''+inttostr(t.dz));end;closefile(f);end;procedureTForm1.Button2Click(Sender: TObject); begin close; end; end.5.166 页22 题素数procedure TForm1.Button1Click(Sender: TObject);typesushuset=set of byte; varsushu:sushuset;i,j,n,m,k:longword;s,s0:string;beginn:=strtoint(edit1.text);m:=strtoint(edit2.text);if n mod 2=0 then n:=n+1; k:=m-n;if k>255 thenshowmessage(范围太大，请重新输入区间端点!')else begin sushu:=[0..k]; for i:=2to n-1 do for j:=n to m do if j modi sushu:=sushu-[j-n]; for i:=n to mdiv 2 do for j:= i+1 to m do if jmod i sushu:=sushu-[j-n];s:='';s0:='';for i:=n to m do if i-n in sushuthen begin if length(s0+''+inttostr(i))>60 then begins:=s+s0+chr(13);s0:=''end; s0:=s0+' '+inttostr(i);end; s:=s+s0;label1.caption:=s;groupbox1.Top:=(panel1.Top-groupbox1.height) div 2;end;end;procedureTForm1.FormCreate(Sender: TObject);begingroupbox1.Top:=(panel1.Top-groupbox1.height) div 2;end; procedureTForm1.Edit1KeyPress(Sender:TObject; var Key: Char);var j:set of char;beginj:=['0'..'9',#8];if not(key in j) then key:=#0;end;end.6.148 页12 题整除的数implementation{$R *.dfm}function d7(x:integer):boolean;beginif x mod 7=0 then d7:=trueelse d7:=false;end;function d17(x:integer):boolean;beginif x mod 17=0 then d17:=trueelse d17:=false;end;procedureTForm1.FormActivate(Sender:TObject);varn:integer;beginfor n:=1000 to 4000 do if d7(n)andd17(n) thenmemo1.Lines.Add(inttostr(n)); end;end.7.148 页17 题求斐波那契数列问题implementation{$R *.dfm}function fib(n:integer):int64;begincase n of1,2:fib:=1;else fib:=fib(n-1)+fib(n-2);end;end;procedureTForm1.Button1Click(Sender:TObject);var k:integer;beginmemo1.lines.clear;for k:=1 to strtoint(edit1.text) domemo1.lines.add(format('%2d3d',[k,fib(k)]));end;end.8.120页10 题，判断是否是闰年procedureTForm1.Button1Click(Sender:TObject);=0 then=0 thenvary，m:integer;beginy:=strtoint(edit1.text);m:=strtoint(edit2.text);label3.Caption:='';if((y mod 4 = 0) and (y mod 100 <> 0)) or (y mod 400=0) thenlabel3.Caption:=edit1.text+' 年是闰年，'elselabel3.Caption:=edit1.text+' 年不是闰年，';case m of3,4,5:Label3.Caption:=Label3.Capt ion+edit2.Text+' 月份是春天,'; 6,7,8:Label3.Caption:=Label3.Capt ion+edit2.Text+' 月份是夏天,'; 9,10,11:Label3.Caption:=Label3.C aption+edit2.Text+' 月份是秋天,'; elseLabel3.Caption:=Label3.Caption+edit2.Text+' 月份是冬天,';end;case m of1,3,5,7,8,10,12:Label3.Caption:=L abel3.Caption+'共有31 天，：4,6,9,11:Label3.Caption:=Label3.C aption+'共有30 天，： elseif((y mod 4 = 0) and (y mod 100 <> 0) or (y mod 400=0)) thenLabel3.Caption:=Label3.Caption+' 共有29 天，'elseLabel3.Caption:=Label3.Caption+' 共有28 天，';end;end;end.9.120页11 题求和的procedureTForm1.Button1Click(Sender: TObject);var n,k,j:integer; s:int64; begin n:=strtoint(edit1.text);j:=0; s:=0;for k:=1 to n do begin j:=j+k;s:=s+j; end; panel2.Caption:=format('s= %d',[s]);edit1.setfocus; end;procedureTForm1.Edit1KeyPress(Sender:TObject; var Key: Char);var b:boolean; beginb:=(key<>#8)and(key<#48)or(key >#57);if b then key:=#0; end;end.10.120页12 题男人，女人，小孩各有多少人procedureTForm1.Button1Click(Sender:TObject);var x,y,z:integer; p:string;begin memo1.clear; for x:=0 to 16do for y:=0 to 24 do begin z:=30-x-y;if 3*x+2*y+z/1=50 then beginp:=format('%3d %3d %3d',[x,y, z]);memo1.lines.add(p);end;end;end;end.11.98页 2 题求长方体的表面积procedureTForm1.Button1Click(Sender:TObject);vars,l,k,h:double;beginl:=strtofloat(edit1.text);k:=strtofloat(edit2.text);h:=strtofloat(edit3.text);s:=2*l*k+2*k*h+2*l*h;label1.Caption:=floattostr(s);end;end.12.98页5题计算圆的面积和周长procedureTForm1.Edit1KeyPress(Sender:TObject; var Key: Char);var r:real; b:boolean; beginb:=(key<>#8)and(key<>'.')and(key<>#13)and(key<#48)or(key>#57);if b then key:=#0;if key =#13 thenbeginif edit1.text='' thenedit1.text:='0';r:=strtofloat(edit1.text);if radiobutton1.Checked thenlabel1.Caption:=format(' 圆的面积为：%f',[pi*r*r]);if radiobutton2.Checked thenlabel1.Caption:=format(' 圆的周长为：%f',[2*pi*r]);if radiobutton3.Checked thenlabel1.Caption:=format(' 圆的面积为：%f'+chr(13)+ ' 周长为: %f',[pi*r*r,2*pi*r]);edit1.SelectAll;end;end;procedureTForm1.RadioButton1Click(Sender: TObject);varsender0:tobject; key:char;begin sender0:=edit1; key:=#13;form1.edit1keypress(sender0,key);end;procedureTForm1.RadioButton2Click(Sende r:TObject);var sender0:tobject;key:char;beginsender0:=edit1;key:=#13;form1.edit1keypress(sender0,key);end;procedureTForm1.RadioButton3Click(Sende r:TObject);var sender0:tobject; key:char;begin sender0:=edit1; key:=#13;form1.edit1keypress(sender0,key);end;end.13.98页6题统计奇数和偶数的个数procedureTForm1.Button1Click(Sender: TObject);var k,j,n:word;begink:=0;n:=combobox1.items.count;for j:=1to n doif strtoint(combobox1.items[j-1]) mod 2 = 0 thenk:=k+1;label1.caption:=format(' 共有: '+#13+'%d 个偶数，'+#13+'%d 个奇数。
Delphi考评习题02
1、Delphi基础编程（1）从键盘输入2个正整数m和n，求它们的最大公约数（可使用函数实现）。
（2）从键盘输入1个正整数m,p(n,m)=n*(n-1)(n-2) *…*(n-m+1).（3）在文本框内输入一个数，转换成2，8，10，16进制的数2、Delphi的窗体设计（1）在名称为Form1的窗体上放置一个编辑框，名称为Edit1；再放置一个滚动条，名称为SCR1，其刻度值的范围是500-1000；再画一个命令按钮，名称为B1，caption为“改变”。
要求运行时在文本框中输入一个整数，单击“改变”按钮后，如果输入的是正数，滚动条中的滚动框向右移动与该数相等的刻度，但如果超过了滚动条的最大刻度，则不移动，并且用消息框显示“编辑框中的数值太大”；如果输入的是负数，滚动条中的滚动框向左移动与该数相等的刻度，但如果超过了滚动条的最小刻度，则不移动，并且用消息框显示“编辑框中的数值太小”。
同时在form1上再放置一个名称为edit2的编辑框，编辑框中显示滚动条的值。
运行时的窗体如图所示。
（2）一个名称为form1的窗体，其caption设置为“文字移动”；在form1上放置一个label 控件，label上显示“现在的时间是：XXX”，时间根据系统时间确定；在窗体上放置一个timer 控件；label标签每隔0.5秒向右移动一次，如下图所示。
（3）在名称为Form1的窗体上放置一个编辑框，名称分别为Edit1；放置一个颜色设置和一个字形设置的groupbox控件；放置一个listbox控件，控件加入各种字形；最后再放置一个combobox控件，combobox中加入各种字号；根据所选定的字形、字体、字号和颜色，改变edit1中的文字，如下图所示。
（4）在名称为Form1的窗体上放置一个label控件，form1的caption为“显示与隐藏”，label 的caption为“显示与隐藏的实现”；在form1上再放置两个button控件，分别命名为showbtn(其caption为“显示”)、hidebtn（其caption为“隐藏”）。
Delphi实验二(附答案)
实验二 选择结构程序设计一、实验目的1）掌握单分支结构语句：If …Then …；2）掌握双分支结构语句：If …Then …Else …；3）掌握多分支结构语句：Case …Of … End 。
二、实验要求（略）三、实验内容1．打开Console 应用程序Dlp0201.dpr ，实现输入一个整数x ，判断其能否既被3整除也能被7整除？如果能被3和7整除，则输出“Yes ”，否则输出“No ”。
输入包含1个整数，即整数x ；输出包含1个字符串，即“Yes ”或“No ”。
例如：输入：21输出：Yes2．打开Console 应用程序Dlp0202.dpr ，实现输入某学生的课程成绩score ，按如下公式输出成绩的等级。
⎪⎩⎪⎨⎧<≤<≤≤≤=60score 0Pass No 90score 60Pass100score 90Excellent grade 输入包含1个整数，即学生的课程成绩score ；输出包含1个字符串，即“Excellent ”、“Pass ”或“No Pass ”。
例如：输入：92输出：Excellent3．打开Console应用程序Dlp0203.dpr，实现输入3条线段长度，判断这3条线段构成的三角形类型。
如果不能构成三角形，则输出“No Triangle”，如果可以构成三角形，判断构成何种三角形（等边三角形、等腰三角形、一般三角形），分别输出“Equilateral Triangle”、“Isosceles Triangle”或“Triangle”。
输入包含3个整数，整数之间用空格隔开，分别表示3条线段的长度；输出包含1个字符串，表示判断结果（即“No Triangle”、“Equilateral Triangle”、“Isosceles Triangle”或“Triangle”）。
例如：输入：2 2 2输出：Equilateral Triangle4．打开项目Dlp0204.dpr，在标题为“水仙花数”的窗体Form1上，添加一个标题为“请输入3位整数”的标签Label1；然后再添加一个标题为“判断”的按钮Button1；最后添加两个文本内容为空的编辑框Edit1和Edit2。
电大《Delphi程序设计》2019-2020期末题库及答案
《Delphi程序设计》2019-2020期末题库及答案一、单选题(共0题,共0分)1. “x 是小于1000的非负数”的Object Pascal表达式是（）A、0≤x<1000B、(x>=0)OR(x<1000)C、x>=0,x<1000D、(x>=0)AND(x<1000)正确答案：D2. Delphi程序设计的基本特点是（）A、可视化程序设计B、代码程序设计C、事件驱动编程D、A和C正确答案：D3.(0分)表达式50 ＋19 div 2 的值是（）A、57B、69C、59D、60正确答案：C4. 结构化程序设计的基本原则或特点不包括（）。
A、多态性B、自顶向下C、模块化D、逐步求精正确答案：A5.结构化程序设计的基本原则是取消（）语句，程序中仅采用顺序、分支和循环三种控制结构。
A、ForB、WhileC、gotoD、Do正确答案：C6.利用对象监视器可以设置窗体或组件的( )。
A、方法B、属性C、外观D、执行代码正确答案：B7.通常控制组件在窗体中可见的属性是（）A、VisibleB、NameC、ShowingD、Hint正确答案：A8.下列变量命名正确的是( )A、7ABCB、My7C、page@2D、cmd..1正确答案：B9.下列表达式中（）不是布尔表达式。
A、A=3B、A div BC、A and BD、A>B正确答案：B10.下列说法错误的是( )A、窗体文件的扩展名为.dfmB、一个窗体对应一个窗体文件C、Delphi中的一个工程只包含一个窗体D、.~dpr和.~pas是备份文件，便于用户恢复到较早的一个项目版本。
正确答案：C11.下面哪个不是对象的三个要素之一( )A、事件B、名称C、属性D、方法正确答案：B12.BitBtn组件的哪个属性预定义了一些常用的位图按钮种类( )。
A、nameB、CaptionC、kindD、type正确答案：C13.以下能够触发编辑框（Edit）组件OnChange事件的操作是（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Delphi 程序设计基础教程第 1 章Delphi 集成开发环境1. 填空题(1) Delphi 是一个集成开发环境，从3程序设计、代码编译、调试，到最布程序的全部工作都可以在这个集成环境中完成。
(2) 在Delphi 集成环境的主要组成部分中有许多功能强大的工具，如：3主窗体、对象树状视图、对象观察器、窗体设计器、代码编辑器工具等。
(3) Delphi 集成开发环境的界面分为4个部分，分别是。
主窗口、窗体窗口、代码编辑窗口和对象查看器窗口(4) 对象查看器的功能是：编辑设置窗体、组件的属性，并为窗体、组件添加事件的响应处理过程(5) Delphi 主窗口由：标题栏、菜单栏、工具栏和组件板组成，它是打开其他窗口和退出D elphi 集成环境的主要界面。
2. 选择题D(1) 对象查看器由组成。
A. 标题栏、菜单栏、属性标签和事件标签B. 标题栏、菜单栏、对象选择器和事件标签C. 标题栏、菜单栏、对象选择器和属性标签D. 标题栏、对象选择器、属性标签和事件标签D(2) Delphi 用来管理用户开发的应用程序中的各个文件，有序地管理可以极大地提高应用程序开发的质量和速度。
A. 单元B. 组件C. 属性D. 项目B(3) 用来编写应用程序的代码。
A. 调试器窗口B. 代码编辑窗口C. 报表生成器窗口D. 数据库桌面窗口B(4) 代码编辑窗口分为左、右两部分：。
A. 左边是单元代码窗口，右边是单元浏览器窗口B. 左边是单元浏览器窗口，右边是单元代码窗口C. 左边是单元调试窗口，右边是单元浏览器窗口D. 左边是单元浏览器窗口，右边是单元调试窗口A(5) 属性选项卡即标签名为“Properties”的选项卡，用于设置当前组件的属性，属性选项卡是一个两列的表格，。
A. 左列是属性标题，右列是属性值B. 左列是组件名称，右列是事件名C. 左列是属性标题，右列是事件名D. 左列是组件名称，右列是属性值C(6) 事件选项卡即标签名为“Events”的选项卡，用于为当前组件添加各种响应事件(如单击、拖曳事件等)，它随对象选择器中的所选组件而发生变化。
事件选项卡为一个两列的表格，，默认时右列为空，在空格处双击则可以为当前组件添加事件，并进入代码编辑器窗口。
A. 左列是属性标题，右列是属性值B. 左列是组件名称，右列是事件名C. 左列是事件名称，右列是事件处理过程D. 左列是组件名称，右列是属性值ab(7) 在项目管理器中列出了当前项目中的各个，用户可以对它们进行操作。
A. 项目文件和单元文件B. 项目文件和窗体文件C. 项目文件和对象映射文件D. 单元文件和窗体文件3. 判断题(1) Delphi 的状态栏不过是把一些常用的菜单命令以图标按钮的方式显示出来，以便于快速访问。
(F )(2) 对象选择器为一个下拉列表框，列表框中是可供选择的窗体以及当前窗体上放置的所有文件。
(T )(3) 单元文件(.pas)是组成应用源代码的主要部分，无论是窗体事件处理过程还是单独的源代码都保存在其中。
( T)4. 简答题(1)Delphi 的集成开发环境由哪几个主要部分组成，各部分有什么功能答：Delphi 集成开发环境的界面分为 4 个部分，分别是主窗口、窗体窗口、代码编辑窗口和对象查看器窗口。
，。
1、主窗口：由标题栏、菜单栏、工具栏和组件板组成，它是打开其他窗口和退出D elphi 集成环境主要界面。
2、窗体窗口的顶端水平条是窗体的标题栏，结构与主窗口的标题栏相似，由图标、窗体名称和用于控制窗体的最小化、最大化、关闭按钮组成。
窗体窗口的标题栏显示了窗体的当前标题。
一般新窗体将会用默认名字Form1 命名。
当然，用户可以通过对象查看器设置窗体的标题等属性。
窗体也是窗口的设计界面，用户可以往窗体中添加各种组件，然后再对组件的属性进行设置。
这样使得整个应用程序的编辑过程可视化和易掌握。
3、代码编辑窗口：用来编写应用程序的代码。
代码编辑窗口的标题栏显示当前单元文件的文件名，默认名为。
代码编辑窗口分为左右两部分：左边是单元浏览器窗口，右边是单元代码窗口。
单元浏览器窗口以树形分支的形式列出了单元的构成4、对象查看器窗口，它的功能是编辑设置窗体、组件的属性，并为窗体、组件添加事件的响应处理过程。
(2) Delphi 集成开发环境的界面分为哪4个部分答：Delphi 集成开发环境的界面分为 4 个部分，分别是主窗口、窗体窗口、代码编辑窗口和对象查看器窗口(3) 对象查看器的功能是什么答：对象查看器窗口，它的功能是编辑设置窗体、组件的属性，并为窗体、组件添加事件的响应处理过程。
(4) 怎样修改窗体或组件的属性从窗体上选择组件，或从对象选择器中选择窗体或组件，使之成为当前组件后，就可以用对象查看器窗口中的属性选项卡来设置属性了。
根据属性标题的情况，设置属性可分为 4 种情况。
第一种情况是单击属性标题后，直接在属性值编辑框中输入属性的数值或字符串，如Name、Caption、Left、Top 等属性第二种情况是属性值由D elphi 提供可选项。
这时，用鼠标单击属性标题后，属性值马上变成一个下拉列表框。
用户可单击下拉按钮打开列表框，从中选择所需的属性值。
可选项分两种，一种是文字可选项，另一种是图形加文字形式的可选项，第三种情况是通过对话框来设置属性值。
第四种情况是属性带有子属性。
(5)一个 Delphi 应用程序的源文件有哪些，运行后又生成了哪些文件，各文件的含义是什么设计阶段：项目文件(.DPR)、单元文件(.PAS)和窗体文件(.DFM)等编译阶段产生的，如对象映射文件(.DSM)、编译单元文件(.DCU)等。
当然，项目中还包括一些非 Delphi 生成的文件，如位图、图标、鼠标指针等资源文件。
项目文件对应用至关重要。
它由D elphi 自动建立，一般用户不需要改变它。
项目文件是真正意义上的P ascal 源代码文件。
它描述了整个应用程序的结构及启动代码单元文件是组成应用源代码的主要部分，无论是窗体事件处理过程还是单独的源代码都保存在单元文件中。
单元文件可以分为两种：有窗体文件和无窗体文件。
每一个窗体都有相应的窗体文件(.DRM)，它保存着窗体和窗体内各个组件的属性，而且每个窗体都有一个单元文件，用于编写窗体事件处理过程。
窗体文件和单元文件被D elphi 自动保存在同一个目录下。
项目的编译过程：编译单元文件：Delphi 首先将项目中各单元文件编译成以“.dcu”为扩展名的编译单元文件。
第 2 章Delphi 的编程语言1. 填空题(1) 在O bject Pascal 中，可以使用大括号、小括号和星号组合、双斜线你表示注释。
(2) Delphi 支持的数据类型有整型、字符型、布尔型、枚举型、子界型和实型(3) Object Pascal 中的算术运算符有算术运算符、逻辑运算符、关系运算符、位运算符、指针运算符和集合运算符(4) Delphi 中可以构成条件语句的有if语句和case语句(5) Delphi 中可以构成循环语句的有for…do、repeat…until和while…do语句2. 选择题(1) 下列符号中哪些可以作为自定义的标识符DA. MyConstB. ANDC. ProgramD. type(2)设n为整型变量，且已赋值为1984，则表达式“(n mod 100)div 10”表示B。
A. 分离出个位数字B. 分离出十位数字C. 分离出百位数字D. 分离出千位数字(3) 以下枚举类型定义正确的是C 。
A. type MyChar=('a','b,','c');B. type num=(1..5,8..10);C. type MyColor=(red,yellow,green);D. type MyNum=,,;(4) 下列子界类型定义正确的是B 。
A. type a=10..9;B. type a=1..10;C. type a=a..f;D. type a=..;3. 是非题(1) 常量是在程序运行中值可以发生改变的量。
FF)(2) 变量是在程序运行中值可以发生改变的量。
T()(3) 在O bject Pascal 中，可以用v ar 关键字声明变量。
T)(4) 在O bject Pascal 中赋值语句使用的赋值符号是“=”。
F)4. 简答题(1) Object Pascal 语言中的数据类型有哪些(2) 说明f or、while 和r epeat 这3种循环语句的区别。
(3) 函数与过程的区别是什么(4) “exp(y*ln(x))”相当于什么运算第 3 章Delphi 窗体与组件1. 填空题(1) 窗体是应用程序的操作界面，是放置组件的最常用的容器。
创建窗体的过程是选择【File】|【New】|【Application】，即可新建一个应用程序。
(2) 一般情况下，可以通过方法直接在属性编辑器中输入的属性的值，另一种是和设置组件属性的值。
(3) Edit 组件与M emo 组件不同之处在于Edit 组件处理的是单行文本，而Memo 处理的是多行文本。
(4) List Box 组件与C ombo Box 组件的区别是组合框一次只能显示一条信息，要浏览全部信息，需要单击框旁边的三角按钮。
(5) 遍历L ist Box 组件中的选项的过程是；添加选项的过程是Add；删除选项的过程是Delete；清空选项的过程是Clear。
2. 选择题(1) 在D elphi 中，所谓M DI，意思是B 。
A. 多媒体接口B. 多文档界面C. 多用户平台D. 多数据操作(2) 一个 MDI 程序至少应包括两种类型的窗体：一个是“父”窗体；另一个是“子”窗体，它的F ormStyle 属性应当设为。
A. fsMDIChildB. fsMDIFormC. fsMDINormalD. fsNormal(3) 通过在O bject Inspector(对象查看器)中设置组件的属性可调整组件的尺寸。
A. Left 和T opB. Height 和W idthC. Left 和W idthD. Height 和T op(4) 在 RadioGroup 组件中，调整，可以指定单选按钮组中当前被选中的单选按钮。
P125A. ItemIndex 属性B. Items 属性C. Tab Order 属性D. Tag 属性(5) 在设计时给Memo 组件增加一些显示内容，可以单击值右侧的省略号按钮，打开【String List editor】(字符编辑器)对话框，在其中输入文本。
A. Caption 属性B. Hint 属性C. Lines 属性D. Text 属性(6) 在程序运行时，如果要给Memo 组件增加显示内容，可以使用方法，每调用该方法一次，存储框中就增加一行。