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习题
第一章 概述习题一、填空题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 ）。
工具栏包含的按钮可以和菜单选项一一对应，也可以不完全对应，但工具栏中包含的功能项应该在菜单中都能找到。
《程序设计基础教程》-高等教育出版社-课后习题参考答案
习题第一章程序与编程环境一、填空题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.自定义类型还没有在内存中分配变量，而自定义变量则是在内存中分配了变量。
程序设计基础教程(c语言版)课后答案
z习题解答目录1.2 习题解答 (3)1.2.1 选择题 (3)1.2.2 填空题 (3)1.2.3 编程题 (4)2.2 习题解答 (5)2.2.1 选择题 (5)2.2.2 填空题 (7)2.2.3 编程题 (8)3.2 习题解答 (11)3.2.1 选择题 (11)3.2.2 填空题 (12)3.2.3 编程题 (12)4.2 习题解答 (15)4.2.1 选择题 (15)4.2.2 填空题 (17)4.2.3 编程题 (18)5.2 习题解答 (29)5.2.1 选择题 (29)5.2.2 填空题 (31)5.2.3 编程题 (33)6.2 习题解答 (37)6.2.1 选择题 (37)6.2.2 填空题 (41)6.2.3 编程题 (43)7.2 习题解答 (67)7.2.1 选择题 (67)7.2.2 填空题 (68)7.2.3 编程题 (68)21.2 习题解答1.2.1 选择题1、B【分析】在一个C程序中必须有且只能有一个main函数，而且main函数可以在任何地方出现.2、C【分析】C 语言中合法以的标识符组成为：字母，数字，下划线，且数字不能打头，亦不能为关键字。
A中，-sub 不合法。
B 中4d不合法。
D 中void 为关键字。
3、【分析】4、C【分析】转义字符中，第一个\”输出“，第二\\输出\,第三个\b退格，把前一个\去掉了，第四个\’输出’，第五个\t跳格，第六个\”输出”，第七个\n输出换行。
5、C【分析】本题将10进制17，分别按8、16进制输出。
8的进制21=2*8+1*1=17(10, 16制11=1*16+1*1=17(10)1.2.2 填空题1、主【分析】一个C源程序中至少包括一个主函数，其他函数没有限制。
2、双引号。
【分析】两种写法都是允许的，使用尖括号表示在包含文件目录中去查找(包含目录是由用户在设置环境时设置的)，而不在源文件目录去查找.使用双引号则表示首先在当前的源文件目录中查找，若未找到才到包含目录中去查找。
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程序设计基础教程》 第4章 过程与函数
过程声明的格式如下：
procedure <过程名>([<形式参数表>])；
过程定义的格式如下：
procedure <过程名>([<形式参数表>])；
[<局部变量和常量声明>]
begin
<过程语句体>
end;
DELPHI程序设计基础教程
2020年1月9日星期四
4.1.2 过程的调用
过程调用的格式如下： 过程名 ([<实际参数表>])； 其中过程名是过程的标识符；实际参数 可以是常量、变量或表达式，但实际参 数的个数和类型必须与形式参数完全匹 配，即个数相同，类型一致。 例4-1：使用过程实现三个数从大到小 排序输出。
函数返回一个函数值，过程则能完成一 系列各种操作。函数的调用方式出现在表达 式中，而过程调用是一句独立的语句。
函数调用的格式如下：
函数名（[<实际参数表>]）；
其中函数名是函数的标识符，它必须在 程序调用之前进行说明；实际参数表是一些 由逗号分隔的参数，参数出现的顺序必须和 函数定义时形式参数出现的顺序和类型一致 ，一一对应。
例4-3：求五边形的面积，如教材图4-1。
DELPHI程序设计基础教程
2020年1月9日星期四
4.3 过程和函数的递归调用
4.3.1 过程和函数的递归调用 4.3.2 过程和函数的类型 4.3.3 过程与函数的调用约定
DELPHI程序设计基础教程
2020年1月9日星期四
4.3 过程和函数的递归调用
函数定义的格式如下：
function 函数名 （形式参数列表：参数类型）：函数返回类型；
<说明部分>；
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.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复习题答案版-精品资料
复习题1、在文件操作中Eof的意思是文件结束指针。
2、在Delphi的BDE数据集中通过TDataSouece控件来实现对SQL语言的支持。
3、要想使窗体中的某个控件获得焦点，则需调用SetFocus 方法。
4、MaskEdit是格式文本输入对象，Input Mask Editor属性为它提供了过滤文本的格式。
P645、由于TDBGrid控件和TDBNavigator控件是自动地访问数据集控件中所有可以访问的字段控件的，因此它们没有字段值属性。
P2686、函数format(‘本场%已进了1个球！’,[‘李铁’])返回的字符串为本场李铁已进了1个球!。
7、TEdit控件的MaxLength属性是设置所能接受的最大字符数。
8、想在Button按钮上设置快捷方式，需要在Caption属性中应用符号& 。
9、通过数据库字段对象（例如：Ttalbe部件的字段对象）的TStringField 属性可以读取字段值，并且将它转换成字符串类型。
10、Delphi为用户提供一种Append方法，用来打开一个已经存在的文件以便与在文件末尾添加文本。
11、常量是一种内容不能改变的标识符，常量声明采用保留字const 。
12、Delphi的计时器的Interval属性设置为1000，即是每隔 1 秒会被触发一次。
1、以下正确的枚举类型的定义是（ C ）。
（A）type vowel=(‘a’,’e’,’i’,’t’,’u’) （B）type num=(1..3, 8..10)（C）type color=(red, blue, black) （D）type realtype=(1.5, 2.5, 3.5, 4.5) 2、已知如下子界类型定义及变量声明：Type ntype= -10 .. 10;Varm: ntype;n: integer;问下列语句哪一个可能产生错误：（ B ）。
（A）n := m; （B）m :=n; （C）n := abs(m); （D）n := n+m;3、下列哪些符号哪一个是Delphi6中的合法变量名（ A ）。
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面试题及答案
delphi面试题及答案1. 什么是Delphi？Delphi是一种面向对象的编程语言，由Borland公司（现属于Embarcadero Technologies）开发。
它基于Pascal语言，并添加了面向对象编程的特性，如类、继承和多态。
Delphi通常用于快速应用程序开发（RAD），并且支持Windows、macOS、iOS、Android和Linux 平台。
2. Delphi中如何定义一个类？在Delphi中，可以使用`class`关键字来定义一个类。
例如：```delphitypeTMyClass = classprivateFValue: Integer;publicconstructor Create;destructor Destroy; override;procedure SetValue(AValue: Integer);function GetValue: Integer;end;```3. Delphi中的事件是什么？事件是Delphi中的一种机制，允许对象在特定操作发生时通知其他对象。
事件可以被绑定到方法上，当事件被触发时，绑定的方法就会被执行。
4. 如何在Delphi中创建一个事件处理器？在Delphi中，创建事件处理器通常涉及两个步骤：定义事件和绑定事件到方法。
例如：```delphitypeTMyForm = class(TForm)privateFOnButtonClick: TNotifyEvent;publicproperty OnButtonClick: TNotifyEvent read FOnButtonClick write FOnButtonClick;end;```然后在代码中，可以这样绑定事件：```delphiButton1.OnClick := MyForm.OnButtonClick;```5. Delphi中如何实现多线程？Delphi提供了几种实现多线程的方法，其中最常用的是使用`TThread`类。
电大《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、代码编辑窗口：用来编写应用程序的代码。
代码编辑窗口的标题栏显示当前单元文件的文件名，默认名为U nit1.pas。
代码编辑窗口分为左右两部分：左边是单元浏览器窗口，右边是单元代码窗口。
单元浏览器窗口以树形分支的形式列出了单元的构成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=(1.5,2.5,3.5);(4) 下列子界类型定义正确的是 B 。
A. type a=10..9;B. type a=1..10;C. type a=a..f;D. type a=10.5..12.0;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) 一个M DI 程序至少应包括两种类型的窗体：一个是“父”窗体；另一个是“子”窗体，它的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) 在R adioGroup 组件中，调整，可以指定单选按钮组中当前被选中的单选按钮。
P125A. ItemIndex 属性B. Items 属性C. Tab Order 属性D. Tag 属性(5) 在设计时给Memo 组件增加一些显示内容，可以单击值右侧的省略号按钮，打开【String List editor】(字符编辑器)对话框，在其中输入文本。