名前 題名 ▼ 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; > > 上の図が有効な時，下が無効にした場合．あっ，移行-->以降の間違いです． GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link