简答题 简述面向对象技术中“类”与“对象”的概念。结合Delphi中使用的组件，举例说明什么是类、什么是对象。

结构化程序设计的基本原则是什么？

问答题结构化程序设计的基本原则是什么？ 

编写一段程序，有a，b两个整数，现在要把a变成两数中的较大值，把b变成较小的值，比如原来a=1，b=5，通过程...

问答题编写一段程序，有a，b 两个整数，现在要把a变成两数中的较大值，把b变成较小的值，比如原来a = 1， b= 5，通过程序要变成 a = 5，b = 1

利用MediaPlayer 组件实现一个播放wav声音文件的播放器。用户可自己选择要打开的 wav文件，并在播...

填空题

利用MediaPlayer 组件实现一个播放wav声音文件的播放器。用户可自己选择要打开的 wav文件，并在播放时有播放进度提示（如图）。首先在在窗体中添加1个MediaPlayer组件MediaPlayer1、1个标签组件Label1、2个按钮组件（“打开文件”－Button1，“退出”－Button2），1个时钟组件Timer1和1个OpenDialog组件OpenDialog1，一个gauge组件（用作播放进度显示）。进度提示条每隔0.1秒更新一次进度。将程序补充完整。

procedure TForm1.Button1Click（Sender： TObject）； 
begin
if OpenDialog1.Execute Then   Begin 
    MediaPlayer1.filename := OpenDialog1. （①） ;    
       Label1.（②） := OpenDialog1.filename;     
       MediaPlayer1.open;    //打开声音文件    
      MediaPlayer1. （③）    ;  //开始播放     
      Timer1.enabled := （④）   ;   
end; 
end; 
procedure TForm1.Timer1Timer(Sender: TObject); 
begin 
Timer1.Interval :=  （⑤） ;   //每隔0.1秒更新一次进度 
gauge1.maxvalue := MediaPlayer1.length; 
gauge1. （⑥）   := MediaPlayer1.Position;   //更改进度 
end;  
procedure TForm1.Button2Click(Sender: TObject); 
begin   
close; 
end;