喫茶XRAY [Mr.XRAY掲示板]

レスしようと思ったら．自己解決になっていました．
どうやったのかはわかりせんが(教えてくれないのね．寂しい...　シクシク)

WIN7で視覚効果の調整をしたい
http://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.cgi?print+201104/11040015.txt

こんな感じでできるようです．
動作確認環境は，Window 7 U64 + Delphi 2010,XE Proです．

//=============================================================================
//  Aero有効化
//  usesにDWMAPIが必要
//
//  関数の説明は以下を参照
//  http://msdn.microsoft.com/en-us/library/aa969510%28VS.85%29.aspx
//=============================================================================
procedure TForm1.Button1Click(Sender: TObject);
begin
  DwmEnableComposition(DWM_EC_ENABLECOMPOSITION);
end;

//=============================================================================
//  Aero無効化
//  usesにDWMAPIが必要
//=============================================================================
procedure TForm1.Button2Click(Sender: TObject);
begin
  DwmEnableComposition(DWM_EC_DISABLECOMPOSITION);
end;

上の図が有効な時，下が無効にした場合．あっ，移行-->以降の間違いです．