不保存对象的值,而保存一个引用或一个指针来说明对象存储的内存位置。( )
三. 改错题(共4道)
1. 指出下列代码错误并说明原因:
Var
I:Integer;(超出范围)
L:Long;
Begin
L:=32768;
I:=L;
End.
2. 指出下列代码错误并说明原因:
if n>37.5 then
Amount
Earned:=(n-37.5)*HourlyRate*1.5+37.5*HourlyRate; (没有定义n, AmountEarned, HourlyRate)
else
AmountEarned:= n*HourlyRate;
3. 指出下列代码错误并说明原因:
while (total
do statement1;
4. 指出下列代码错误并说明原因:
procedure Tform1.TestBtnClick(Sender:Tobject);
var z,y,x:integer;
begin
x:=100;
y:=0;
try
z:=x div y;
except
on EdivByZero
do begin
z:=-1;
MessageDlg(\'Z\'+IntToStr(z),mtInformation,[mbOK],0);
end
End;
四. 问答题(共3道)
1. 在Delphi中,对话框与子窗口有什么不同?
答:
2. 使用私有域和方法的目的是什么?
答:
3 请叙述进程与线程的区别和联系?
答:
4 请说出ADOQuery. ExecSQL与ADOQuery.open的区别?
答:ExecSQL 用于执行没有返回数据机的SQL语句,如删除指定的记录,插入记录数据,修改记录数据等操作
OPEN 用来打开数据集,其作用与将active属性设置为true相同
五. 编程题(共3道)
1. 计算并输出300至500以内所有素数(即质数)中最大的前10个数之和k与300至500以内所有素数的个数j,并将结果输出到文件mydata.dat中。
2. 在Tform1.FormActive事件中编写代码,要求包括一个循环,在屏幕上随机的位置上用不同的颜色连续画线。
3. 请你针对test_tab表利用delphi写出完成对数据库查询,删除,插入,修改程序(其中相应字段有:name 类型char,age 类型char,birthday类型 datatime,条件参数可以自定义);
六. 设计题(共1道)
设计一个实用的Windows字体选择列表窗口。要求:
1) 用户可以在列表框中(TListBox)选择字体
2) 用户可以在微调框中(TSpinEdit)调整字体大小