一直有个奇怪现象。。
本人电脑XP。系统。。有的时候做好的程序在自己电脑刚好大小。放在其他人电脑上。。有的时候窗体变大。有的时候窗体边小。出现滚动条之类~。
请问这个是什么现象。。之前听朋友说XP的那些优化会影响。。现在自己电脑用的是最佳性能。。桌面也没图片。采用2000模式。
而且autosize:=false;
请知道的帮忙解释下~

解决方案 »

  1.   

    程序中你获取当前屏幕的分辨率,根据不同大小来编程实现..
    屏幕宽度 screen.width
    窗体宽度 formname.width //formname 是窗体名
      

  2.   

    procedure TForm1.FormCreate(Sender: TObject);
    begin
      form1.Width :=screen.Width ;
      form1.Height :=screen.Height ;
    end;
    解决问题
      

  3.   

    一英寸=2.54厘米
    宽:
    一英寸里面有
    GetDeviceCaps(GetDC(Form1.Handle),LOGPIXELSX)个像素
    高:
    一英寸里面有
    GetDeviceCaps(GetDC(Form1.Handle),LOGPIXELSY)个像素
    那么
    一厘米内的像素数为
    一英寸内的像素数除以2.54
    那我们的窗口宽5厘米,高4厘米
    那实际像素数即可求出