• Delphi中易混淆的概念


      一、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中正确编程是重要的。
  • 相关阅读:
    HDU 5105 Math Problem(BestCoder Round #18)
    HDU 5101 Select(BestCoder Round #17)
    HDU 5100 Chessboard(BestCoder Round #17)(找规律)
    HDU 5087 Revenge of LIS II(BestCoder Round #16)(次长上升子序列)
    HDU 5067 Harry And Dig Machine(BestCoder Round #14)
    HDU 5063 Operation the Sequence(BestCoder Round #13)
    2015ACM/ICPC亚洲区长春站-重现赛 1006 Almost Sorted Array
    2015ACM/ICPC亚洲区沈阳站-重现赛 1004 Pagodas
    Loadrunner 问题总结
    如何解决LodRunner中报错关于Error -10489
  • 原文地址:https://www.cnblogs.com/y232995558/p/1413873.html
Copyright © 2020-2023  润新知