计算机等考二级Delphi考前练习题及参考答案

　　24.下列哪种变量类型不能作为For循环中的循环变量?( )

　　A.字符

　　B.枚举

　　C.子界

　　D.实数

　　参考答案：D

　　25.下面是一个用户自定义的消息，哪一种消息定义是正确的?( )

　　A.WM_MyMessage=User_Base+100

　　B.WM_MyMessage=CM_Base+100

　　C.WM_MyMessage=WM_Base+100

　　D.WM_MyMessage=WM_USER+100

　　参考答案：D

　　26.请看代码，回答下面的问题。

　　Type

　　TMammal=Class

　　Procedure Walk;

　　…..

　　end;{end of TManmml}

　　procedure TMammal.Walk;

　　begin

　　ShowMessage(‘Result is Mammal Walk’);

　　end;

　　TDog=Class(TMammal)

　　Procedure Walk;

　　end;

　　procedure TDog.Walk;

　　begin

　　ShowMessage(‘Result is Dog Walk’);

　　end;

　　var

　　Mammal:TMammal;

　　dog:TDog;

　　begin

　　Mammal:=TDog.Create;

　　Mammal.Walk;

　　Mammal.Free;

　　end;

　　上面代码中，最后的输出结果是：( )

　　A.‘Result is Dog Walk’

　　B.‘Result ia Mannal Walk’

　　参考答案：B

　　27.注册一个自定义组件语句的用法是：( )

　　A.RegisterComponents(TMyComponent,[‘Standard’])

　　B.Register(TMyComponent,[‘Standard’])

　　C.RegisterComponents(‘Standard’,[TMyComponent])

　　D.Register(‘Standard’,TMyComponent)

　　参考答案：C