Delphi中易混淆的概念

 Delphi中易混淆的概念

林毅 (06/22/2000)

 

　　一、owner和parent的区别：

　　parent属性是指构件的包容器，构件只能在此范围内显示和移动。举例子如下：

　　(1)在form1的窗体上，放一个panel1,并将panel1拉大，

　　(2)在panel1上放一button1；

　　(3)在form1上放一button2。

　　现在如果移动panel1,则button1随着panel1移动，这是因为button1的parent是panel1。现在将button2移到 panel1上，再次移动panel1,button2并不跟着移动，这是因为button2的parent是form1。除在窗体设计中，应注意构件的 parent是谁外，在动态创建构件时，也应指出构件的parent，如在上例中继续操作：

　　1)procedure tform1.button2click(sender:tobjet);

　　2)var

　　3) button:tbutton;

　　4) begin

　　5) button:tbutton.cerate(self);

　　6) button.parent=panel1;

　　7) button.lleft=0;

　　8) button.top=0;

　　9) button.caption:='ok';

　　10) end；

　　当按button2时，将在panel1上创建一个button，而如果把第6句改为button.parent:=self；按button2时，将在form1上创建一个button了。如果将第6句删除，按button2时，什么都不会发生，这是因为创建方法无法知道应在哪里显示构件。

　　owner属性是指构件的所有者，它负责构件的创建和释放。如在上例中，系统默认窗体上所有构件的所有者是窗体，而窗体的所有者是application。顺便指出，create方法应带有表示构件所有者的参数，如在上例中，构件所有者是窗体，即self。

　　parent属性和owner属性是运行阶段的属性，只能在运行阶段，通过代码设置。

　　二、self和sender的区别：

　　在事件处理程序参数表中，至少含有一个参数sender,它代表触发事件处理程序的构件，如在上例中，sender就指button2，有了sender参数，可以使多个构件共用相同的事件处理程序，如下例：

　　procedure tform1.buttonclick(sender:tobject);
　　begin
　　if sender=button1 then
　　label1.caption:=′看庭前花开花落′　　else label2.caption:=′望天上云卷云舒′
　　end；

　　在此例中，button1,button2共用了buttonclick事件处理程序。

　　self是指所编的程序范围是在哪一个类中，delphi中大都在窗体范围内编程，因此，self即指窗体，如果在编写一个类或是一个组件，则 self指该类或组件。我们在函数或过程的声明中可看出self是代表哪个组件，即self代表‘.’号之前的组件，如在第一个例子中，self代表 tform1。另外应注意，self只能用在类方法中，而不能用在过程或函数中，如下例用法是错的:function a1(b:integer):integer;
　　begin
　　……
　　button:=tbutton.create(self)；……
　　end；　　

三、clientheight和height,clientwidth和width的区别：

　　对于一般的构件而言，height就是clientheight,width就是clientwidth，而对于窗体而言，height是包括标题条在内的高度，而clientheight是指窗体工作区的高度。同理，clientwidth是指定窗体工作区的宽度。

　　从上面陈述可知，理解ower和parent,self和sender，clientheight和height,clientwidth和width区别，对于delphi中正确编程是重要的。