版本：以dephi6.0为基础

语言类：
1.    Delphi是以什么语言为基础的？
2.    一个Pas文件一般由哪几个部分构成？请写出原型。
3.    dephi的常用数据类型有哪些？
4.    请解释private,protected,public,published的区别。

控件类：
5.    dephi提供了丰富的控件，6.    第三方也有很多。你在开发中曾经使用过哪几个第三方控件包和哪些控件?
7.    我们开发delphi窗体时，8.    基本上是从Tform继承并定义自己的窗体的，9.    我们需要增加自己的事件处理代码，10.    请问一般需要定义哪些事件处理代码，11.    这些事件代码主要做哪些类型的工作？

编程技巧类：
12.    重载
我定义了下面两个重载函数，但发现编译器报错，怎么回事？
procedure Confused(I: Integer); overload;
procedure Confused(I: Integer; J: Integer = 0); overload;

13.    以下两个函数调用方法有区别吗？delphi支持哪种？
DoSomething();
DoSomething;

14.    我在.pas单元中定义了两个类，15.    他们互相包含，16.    如下述：
type
  TClassA = class
  public
    Name:String;
    ClassB:TClassB;
  end;

  TClassB = class
  public
    Weight:double;
    ClassA:TClassA;
  end;
编译通不过，告诉我TClassB未定义，我明明定义了啊，怎么回事？

17.    
  type
    TFigure = class
      procedure Draw;//输出A
    end;
    TRectangle = class(TFigure)
      procedure Draw;//输出B
    end;
    ...
    procedure Test1;
    var
      Figure: TFigure;
      Rectangle: TRectangle;
    begin
        Figure := TFigure.Create;
        Figure.Draw;
        Figure.Free;
        Figure := TRectangle.Create;
        Figure.Draw;
        Figure.Free;
        Rectangle := TRectangle.Create;
        Rectangle.Draw;
        Rectangle.Free;
    end;
请问调用Test1后最后的输出结果是什么？

18.    有两个窗体FormA是非模态窗体，19.    FormB是模态窗体。
  我们准备在FormA的Close事件中释放该窗体，代码怎么写？
  我们在另一函数ShowFormB中创建并模态显示FormB，如何书写FormB的释放代码？

20.    我定义了三个参数：
  var
    ID:String=’123’;
Name:String;
Age:integer;
  需要定义一个过程或函数，给定员工的Id编号，查询数据库，返回该员工的姓名和年龄。
  请书写该过程或函数的申明接口。

21.    请把以下字符串赋值给Str变量
字符串(中括号内部)：[”ab”+’d’_%\’’]

数据库类：
22.    连接sql server数据库的方法有哪些，23.    请说明一下方法的优缺点。
24.    请说明如何用BDE连接sql server数据库的过程，25.    要用哪些控件，26.    它们的属性怎么设置？

工具类：
27.    dephi编辑器产生哪些类型的文件，28.    这些文件的后缀名29.    是什么，30.    各文件的用途是哪些。
31.    请描述一下在dephi编辑器中安装第三方组件的过程。

实战类：
32.    写一段程序将几个单词排序后输出:
输入为一个字符串:如:’Put,Get,Hello,Shift’ 每个单词以逗号分隔,输出为排序后的单词字符串:’Get,Hello,Put,Shift’
33.    现有一个程序，34.    可以画线段、圆、矩形，35.    类似画笔，而36.    且线段、圆、矩形在画完后还可以用鼠标37.    拖动。现有已定义类：
TMyPicture=class
Private
    Fitems:Tlist;//所有系统的指针列表
    Function GetItem(Index:Integer):TMyGraph;
    Function GetCount:Integer;
…
Public
    Constructor Create;
    Property Item [Index:Integer] :TMyGraph read GetItem;//所有图形的集合
    Property Count:Integer read GetCount;//图形的数量
    Procedure Draw(Canvas:TCanvas);//在Canvas画布上画出所有图形
    Function GetGraph(X,Y:Integer):TMyGraph;//在鼠标点击(X,Y)坐标时,获得这个地方的图形
    Procedure Move(Graph:TMyGraph;dx,dy:Integer);//把Graph图形移动dx,dy个象素
…
End;