ログイン: パスワード:   新規登録  パスワード紛失
 
メインメニュー
検索
オンライン状況
登録ユーザ: 0
ゲスト: 5
テーマ選択

(4 テーマ)
XPビジュアルスタイルの適用 のバックアップソース(No.1)

RIGHT:[[Delphi]]
*XPビジュアルスタイルの適用 [#ve136bbc]

コモンコントロールしか使用していないのであれば、manifestファイルを書くことで適用できる。

次のYourApp.exe.manifestファイルを作成する。
-YourAppは実行ファイルのファイル名
-文字コードはUTF-8

 <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
 <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
 <assemblyIdentity
   version="1.0.0.0"
   processorArchitecture="X86"
   name="CompanyName.ProductName.YourApp"
   type="win32"
 />
 <description>Description</description>
 <dependency>
     <dependentAssembly>
         <assemblyIdentity
             type="win32"
             name="Microsoft.Windows.Common-Controls"
             version="6.0.0.0"
             processorArchitecture="X86"
             publicKeyToken="6595b64144ccf1df"
             language="*"
         />
     </dependentAssembly>
 </dependency>
 </assembly>

-ファイル内の CopanyName.ProductName.YourApp は企業名、商品名、アプリ名にこだわらずなんでも良いようだ
-Descriptionにはアプリの説明などを書く

これを実行ファイルと同一の場所に保存しておくとXPスタイルが適用される。

manifestファイルを添付するのがいやな時は実行ファイルに組み込むこともできる。

次のようにリソーススクリプトファイル(manifest.rc)を作成する。

 #define CREATEPROCESS_MANIFEST_RESOURCE_ID       1
 #define RT_MANIFEST                             24
 CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST  "YourApp.exe.manifest"

リソースコンパイラでバイナリリソース(manifest.res)を作る

 brcc32.exe manifest.rc

プロジェクトに組み込む

 {$R manifest.res}

OwnerDrawなどで独自にコントロールを描画しているばあいは、[[こちらを参照:XPStyle]]


トップ   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
PR