怎样使一个窗体在任何显示器分辨率,任何大小(15/17...寸)都能全屏显示?
同时窗体中只有一个Image 对象(是一个jpg图画),也要求它能在上述任何情况下总是占据整个窗体?
--------------------------
谢谢您的回应

解决方案 »

  1.   

    With frmMain do begin  //ÂúÆÁ
            BorderStyle :=bsNone;
            FormStyle   :=fsStayOnTop;
            Left        :=0;
            Top         :=0;
            Height      :=Screen.Height;
            Width       :=Screen.Width;
        end;
      

  2.   

    将窗体的‘windowstate’属性设为:wsmaximized.
      

  3.   

    SouthFoxhn(南狐)  的简单易行
      

  4.   

    procedure TForm1.Create(Sender: TObject);
    begin
      WindowState := wsMaximized;
    end;
      

  5.   

    Form的WindowState属性设为wsMaximized
    Image的Align属性设为alClient
      

  6.   

    WindowState := wsMaximized;
    Image.Align := alClient;
    或者:
    在窗口的OnCreate中指定:
    Width := Screen.Width;
    Height := Screen.Height;
    Image.Align := alClient;