易截截图软件、单文件、免安装、纯绿色、仅160KB

delphi笔试题(一)


1、请列举VCL类库中以TObject为根的对象体系(可以只类主干)
2、请列举VCL数据库方面的核心类
3、Delphi中override和overload的作用分别是什么?
4、Delphi中RTTI是什么?有什么作用?
5、如果一个刚部署的Web服务器不能访问,列举出可能存在的原因?
6、在SQL中左连接时什么?它能实现的数据结果集的特点是什么?
7、请问在Oracle和Mssql中如何只取select语句结果集中的前100条?
Oracle:select top 100 * from tablename
Mssql:select * from tablename where rownum < 101
8、二叉树
type
TBTreeNode = class
      Data: string;
      Left: TBTreeNode;
      Right: TBTreeNode;
end;
function NewNode(const Data: string; Left, Right: TBTreeNode): TBTreeNode;
begin
Result := TBTreeNode.Create;
Result.Data := Data;
Result.Left := Left;
Result.Right := Right;
end;
var Root: TBTreeNode;
procedure Init;
begin
{ 建树:
               =
      X                 *
                  +             -
              1       2    3       4
}
Root = NewNode('=', NewNode('X', nil, nil),
NewNode('*', NewNode('+', NewNode('1', nil, nil), NewNode('2', nil, nil)),
NewNode('-', NewNode('3', nil, nil), NewNode('4', nil, nil))));
end;
假设变量Root已经有Init初始化,请写出中序遍历Root树的代码,要求输出结果X=1+2*3-4
9、两种数据库结构表及部分记录如下:
编码树:
—————————
ID
01
0102
0103
010204
—————————
父子树:
—————&mda


相关文档:

Delphi写的验证身份证号有效性函数


function ValidatePID(const APID: string): string;
{内部函数,取身份证号校验位,最后一位,对18位有效}
function GetVerifyBit(sIdentityNum: string): Char;
var
    nNum: Integer;
begin
    Result := #0;
    nNum := StrToInt(sIdentityNum[1]) * 7 +
  ......

如何让Delphi调用外部程序并等待其运行信息(如结束)

函数一:
view plaincopy to clipboardprint?
uses 
    Windows,  
    SysUtils,  
    Classes,  
    ShellAPI;  
function RunAndWait(FileName: string; Visibility: Integer): THandle;&nbs ......

Delphi Open Tools API 浅探

savetime2k@yahoo.com  2004.1.28
http://savetime.delphibbs.com
今天开始学习元件编辑器,感觉比属性编辑器简单许多,但还是遇到了一些疑问。如果你能解答文中记录的问题,请告诉我答案,谢谢!
目 录
===============================================================================
⊙ TBaseComponentEdit ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号