呵呵,
双击form1的Event页的onResize

begin
  showmessage('aaadsfsa');
end;

解决方案 »

  1.   

    不会吧,这也问,
    打开Object Inspector窗口,
    会有两个页面,和一个下拉列表框,
    在下拉列表框中选择Form1:TForm1;
    在Events 页面中,
    双击OnResize;
      

  2.   

    在Delphi左边有一个Object Inspector框,在Events那一页里OnResize事件,
    双击它就会自动添加事件。
      

  3.   

    兄弟,还是看看书,delphi的帮助也很好,按F1
      

  4.   

    我認為樓上的仁兄講的很有道理﹐我也是剛學這個該死的Delphi,以前是用VB的﹐所以問了很多基礎性的問題﹐浪費了自己很寶貴的分﹐所以說在問問題之前最好去查一下相關的資料﹐我有這方面的電子書籍﹐如果你要的話我就發給你。
      

  5.   

    推荐《Delphi 5开发人员指南》
      

  6.   

    双击
    在begin与end之间写。
      

  7.   

    谢谢大家。我对Delphi的编辑环境不太熟悉。
    正在摸索其使用方法。
    提问是我最喜欢的学习方式。当然,能推荐几本好书和电子书最好了。至于分数,我在VB/VC版赚了不少。
    可以贡献给大家。[email protected]
      

  8.   

    代码如下,但是好象有些问题.procedure TForm1.FormResize(Sender: TObject);
    begin
            RealAudio1.Left :=0;
            RealAudio1.Top:=0;
            RealAudio1.Height :=Form1.Height ;
            RealAudio1.Width :=Form1.Width ;
    end;end.1 无法在Form1载入时触发resize事件,每次都要手动改变一次才能生效
    2 大小与Form1不一样,有水平和垂直的滚动条
    请诸位指教。再加50分。
      

  9.   

    procedure TForm1.FormResize(Sender: TObject);
    begin
            pic.Left :=0;
            pic.Top:=0;
            pic.Height :=Form1.Height ;
            pic.Width :=Form1.Width ;
    end;end.
    我在delphi中这样写会出错,总是在第二句上,但是单运行没有一句是错的,请高手指点。[email protected]{ pic 是图片控件 }
      

  10.   

    onResize事件触发的条件就是改变窗体大小,但点击最大和最小化按钮不触发窗体初始显示时也不触发
      

  11.   

    to rushing(勇敢的心) (  ) 代码如下,但是好象有些问题.procedure TForm1.FormResize(Sender: TObject);
    begin
            RealAudio1.Left :=0;
            RealAudio1.Top:=0;
            RealAudio1.Height :=Form1.Height ;
            RealAudio1.Width :=Form1.Width ;
    end;end.1 无法在Form1载入时触发resize事件,每次都要手动改变一次才能生效
    2 大小与Form1不一样,有水平和垂直的滚动条
    请诸位指教。再加50分。1.可以在Form的OnActive事件添加代码
    begin
      FormResize(Self);
    end;2.考虑到控件自身的大小,ReSize事件可以稍微修改
    procedure TForm1.FormResize(Sender: TObject);
    begin
            RealAudio1.Left :=0;
            RealAudio1.Top:=0;
            //lheight,lwidth可以自己试出来
            RealAudio1.Height :=Form1.Height - lheight ;
            RealAudio1.Width :=Form1.Width - lwidth ;
    end;
    当然,控件自身有缺省的最小值,有时候是改不了的,所以当窗体小于控件自身有缺省的最小值时还是会出现滚动条的,或者窗体不能缩小于控件自身有缺省的最小值,具体情况你自己看好了,另外ReSize事件只是认为改变窗体大小时发生,按最大化或最小化按钮不会发生!
      

  12.   

    或才你在SHOWE事件中也写上一个同样的事件!