staticテキストの文字色変更

[yas]

staticテキストの文字色を変更するにはどうしたらよいでしょうか？また、一つのウィンドウに複数個のstaticテキストがある場合に、それぞれの文字サイズと文字色を独立に変更することはできますか？

[Uhsp]

　Googleで「コンボボックスの文字色等の変更」を検索するとコードの切れ端
のレスがヒットしますので参考にしてください。

下記のように記述をCase WM_CTLCOLORSTATICに変更すれば
流用できると思います。

コード: 全て選択

Function MainWndProc(hWindow As DWord, Msg As DWord, WParam As DWord,
                     LParam As DWord) As DWord
Select Case Msg
       Case WM_CTLCOLORSTATIC
            If lParam = GetDlgItem(hMainWnd,EB1) Then
               SetBkMode(WParam,OPAQUE)
               SetBkColor(WParam,bc[Hide])
               SetTextColor(WParam,tc[Hide])
               MainWndProc = CreateSolidBrush(bc)
'              ↑ブラシハンドルを返すStockBrushなら開放がいらない。
       End If
.....

コントロールごとのフォントは私の場合、下記で行っています。

コード: 全て選択

 SendMessage(GetDlgItem(HD,UHSP_OID+ID),WM_SETFONT,.hoFnt as DWORD,0)
'                       ↑コントロールID             ↑フォントハンドル