AppliStation/AppliStation.Util/NativeMethods.cs

   1 // Vistaの効果を有効にするフラグ（不要の場合はコメントアウト）\r
   2 #define USE_VISTA_EFFECTS\r
   3 \r
   4 using System;\r
   5 using System.Runtime.InteropServices;\r
   6 using System.Windows.Forms;\r
   7 using System.Drawing;\r
   8 \r
   9 namespace AppliStation.Util\r
  10 {\r
  11         /// <summary>\r
  12         /// Win32ネイティブメソッドを叩いてGUI操作するための関数群のクラス\r
  13         /// </summary>\r
  14         public sealed class NativeMethods\r
  15         {\r
  16                 /// <summary>\r
  17                 /// 呼び出し禁止\r
  18                 /// </summary>\r
  19                 private NativeMethods()\r
  20                 {\r
  21                 }\r
  22 \r
  23                 /// <summary>\r
  24                 /// WindowsVista向け、プログレスバーステータス(色)を設定する\r
  25                 /// </summary>\r
  26                 /// <param name="progBar">対象のプログレスバー</param>\r
  27                 /// <param name="state">状態。(1:Normal,2:Error,3:Paused)</param>\r
  28                 public static void ProgressBar_SetState(ProgressBar progBar, uint state)\r
  29                 {\r
  30 #if USE_VISTA_EFFECTS\r
  31                         try {\r
  32                                 // status := (PBST_NORMAL | PBST_ERROR | PBST_PAUSED)\r
  33                                 // SendMessage(progressBar.Handle, PBM_SETSTATE, state, 0);\r
  34                                 SendMessage(progBar.Handle, 0x410, new IntPtr(state), IntPtr.Zero);\r
  35                         } catch (Exception) {\r
  36                         }\r
  37 #endif\r
  38                 }\r
  39                 \r
  40                 #region タスクバーおよびタイトルバーのフラッシュ\r
  41                 \r
  42                 /// <summary>\r
  43                 /// タスクバーおよびタイトルバーボタンのフラッシュの設定フラグ\r
  44                 /// </summary>\r
  45                 public enum FlashFlag : uint {\r
  46                         /// <summary>\r
  47                         /// 点滅の停止\r
  48                         /// </summary>\r
  49                         Stop = 0,\r
  50                         /// <summary>\r
  51                         /// タイトルバーを点滅\r
  52                         /// </summary>\r
  53                         Caption = 1,\r
  54                         /// <summary>\r
  55                         /// タスクバーボタンを点滅\r
  56                         /// </summary>\r
  57                         Tray = 2,\r
  58                         /// <summary>\r
  59                         /// タイトルバーとタスクバーボタンを点滅\r
  60                         /// </summary>\r
  61                         All = 3,\r
  62                         /// <summary>\r
  63                         /// Stopが設定されるまで点滅する\r
  64                         /// </summary>\r
  65                         Timer = 4,\r
  66                         /// <summary>\r
  67                         /// フォアグラウンドの状態になるまで点滅\r
  68                         /// </summary>\r
  69                         TimerNoFG = 12,\r
  70                 }\r
  71                 \r
  72                 [StructLayout(LayoutKind.Sequential)]\r
  73                 struct FLASHWINFO\r
  74                 {\r
  75                     public int cbSize;\r
  76                     public IntPtr hWnd;\r
  77                     public FlashFlag dwFlags;\r
  78                     public uint uCount;\r
  79                     public uint dwTimeout;\r
  80                 }\r
  81                 \r
  82                 /// <summary>\r
  83                 /// タスクバーおよびタイトルバーボタンを点滅させる\r
  84                 /// </summary>\r
  85                 /// <param name="form">対象フォーム</param>\r
  86                 /// <param name="flag">点滅パラメータフラグ</param>\r
  87                 /// <param name="count">点滅回数</param>\r
  88                 /// <param name="timeout">点滅の間隔(ミリ秒)</param>\r
  89                 /// <returns></returns>\r
  90                 public static bool Form_FlashWindow(Form form, FlashFlag flag, uint count, uint timeout)\r
  91                 {\r
  92                         try {\r
  93                                 FLASHWINFO info = new FLASHWINFO();\r
  94                                 info.cbSize = Marshal.SizeOf(typeof(FLASHWINFO));\r
  95                                 info.hWnd = form.Handle;\r
  96                                 info.dwFlags = flag;\r
  97                                 info.uCount = count;\r
  98                                 info.dwTimeout = timeout;\r
  99                                 \r
 100                                 return FlashWindowEx(ref info) == 0;\r
 101                         } catch (Exception) {\r
 102                                 return false;\r
 103                         }\r
 104                 }\r
 105                 \r
 106                 [DllImport("user32.dll")]\r
 107                 static extern Int32 FlashWindowEx(ref FLASHWINFO pwfi);\r
 108                 \r
 109                 #endregion\r
 110                 \r
 111                 #region ListView関連\r
 112                 \r
 113                 /// <summary>\r
 114                 /// リストビューにダブルバッファでの描画をするか否かを設定する\r
 115                 /// </summary>\r
 116                 /// <remarks>マウスでの選択に半透明ツールを採用するか否かもこの設定に依存</remarks>\r
 117                 /// <param name="listView">対象のリストビュー</param>\r
 118                 /// <param name="bEnable">ダブルバッファでの描画をするとき<code>true</code></param>\r
 119                 public static void ListView_SetDoubleBuffer(ListView listView, bool bEnable)\r
 120                 {\r
 121                         try {\r
 122                                 // SendMessage(listView.Handle, LVM_SETEXTENDEDLISTVIEWSTYLE, LVS_EX_DOUBLEBUFFER, bEnable? LVS_EX_DOUBLEBUFFER:0);\r
 123                                 SendMessage(listView.Handle, 0x1036, new IntPtr(0x00010000), new IntPtr((bEnable)? 0x00010000u:0x0u));\r
 124                         } catch (Exception) {\r
 125                         }\r
 126                 }\r
 127                 \r
 128                 /// <summary>\r
 129                 /// 選択されたアイテムの部分の背景にグラデーションがかかった感じになる、\r
 130                 /// Vista以降でのエクスプローラの見た目をListViewに反映させる。\r
 131                 /// </summary>\r
 132                 /// <remarks>Vista未満のバージョンでは何もしない。</remarks>\r
 133                 /// <param name="listView">対象のListView</param>\r
 134                 public static void ListView_EnableVistaExplorerTheme(ListView listView)\r
 135                 {\r
 136 #if USE_VISTA_EFFECTS\r
 137                         // Vista未満はなにもしない\r
 138                         OperatingSystem os = Environment.OSVersion;\r
 139                         if (os.Platform != PlatformID.Win32NT || os.Version.Major < 6) return;\r
 140                         \r
 141                         try {\r
 142                                 SetWindowTheme(listView.Handle, "explorer", null);\r
 143                         } catch (Exception) {\r
 144                         }\r
 145 #endif\r
 146                 }\r
 147                 \r
 148                 /// <summary>\r
 149                 /// ヘッダに"すべて選択"に似たチェックボックスを作るか否かを指定する\r
 150                 /// </summary>\r
 151                 /// <remarks>このオプションを設定するとVistaエクスプローラでの「チェックボックスを使用して項目を選択する」と同様の動作になる</remarks>\r
 152                 /// <param name="listView">対象のListBox</param>\r
 153                 /// <param name="bAutoCheckSelect">チェックボックスを使用して項目を選択するとき<code>true</code></param>\r
 154                 public static void ListView_SetAutoCheckSelect(ListView listView, bool bAutoCheckSelect)\r
 155                 {\r
 156 #if USE_VISTA_EFFECTS\r
 157                         try {\r
 158                                 // SendMessage(listView.Handle, LVM_SETEXTENDEDLISTVIEWSTYLE, LVS_EX_AUTOCHECKSELECT, bAutoCheckSelect?LVS_EX_AUTOCHECKSELECT:0);\r
 159                                 SendMessage(listView.Handle, 0x1036, new IntPtr(0x08000000), new IntPtr((bAutoCheckSelect)?0x08000000u:0x0u));\r
 160                         } catch (Exception) {\r
 161                         }\r
 162 #endif\r
 163                 }\r
 164                 \r
 165                 #region ColumnHeaderのソートの三角印用\r
 166                 \r
 167                 [StructLayout(LayoutKind.Sequential, CharSet=CharSet.Auto)]\r
 168                 private struct HD_ITEM\r
 169                 {\r
 170                         public uint    mask;\r
 171                         public int     cxy;\r
 172                         [MarshalAs(UnmanagedType.LPTStr)]public string   pszText;\r
 173                         public IntPtr   hbm;\r
 174                         public int     cchTextMax;\r
 175                         public int     fmt;\r
 176                         [MarshalAs(UnmanagedType.LPTStr)]public string  lParam;\r
 177                         public int     iImage;        // index of bitmap in ImageList\r
 178                         public int     iOrder;\r
 179                 }\r
 180                 \r
 181                 /// <summary>\r
 182                 /// WinXP以降、ソートの矢印を表示\r
 183                 /// </summary>\r
 184                 /// <param name="listView">対象のListView</param>\r
 185                 /// <param name="column">表示する矢印のヘッダ</param>\r
 186                 /// <param name="order">ソートの昇順・降順</param>\r
 187                 public static void ColumnHeader_SetSortState(ListView listView, int column, SortOrder order)\r
 188                 {\r
 189                         try {\r
 190                                 // SendMessage(hWnd, LVM_GETHEADER, NULL, NULL);\r
 191                                 IntPtr hWnd = SendMessage(listView.Handle, 0x101F, IntPtr.Zero, IntPtr.Zero);\r
 192                                 \r
 193                                 HD_ITEM hdi = new HD_ITEM();\r
 194                                 hdi.mask = 0x0004; // HDI_FORMAT;\r
 195                                 for (int i = 0; i < listView.Columns.Count; i++) {\r
 196                                         // SendMessage(hWnd, HDM_GETITEMW, i, &hdi);\r
 197                                         SendMessage(hWnd, 0x120b, new IntPtr(i), ref hdi);\r
 198                                         \r
 199                                         const int HDF_SORTUP = 0x400;\r
 200                                         const int HDF_SORTDOWN = 0x200;\r
 201                                         \r
 202                                         if (i != column || order == SortOrder.None) {\r
 203                                                 hdi.fmt = hdi.fmt & ~(HDF_SORTUP | HDF_SORTDOWN);\r
 204                                         } else if (order == SortOrder.Ascending) { // 昇順\r
 205                                                 hdi.fmt = hdi.fmt & ~HDF_SORTDOWN | HDF_SORTUP;\r
 206                                         } else if (order == SortOrder.Descending) { // 降順\r
 207                                                 hdi.fmt = hdi.fmt & ~HDF_SORTUP | HDF_SORTDOWN;\r
 208                                         }\r
 209                                         \r
 210                                         // SendMessage(hWnd, HDM_SETITEMW, i, &hdi);\r
 211                                         SendMessage(hWnd, 0x120c, new IntPtr(i), ref hdi);\r
 212                                 }\r
 213                         } catch (Exception) {\r
 214                         }\r
 215                 }\r
 216                 \r
 217                 #endregion\r
 218                 \r
 219                 #endregion\r
 220                 \r
 221                 #region EnableWindow(コメントアウト)\r
 222 //              /// <summary>\r
 223 //              /// 指定されたコントロール(ウィンドウ)への、\r
 224 //              /// キーボード入力およびマウス入力を有効化または無効化\r
 225 //              /// </summary>\r
 226 //              /// <param name="control">対象のコントロールのハンドラ</param>\r
 227 //              /// <param name="bEnable">有効にするか無効にするかを指定</param>\r
 228 //              /// <returns>直前にウィンドウが無効状態だった場合はtrueを返す</returns>\r
 229 //              public static bool Control_EnableWindow(Control ctrl, bool bEnable)\r
 230 //              {\r
 231 //                      try {\r
 232 //                              return EnableWindow(ctrl.Handle, bEnable);\r
 233 //                      } catch {\r
 234 //                              ctrl.Enabled = bEnable;\r
 235 //                              return true;\r
 236 //                      }\r
 237 //              }\r
 238 //              \r
 239 //              /// <summary>\r
 240 //              /// 指定されたコントロール(ウィンドウ)への、\r
 241 //              /// キーボード入力およびマウス入力を有効化または無効化\r
 242 //              /// </summary>\r
 243 //              /// <param name="control">対象のコントロールのハンドラ</param>\r
 244 //              /// <param name="bEnable">有効にするか無効にするかを指定</param>\r
 245 //              /// <returns>直前にウィンドウが無効状態だった場合はtrueを返す</returns>\r
 246 //              [DllImport("user32.dll")]\r
 247 //              public static extern bool EnableWindow(IntPtr hWnd, bool bEnable);\r
 248                 #endregion\r
 249                 \r
 250                 #region RichTextBox関連\r
 251                 \r
 252                 [StructLayout(LayoutKind.Sequential)]\r
 253                 private struct CHARFORMAT2\r
 254                 {\r
 255                         public int cbSize;\r
 256                         public uint dwMask;\r
 257                         public uint dwEffects;\r
 258                         public int yHeight;\r
 259                         public int yOffset;\r
 260                         public int crTextColor;\r
 261                         public byte bCharSet;\r
 262                         public byte bPitchAndFamily;\r
 263                         [MarshalAs(UnmanagedType.ByValArray, SizeConst=32)]\r
 264                         public char[] szFaceName;\r
 265                         public short wWeight;\r
 266                         public short sSpacing;\r
 267                         public int crBackColor;\r
 268                         public int LCID;\r
 269                         public uint dwReserved;\r
 270                         public short sStyle;\r
 271                         public short wKerning;\r
 272                         public byte bUnderlineType;\r
 273                         public byte bAnimation;\r
 274                         public byte bRevAuthor;\r
 275                         public byte bReserved1;\r
 276                 }\r
 277                 \r
 278                 /// <summary>\r
 279                 /// リッチテキストの選択部分に文字フォーマット効果を与える\r
 280                 /// </summary>\r
 281                 /// <param name="richTextBox">対象のリッチテキストボックス</param>\r
 282                 /// <param name="dwMask">有効な文字フォーマット効果</param>\r
 283                 /// <param name="dwEffect">文字フォーマット効果のフラグ</param>\r
 284                 public static void RichTextBox_SetSelectionFormat(RichTextBox richTextBox, uint dwMask, uint dwEffect)\r
 285                 {\r
 286                         CHARFORMAT2 cfmt = new CHARFORMAT2();\r
 287                         cfmt.cbSize = Marshal.SizeOf(typeof(CHARFORMAT2));\r
 288                         cfmt.dwMask = dwMask;\r
 289                         cfmt.dwEffects = dwEffect;\r
 290                         \r
 291                         //SendMessage(richTextBox.Handle, EM_SETCHARFORMAT, SCF_SELECTION, ref cfmt);\r
 292                         SendMessage(richTextBox.Handle, 0x0444, new IntPtr(0x0001), ref cfmt);\r
 293                 }\r
 294                 /// <summary>\r
 295                 /// リッチテキストにテキストリンクを追加する\r
 296                 /// </summary>\r
 297                 /// <param name="richTextBox">対象のリッチテキストボックス</param>\r
 298                 /// <param name="text">追加するテキスト</param>\r
 299                 public static void RichTextBox_AddTextLink(RichTextBox richTextBox, string text)\r
 300                 {\r
 301                         int pos = richTextBox.TextLength;\r
 302                         richTextBox.Select(pos,0);\r
 303                         richTextBox.SelectedText = text;\r
 304                         richTextBox.Select(pos, text.Length);\r
 305                         \r
 306                         // RichTextBox_SetSelectionFormat(richTextBox, CFM_LINK, CFE_LINK);\r
 307                         RichTextBox_SetSelectionFormat(richTextBox, 0x00000020, 0x0020);\r
 308                         \r
 309                         richTextBox.Select(richTextBox.TextLength, 0);\r
 310                 }\r
 311                 \r
 312                 #endregion\r
 313                 \r
 314                 #region アイコン関連\r
 315                 \r
 316                 [DllImport("shell32.dll")]\r
 317                 private static extern IntPtr ExtractIcon(IntPtr hInst, string lpszExeFileName, int nIconIndex);\r
 318                 \r
 319                 [DllImport("user32.dll", SetLastError=true)]\r
 320                 [return: MarshalAs(UnmanagedType.Bool)]\r
 321                 private static extern bool DestroyIcon(IntPtr hIcon);\r
 322                 \r
 323                 \r
 324                 /// <summary>\r
 325                 /// アイコンファイル（実行ファイル・DLL）を開いてアイコンを作る\r
 326                 /// </summary>\r
 327                 /// <remarks>内部でコピーされるのでWin32APIのDestroyIconを使わないでいいが、やや遅い動作</remarks>\r
 328                 /// <param name="form">ハンドラ</param>\r
 329                 /// <param name="lpszExeFileName">対象ファイル</param>\r
 330                 /// <param name="nIconIndex">アイコンインデックス</param>\r
 331                 /// <returns>生成されたアイコン</returns>\r
 332                 public static Icon ExtractIcon(Form form, string lpszExeFileName, uint nIconIndex)\r
 333                 {\r
 334                         Icon ico = null;\r
 335                         \r
 336                         if (! System.IO.File.Exists(lpszExeFileName)) {\r
 337                                 ico = Icon.ExtractAssociatedIcon(lpszExeFileName); // ExtractAssociatedIconに例外を吐いてもらう\r
 338                         } else {\r
 339                                 IntPtr hInst = (form != null)? form.Handle : IntPtr.Zero;\r
 340                                 IntPtr hIcon = IntPtr.Zero;\r
 341                                 \r
 342                                 try {\r
 343                                         hIcon = ExtractIcon(hInst, lpszExeFileName, (int) nIconIndex);\r
 344                                         if ((hIcon != IntPtr.Zero) && (hIcon.ToInt32() != 2)) {\r
 345                                                 ico = (Icon) Icon.FromHandle(hIcon).Clone();\r
 346                                                 DestroyIcon(hIcon);\r
 347                                         }\r
 348                                 } catch (System.Runtime.InteropServices.COMException) {\r
 349                                         // ExtraIconのP/Invoke失敗時用\r
 350                                 }\r
 351                         }\r
 352                         return ico;\r
 353                 }\r
 354                 \r
 355                 /// <summary>\r
 356                 /// ユーザ昇格が必要か設定し、設定必要なときシールドアイコンを表示する。\r
 357                 /// </summary>\r
 358                 /// <param name="button">対象のボタン</param>\r
 359                 /// <param name="required">ユーザ昇格が必要か否か、すなわちシールドアイコンを表示するか</param>           \r
 360                 public static void Button_SetElevationRequiredState(Button button, bool required)\r
 361                 {\r
 362                         if (Environment.OSVersion.Version.Major >= 6) {\r
 363                                 button.FlatStyle = FlatStyle.System;\r
 364                                 // SendMessage(hWnd, BCM_SETSHIELD, 0, required);\r
 365                                 SendMessage(button.Handle, 0x160C, IntPtr.Zero, new IntPtr((required)? 1u : 0u));\r
 366                         } else { // Legacy OS\r
 367                                 // FlatStyle.System に設定されている場合、Image プロパティに割り当てられているイメージは表示されない対策\r
 368                                 if (button.FlatStyle == FlatStyle.System) {\r
 369                                         button.FlatStyle = FlatStyle.Standard;\r
 370                                 }\r
 371                                 \r
 372                                 button.TextImageRelation = TextImageRelation.ImageBeforeText;\r
 373                                 if (required) {\r
 374                                         button.ImageAlign = ContentAlignment.MiddleLeft;\r
 375                                         using (Icon ico = new Icon(SystemIcons.Shield, 16, 16)) {\r
 376                                                 button.Image = ico.ToBitmap();\r
 377                                         }\r
 378                                 } else {\r
 379                                         button.Image = null;\r
 380                                 }\r
 381                                 button.AutoSize = true;\r
 382                         }\r
 383                 }\r
 384                 \r
 385                 #endregion\r
 386                 \r
 387                 [DllImport("user32.dll", CharSet = CharSet.Auto)]\r
 388                 internal static extern IntPtr SendMessage(IntPtr hWnd, UInt32 Msg, IntPtr wParam, IntPtr lParam);\r
 389                 \r
 390                 [DllImport("user32.dll", CharSet=CharSet.Auto)]\r
 391                 private static extern IntPtr SendMessage(IntPtr hWnd, UInt32 Msg, IntPtr wParam, ref HD_ITEM lParam);\r
 392                 \r
 393                 [DllImport("user32.dll", CharSet=CharSet.Auto)]\r
 394                 private static extern IntPtr SendMessage(IntPtr hWnd, Int32 Msg, IntPtr wParam, ref CHARFORMAT2 lParam);\r
 395 \r
 396                 [DllImport("uxtheme.dll", ExactSpelling=true, CharSet=CharSet.Unicode)]\r
 397                 internal static extern int SetWindowTheme(IntPtr hWnd, String pszSubAppName, String pszSubIdList);\r
 398                 \r
 399         }\r
 400 }\r