Delphi程序设计界面的动态调整

如何设计美观的程序一直是程序员的一大难题，很多程序员可以写出很好的程序，但往往困于拙劣的外观。其中如何使美观的程序能在不同的环境下一样美观也同样困扰着我们，我在一些程序的制作中掌握了一些使程序在不同环境同样美观的方法，希望给大家一点启示。    
  不同环境一般有不同的色彩数和不同的分辨率等等，我只对这两种环境进行说明。    
  一.   不同的色彩数    
  对于不同的色彩数我们可以用启动时加以判断并选择相应的配色/图片方案。可在窗口建立时加入程序如下：    
  procedure   TForm1.FormCreate(Sender:   TObject);    
  var    
  colorbits:Integer;    
  begin    
  colorbits   :=GetDeviceCaps(   h,   BITSPIXEL   );    
  case   colorbits   of    
  1:   //黑白配色方案;    
  ....    
  4:   //16色配色方案;    
  ....    
  8:   //256色配色方案;    
  ....    
  16:   //16位色配色方案;    
  ....    
  24:   //24位色配色方案;    
  ....    
  32:   //32位色配色方案;    
  ....    
  end;    
  end;    
  这样就可以在不同的颜色环境下使用不同的配色方案，不同的图标/图片/色彩均在设计者的控制下，可制作出比较好的图片/彩色环境，而不至于在真彩时很不错，而在16色时一塌糊涂。    
  二.