不会吧。35分的问题没有人回答?伤心ing~~~~~~~~~~~

解决方案 »

  1.   

    NO4.如何判断edit1.text不是空?
      

  2.   

    NO.4 如何判断edit1.text里不为空?
      

  3.   

    no2.form1.onresize中改变你的控件大小,还有设置Anchors中的四个属性可以固定控件的left,top,button,right;
    例:
    procedure TForm39.FormResize(Sender: TObject);
    begin
    if form39.WindowState=wsMaximized then
       begin
       richedit1.Width:=785;
       richedit1.Height:=409;
       bevel1.Width:=777;
       bevel1.Height:=438;
       bevel2.Width:=777;
       bevel2.Height:=441;
       end;
    if self.Height>503 then
       begin
       richedit1.Width:=790;
       richedit1.Height:=490;
       bevel1.Width:=790;
       bevel1.Height:=510;
       bevel2.Width:=790;
       bevel2.Height:=512;
       end;
    end;
    no3:在设计时右击quickrep选中print seting,将最右上角的landscape改为portrait,ok即可.no4:if edit1.text<>''then 
            do something
      

  4.   

    1、如果form1是主窗口的话,form1.close;应该就可以的,
    如果不是主窗口,那你就用form1.freeandnil;
    2、dbgrid1.align:=alclient;3、不清楚。
      

  5.   

    no1 用application.Terminate就可以了
        或者,先close在free试试
    no2 设一下Align属性,或则在Form的OnCanResize里写代码
    no3 有个属性双击QuickRep1  page size最后一个选第2个
    no4  if edit1.text<>'' then .......
      

  6.   

    1、Form1是主窗口,用Form1.close;不能用Free。
    2、设置DBGrid的Align属性,还可以选上(下左右)齐。
    3、在QuickRep的属性框中设置Page.Orientation为poLandscape