第二十二章　對話盒介面的程式

在上一章介紹了強制回應對話盒（也稱為模式對話盒），也介紹了範例，MODAL1.ASM，它先建立了一般視窗，按下加速鍵之後才彈出強制回應對話盒。但這一章將介紹更簡單的方法，小木偶稱之為「以對話盒為主要介面的應用程式」。

這一章，小木偶打算介紹它，除此之外會先介紹標準控制項的最後一個，捲動軸控制項。最後以一個含有捲動軸控制項對話盒作為本章範例，這個範例程式有三個橫向捲動軸控制項，控制著三原色紅綠藍顏色的強度，使用者移動捲軸上的捲動方塊位置可以調整各色強弱，並且在另一個靜態控制項顯現出結果。

捲動軸控制項（Scroll-bar Control）

我們在第九、十章說明過捲動軸，與在這兒介紹的捲動軸控制項不太一樣，雖然他們的行為很相似但還是有不同的地方。為了區分，小木偶稱呼前者為「標準捲動軸」，稱呼本章的主角為「捲動軸控制項」。底下來看看它們之間不同的地方。

先來說說標準捲動軸。它必然位於視窗工作區的右方與下方，無法到移到別處；雖然它不屬於工作區的一部份，但卻屬於視窗的一部分。所以，標準捲動軸不是視窗，沒有視窗代碼，也沒有識別碼。再來看看捲動軸控制項。它可以位於工作區的任何地方，也可以設定成任意尺寸，也可以改變尺寸。它是視窗的子視窗，所以也是一種視窗，具有視窗代碼與識別碼。

標準捲動軸與捲動軸控制項不一樣的地方，除了上面描述的以外，還有一些，但較為瑣碎，等稍後介紹捲動軸控制項時會遇到，那時候再說。底下正式介紹捲動軸控制項。

捲動軸控制項的視窗類別是「SCROLLBAR」，由外觀來看，捲動軸控制項分成三種：水平、鉛錘方向與尺寸方塊。建立水平的捲動軸控制項，需指定 SBS_HORZ 風格；建立鉛錘的捲動軸控制項，需指定 SBS_VERT 風格；建立尺寸方塊，需指定 SBS_SIZEBOX 或 SBS_SIZEGRIP 風格。右圖顯示前兩種捲動軸控制項，以及各部名稱。建立捲動軸控制項的方法跟其他控制項一樣，有兩種方法：①呼叫 CreateWindowEx、②在對話盒面板定義捲動軸控制項，再呼叫 DialogBoxParam。

①、呼叫 CreateWindowEx 時，視窗類別指定「"SCROLLBAR",0」字串，並且依據要建立水平或是鉛錘方向的捲動軸控制項，使用 SBS_HORZ 或 SBS_VERT 風格，且不要忘了還要指定「WS_CHILD or WS_VISIBLE」風格才能將此視窗設為子視窗並顯現控制項。例如底下的例子是建立水平方向的捲軸控制項：

szSbClass       DB      "SCROLLBAR"
  ⁝
invoke  CreateWindowEx,0,OFFSET szSbClass,0,WS_CHILD or WS_VISIBLE or SBS_HORZ,\
        x,y,width,height,hwndParent,IDSB_HORZ,hInstance,0

②、在對話盒面板定義捲動軸控制項，再呼叫 DialogBoxParam。還是以水平捲動軸為例，在對話盒控制面板中定義可以是下面兩者中的一種：

SCROLLBAR  IDSB_HORZ,x,y,aidth,heigth

或

CONTROL "",IDSB_HORZ,"SCROLLBAR",WS_CHILD|WS_VISIBLE|SBS_HORZN,x,y,width,heigth

然後呼叫 DialogBoxParam 即可。

建立好捲動軸控制項之後，還必須設定捲動方塊的位置範圍。一般是在處理 WM_CREATE 或 WM_INITDIALOG 訊息時，呼叫 SetScrollRange，可參閱第九章。但即使做到這樣的地步，還無法使捲動軸控制項正常運作，當使用者拖曳捲動方塊或按下捲動箭頭，如果不呼叫 SetScrollPos，捲動方塊仍會回到原處。

捲動軸控制項的風格

捲動軸控制項可以使用的風格有下面十種：

捲動軸控制項的風格數值說明
SBS_HORZ0建立水平捲動軸控制項。如果不具 SBS_BOTTOMALIGN、也不具 SBS_TOPALIGN 風格，則捲動軸控制項的高度、寬度和位置由 CreateWindowEx 或對話盒面板的 x、y、width、height 決定。
SBS_VERT1建立鉛錘捲動軸控制項。如果不具 SBS_RIGHTALIGN、也不具 SBS_LEFTALIGN 風格，則捲動軸控制項的高度、寬度和位置由 CreateWindowEx 或對話盒面板的 x、y、width、height 決定。
SBS_TOPALIGN2捲動軸控制項的高度為系統預設的高度，且上緣與 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形上緣對齊。此風格必須與 SBS_HORZ 搭配使用。
SBS_LEFTALIGN2捲動軸控制項的寬度為系統預設的寬度，且左緣與 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形左緣對齊。此風格必須與 SBS_VERT 搭配使用。
SBS_SIZEBOXTOPLEFTALIGN2使具有 SBS_SIZEBOXBOTTOMRIGHTALIGN 或 SBS_SIZEBOXTOPLEFTALIGN 風格的捲動軸控制項內，其尺寸方塊在捲動軸控制項的左上角。
SBS_BOTTOMALIGN4捲動軸控制項的高度為系統預設的高度，且下緣與 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形下緣對齊。此風格必須與 SBS_HORZ 搭配使用。
SBS_RIGHTALIGN4捲動軸控制項的寬度為系統預設的寬度，且右緣與 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形右緣對齊。此風格必須與 SBS_VERT 搭配使用。
SBS_SIZEBOXBOTTOMRIGHTALIGN4使具有 SBS_SIZEBOXBOTTOMRIGHTALIGN 或 SBS_SIZEBOXTOPLEFTALIGN 風格的捲動軸控制項內，其尺寸方塊在捲動軸控制項的右下角。
SBS_SIZEBOX8在 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形右下角，建立可調整對話盒大小的尺寸方塊。
SBS_SIZEGRIP10H在 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形右下角，建立可調整捲動軸控制項大小的尺寸方塊。

如果建立捲動軸控制項時，指定 SBS_SIZEBOX 或者 SBS_SIZEGRIP 風格，那麼生成的結果跟想像中的捲動軸控制項一點也不像。下面對話盒面板生成的捲動軸控制項都沒有捲動箭頭、捲動軌道、捲動方塊等部分，只有在 CreateWindowEx 或對話盒面板中，x、y、width、height 所定義的矩形右下角有一稱為尺寸方塊的部分，如右圖。當使用者把滑鼠游標移入捲動軸控制項範圍內按住不放，然後移動滑鼠時，SBS_SIZEBOX 風格會改變對話盒尺寸，SBS_SIZEGRIP 會改變控制項尺寸。

TSTSB   DIALOGEX    200,100,110,112
FONT    10,"MS Shell Dlg"
CAPTION "捲動軸控制項的風格"
{
  LTEXT   "SBS_SIZEBOX",1,  4, 5,60,8
  CONTROL "",IDSB_RED, "SCROLLBAR",SBS_SIZEBOX|WS_BORDER, 4,15,100,30
  LTEXT   "SBS_SIZEGRIP",2, 4,51,60,8
  CONTROL "",IDSB_GRN, "SCROLLBAR",SBS_SIZEGRIP|WS_BORDER,4,61,100,30
  DEFPUSHBUTTON "離開",IDB_EXIT, 60,95, 46,14
}

圖中對對話盒背景經過染色成較深的顏色，同時具有 WS_BORDER 風格，這樣就能夠看出捲動軸控制項的範圍。如果具有 SBS_SIZEBOX 或者 SBS_SIZEGRIP 風格的捲動軸控制項，同時也有 SBS_SIZEBOXBOTTOMRIGHTALIGN 風格，那麼尺寸方塊會位於右下角，這是預設值；如果指定了 SBS_SIZEBOXTOPLEFTALIGN，那麼尺吋方塊會在左上角。如果具有這兩個風格中的其中一個，那麼只有使用者把滑鼠游標移至尺寸方塊上，才能改變控制項或對話盒的大小。

傳遞訊息給捲動軸控制項

應用程式呼叫 SendMessage，可以將以下的捲動軸控制項訊息發送給捲動軸控制項，使其做出相關回應：

①、SBM_ENABLE_ARROWS：發送此訊息給捲動軸控制項，能啟用或禁用捲動箭頭。至於要禁用或啟用哪個捲動箭頭，由 wParam 決定，見下表。lParam 不使用，應設為零。如果 SendMessage 成功執行 SBM_ENABLE_ARROWS，回傳值為 1；否則為 0。
常數說明
ESB_DISABLE_BOTH禁用兩個捲動箭頭
ESB_DISABLE_DOWN禁用向下捲動箭頭
ESB_DISABLE_LTUP禁用向左或向上捲動箭頭
ESB_DISABLE_LEFT禁用向左捲動箭頭
ESB_DISABLE_RTDN禁用向右或向下捲動箭頭
ESB_DISABLE_UP禁用向上捲動箭頭
ESB_ENABLE_BOTH啟用兩個捲動箭頭
②、SBM_GETPOS：發送此訊息給捲動軸控制項，能取得捲動方塊位置。wParam、lParam 均不使用，都設為零。回傳值為捲動方塊當前位置。
③、SBM_GETRANGE：發送此訊息給捲動軸控制項，能取得捲動方塊位置範圍。wParam、lParam 均為某個雙字組變數位址，執行 SendMessage 之後，捲動方塊位置的最小值與最大值會分別存入這兩個變數中。
④、SBM_GETSCROLLBARINFO：發送此訊息給捲動軸控制項的資料。wParam 不使用，應設為零；lParam 為 SCROLLBARINFO 結構體的位址。此結構體各欄位意義如下：
CCHILDREN_SCROLLBAR     EQU     5
SCROLLBARINFO   STRUCT 
cbSize          DWORD   ?
rcScrollBar     RECT	<>
dxyLineButton   DWORD   ?
xyThumbTop      DWORD   ?
xyThumbBottom   DWORD   ?
reserved        DWORD   ?
rgstate         DWORD   CCHILDREN_SCROLLBAR+1 dup (?)
SCROLLBARINFO   ENDS
SCROLLBARINFO 結構體可以用於 SBM_GETSCROLLBARINFO，也可用於 GetScrollBarInfo API，而後者也能取得標準捲動軸的資料，因此底下的欄位說明，以捲動軸代替捲動軸控制項或標準捲動軸。
⑴、cbSize：SCROLLBARINFO 結構體的長度，以位元組為單位，必須在呼叫 SendMessage 之前設好此欄位。
⑵、rcScrollBar：捲動軸所在的矩形區域，以螢幕座標（像素）表示。
⑶、dxyLineButton：捲動方塊的寬度（水平捲動軸）或高度（垂直捲動軸），單位是像素。
⑷、xyThumbTop：捲動方塊左緣（水平捲動軸）或上緣（垂直捲動軸）距離捲動軸左緣或上緣多少像素。
⑸、xyThumbBottom：捲動方塊右緣（水平捲動軸）或下緣（垂直捲動軸）距離捲動軸左緣或上緣多少像素。
⑹、reserved：保留的雙字組，未使用。
⑺、rgstate 是由六個元素組成的陣列，第零∼四個元素分別代表捲動軸本身、向左或向上捲動箭頭、向右或向下捲動箭頭、捲動方塊、左邊或上邊捲動軌道、右邊或下邊捲動軌道的狀態。這些捲動軸內各部分的狀態，可能是底下的數值之組合：（rg 是 array of 的縮寫）
⒜、STATE_SYSTEM_INVISIBLE：對捲動軸而言，表示捲動軸不存在，可能是因為內容不超出視窗範圍，因此不需要。對捲動軌道而言，表示捲動方塊移至最邊緣的位置使得這些區域不可見。例如捲動方塊在水平捲動軸最左邊，就會使左邊捲動軌道不存在。STATE_SYSTEM_INVISIBLE 等於 8000H。
⒝、STATE_SYSTEM_OFFSCREEN：對捲動軸而言，表示視窗的大小或位置使得捲動軸不可見，例如視窗的捲動軸位於螢幕外，捲動軸仍存在但沒有顯示出來。STATE_SYSTEM_OFFSCREEN 等於 10000H。
⒞、STATE_SYSTEM_PRESSED：表示捲動軸的捲動箭頭或捲動軌道處於按下狀態。通常是使用者以滑鼠按住這些區域時出現，此時捲動軸被按下的部分，會以顯著的顏色表示。STATE_SYSTEM_PRESSED 為 8H。
⒟、STATE_SYSTEM_UNAVAILABLE：表示捲動軸的此部分被禁用，使用者無法操作它。STATE_SYSTEM_UNAVAILABLE 等於 1。
⑤、SBM_GETSCROLLINFO：發送此訊息給捲動軸控制項的資料。wParam 不使用，應設為零；lParam 為 SCROLLINFO 結構體的位址。SCROLLINFO 結構體與前面說過的 SCROLLBARINFO 結構體名稱很相似，別弄錯了，可參閱第十章 SCROLLINFO 的說明。
⑥、SBM_SETPOS：發送此訊息給捲動軸控制項，能設定捲動方塊位置。wParam 是捲動方塊的新位置，必須在 SetScrollPos 所設定的位置範圍內，否則會被捨棄到最接近的範圍內。lParam 設為零表示不重新繪製成新位置；設為一表示重繪新位置。回傳值為捲動方塊當前位置。
⑦、SBM_SETRANGE：發送此訊息給捲動軸控制項，能設定捲動方塊的位置範圍。wParam 為位置的最小值，lParam 為位置的最大值。回傳值為捲動方塊當前位置。
⑧、SBM_SETRANGEREDRAW：發送此訊息給捲動軸控制項，能設定捲動方塊的位置範圍。wParam 為位置的最小值，lParam 為位置的最大值。與 SBM_SETRANGE 不同的是，位置的最大值與最小值之差，不可超過 MAXLONG，其值為 7FFF FFFFH。如果最大值與最小值相等，會禁用並隱藏捲動軸控制項。回傳值為捲動方塊當前位置。
⑨、SBM_SETSCROLLINFO：發送此訊息給捲動軸控制項，能設定捲動方塊的屬性。wParam 設為零表示不重新繪製；設為一表示重繪。lParam 為 SCROLLINFO 結構體的位址，可參閱第十章 SCROLLINFO 的說明。

上面九種訊息中的六種：SBM_GETPOS、SBM_GETRANGE、SBM_GETSCROLLINFO、SBM_SETPOS、SBM_SETRANGE、SBM_SETSCROLLINFO 用於系統內部，應用程式不應發送這些訊息給捲動軸控制項，而是呼叫相關 Win64 API。例如要獲得捲動方塊位置應呼叫 GetScrollPos，獲得捲動方塊位置之範圍應呼叫 GetScrollRange，獲得捲動軸資料應呼叫 GetScrollInfo，設定捲動軸方塊位置應呼叫 SetScrollPos，獲得捲動方塊位置之範圍應呼叫 SetScrollRange，設定捲動軸控制項資料應呼叫 SetScrollInfo。這六種訊息均以暗綠色顯示。

捲動軸控制項的通知碼

當使用者操作捲動軸控制項，並不是像按鈕、編輯框等控制項發出 WM_COMMAND 訊息，通知父視窗使用者做了哪些動作，而是發出 WM_HSCROLL 或 WM_VSCROLL 訊息，通知父視窗。顯而易見的，水平捲動軸控制項發出 WM_HSCROLL 訊息，鉛錘捲動軸控制項發出 WM_VSCROLL 訊息。

這兩則訊息中，wParam 的低字組是通知碼，請參閱第九章的說明；高字組為 NULL，除了通知碼是 SB_THUMBPOSITION 或 SB_THUMBTRACK 時，高字組是使用者拖曳捲動方塊當時的位置。lParam 是捲動軸控制項代碼。

以對話盒為主要介面的應用程式

在上一章介紹了強制回應對話盒（也稱為模式對話盒），其中的範例，MODAL1.ASM，它先建立了一般視窗，按下加速鍵之後才彈出強制回應對話盒。事實上並不需要多此一舉，可以直接建立強制回應對話盒作為程式的主要介面，這樣的程式很簡單，不需要註冊視窗類別、不需要建立訊息循環，是許多程式設計師喜愛採用的方式，此乃「以對話盒為主要介面的應用程式」。它的原始程式可以寫成下面的「模板」：

OPTION CASEMAP:NONE
OPTION WIN64:7

INCLUDE         WINDOWS.INC
INCLUDELIB      KERNEL32.LIB
INCLUDELIB      USER32.LIB
;*******************************************************************************
.CONST
szDlgName       DB      "DLGNAME",0
  ⁝
;*******************************************************************************
.DATA
hInst   HANDLE  ?       ;模組代碼
  ⁝
;*******************************************************************************
.CODE
;-------------------------------------------------------------------------------
DlgProc PROC    hDlg:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
.if uMsg==WM_INITDIALOG
  ⁝
 
.elseif uMsg==WM_COMMAND
        mov     rax,r8  ;R8W＝識別碼
        shr     rax,10h ;AX＝通知碼
  ⁝

.elseif uMsg==WM_CLOSE
exit:   invoke  EndDialog,hDlg,0
 
.else   ;其他未處理的訊息返回 FALSE
        xor     rax,rax
        ret
 
.endif  ;已處理的訊息，返回 TRUE
        mov     rax,1
        ret
DlgProc ENDP
;-------------------------------------------------------------------------------
main    PROC
        invoke  GetModuleHandle,0
        mov     hInst,rax
        invoke  DialogBoxParam,hInst,OFFSET szDlgName,0,OFFSET DlgProc,0
        invoke  ExitProcess,0
main    ENDP
;*******************************************************************************
END     main

它的資源描述檔可以寫成底下的樣子：

#include "RESOURCE.H"
  ⁝
DLGNAME DIALOGEX    x, y, width, height
FONT    10,"MS Shell Dlg"
CAPTION "SOME TEXT"
BEGIN
  CONTROL "text", id, "class name", style, x, y, width, height
  ⁝
END

本章範例所需的原理，幾乎已介紹完畢，僅剩下會使用的 Win64 API。

SetDlgItemText API

SetDlgItemText API 用於設定對話盒內某個控制項的標題或文字，例如靜態控制項、按鈕、編輯框上面的文字。它的原型是：

invoke  SetDlgItemText,\
        hDlg,\          ; handle of dialog box
        nIDDlgItem,\    ; identifier of control
        lpString        ; text to set

hDlg 是對話盒代碼，要設定文字的控制項包含在該對話盒內；nIDDlgItem 是要設定文字的控制項識別碼；lpString 是以零結尾的字串位址，控制項上的文字會設為此字串。如果 SetDlgItemText 執行成功回傳值為一；如果失敗回傳值為零。

SetDlgItemText 可以在不知道控制項代碼或是可以看成是視窗代碼的情形下，設定其文字，對於對話盒內的控制項而言很方便。應用程式也可以在知道控制項代碼的情形下，呼叫 SetWindowText 設定控制項代碼上的文字。

SetBkColor API

SetBkColor 用來設定文字的背景顏色。其原型為：

invoke  SetBkColor,\
        hdc,\           ; handle of device context
        crColor         ; background color value

hdc 是裝置內容代碼，crColor 是文字的背景顏色。有關顏色的設定方法，參閱第十一章的說明。如果 SetBkColor 執行成功，回傳值是原先的背景顏色；如果失敗，回傳值是 CLR_INVALID。（CLR_INVALID＝－1）

SetBkColor 會用 crColor 填滿文字線條之間的間隙，但不會填滿文字所佔方塊之外的空間，那空間是畫刷填滿的（見稍後的 WM_CTLCOLORSTATIC 訊息）。SetBkColor 也會設定 TextOut 和 ExtTextOut 的背景顏色。如果背景模式為 TRANSPARENT，那麼 SetBkColor 就無作用。如果背景模式是 OPAQUE，且背景為點陣圖，那麼也會使用背景色。

WM_CTLCOLORSTATIC 訊息

當系統要繪製靜態控制項之前，會把 WM_CTLCOLORSTATIC 訊息發送給父視窗的視窗函式。應用程式可以在處理此訊息時，設定靜態控制項的文字顏色、文字背景顏色以及靜態控制項的背景畫刷。當系統發送 WM_CTLCOLORSTATIC 訊息時，wParam 是靜態控制項的裝置內容代碼，lParam 是靜態控制項代碼；返回至系統時，回傳值是畫刷代碼，系統會用這畫刷塗滿靜態控制項的背景。

以對話盒為主要介面的應用程式範例：MODAL2

本章介紹了捲動軸控制項以及以對話盒為主要介面的應用程式，所以接下來便用它們來實作一個應用程式，MODAL2，它執行時畫面如右圖。

眾所周知，Windows 作業系統的顏色是以紅、綠、藍三色組成，每種顏色的範圍是 0∼255 之間。如果三色均為零，代表黑色；若三色均為 255，代表白色。MODAL2 有三個捲動軸控制項，其捲動方塊位置也在 0∼255 之間，分別表示這三色的強度。使用者可以拖曳捲動軸方塊、或按捲動箭頭、或是按捲動軌道改變捲動軸方塊位置。在改變捲動方塊位置右邊的靜態控制項，會顯示當前捲動方塊位置，同時左下角的靜態控制項顏色會隨之改變。

MODAL2 的原始程式

底下是 MODAL2.ASM 的內容：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
;展示以對話盒為主要介面的應用程式
;組譯與連結：
;rc modal2.rc
;uasm64 -win64 modal2.asm
;link modal2.obj modal2.res /largeaddressaware:no
OPTION CASEMAP:NONE
OPTION WIN64:7

IDSB_RED   EQU  2001
IDSB_GREEN EQU  2002
IDSB_BLUE  EQU  2003
IDS_COLOR  EQU  2004
IDB_EXIT   EQU  2005
IDS_RED    EQU  2006
IDS_GREEN  EQU  2007
IDS_BLUE   EQU  2008

INCLUDE         WINDOWS.INC
INCLUDELIB      KERNEL32.LIB
INCLUDELIB      USER32.LIB
INCLUDELIB      GDI32.LIB
;*******************************************************************************
.CONST
szDlgName       BYTE    "COLOR",0
szFmt           DB      "%d",0
;*******************************************************************************
.DATA
hInst   HANDLE  ?       ;模組代碼
hRedSb  HANDLE  ?       ;代表紅色強度的捲動軸控制項
hGrnSb  HANDLE  ?       ;代表綠色強度的捲動軸控制項
hBluSb  HANDLE  ?       ;代表藍色強度的捲動軸控制項
hColor  HANDLE  ?       ;代表顏色的靜態控制項
iPos    DD    3 DUP (0) ;三個捲動軸控制項位置
;*******************************************************************************
.CODE
;-------------------------------------------------------------------------------
DlgProc PROC    hDlg:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
        LOCAL   buffer[20h]:BYTE,tmp:QWORD
.if uMsg==WM_INITDIALOG
    ;取得三個捲動軸控制項的代碼，分別存於hRedSb、hGrnSb、hBluSb內，
    ;並設定此三個捲動軸控制項的範圍在0∼255之間
        invoke  GetDlgItem,hDlg,IDSB_RED
        mov     hRedSb,rax
        invoke  SetScrollRange,rax,SB_CTL,0,255,1
        invoke  GetDlgItem,hDlg,IDSB_GREEN
        mov     hGrnSb,rax
        invoke  SetScrollRange,rax,SB_CTL,0,255,1
        invoke  GetDlgItem,hDlg,IDSB_BLUE
        mov     hBluSb,rax
        invoke  SetScrollRange,rax,SB_CTL,0,255,1
    ;取得IDS_COLOR靜態控制項代碼，其顏色會隨著捲動軸控制項上的方塊位置而變
        invoke  GetDlgItem,hDlg,IDS_COLOR
        mov     hColor,rax

.elseif uMsg==WM_COMMAND
        mov     rax,r8  ;R8W＝識別碼
        shr     rax,10h ;AX＝通知碼
  .if ax==BN_CLICKED
    .if r8w==IDB_EXIT   ;若使用者按下離開按鈕就結束應用程式
        jmp     exit
    .endif
  .endif

.elseif uMsg==WM_HSCROLL
    ;判斷使用者操作哪個捲動軸控制項
    .if r9==hRedSb
        xor     rax,rax ;RAX＝0，表示使用者操作代表紅色的捲動軸控制項
    .elseif r9==hGrnSb
        mov     rax,4   ;RAX＝4，表示使用者操作代表綠色的捲動軸控制項
    .else
        mov     rax,8   ;RAX＝8，表示使用者操作代表藍色的捲動軸控制項
    .endif
        mov     tmp,rax
    ;依據使用者的操作，改變相對應捲動軸上捲動方塊位置
    .if r8w==SB_LINELEFT
        dec     iPos[rax]
    .elseif r8w==SB_LINERIGHT
        inc     iPos[rax]
    .elseif r8w==SB_PAGELEFT
        sub     iPos[rax],10h
    .elseif r8w==SB_PAGERIGHT
        add     iPos[rax],10h
    .elseif r8w==SB_THUMBTRACK
        mov     r10,wParam
        shr     r10,10h
        mov     iPos[rax],r10d
    .endif
    ;檢查捲動方塊位置是否在0∼255之間，若不在這範圍則調整為0或255
        cmp     iPos[rax],0
        jl      negat
        cmp     iPos[rax],255
        jbe     ok
        mov     iPos[rax],255
        jmp     ok
negat:  mov     iPos[rax],0
    ;把捲動方塊位置，顯示於捲動軸控制項右邊的靜態控制項上
ok:     invoke  wsprintf,ADDR buffer,OFFSET szFmt,iPos[rax]
        mov     rdx,tmp
        shr     rdx,2
        add     rdx,IDS_RED     ;RDX＝使用者操作的捲動軸控制項識別碼
        invoke  SetDlgItemText,hDlg,edx,ADDR buffer
    ;設定新的捲動軸方塊位置
        mov     rax,tmp
        invoke  SetScrollPos,lParam,SB_CTL,iPos[rax],1
    ;強迫IDS_COLOR靜態控制項重繪
        invoke  InvalidateRect,hColor,0,1

.elseif uMsg==WM_CTLCOLORSTATIC
    .if r9==hColor
        mov     ecx,iPos[8]     ;ECX＝藍色強度
        mov     r10d,iPos[4]    ;R10D＝綠色強度
        shl     ecx,10h
        shl     r10d,8h
        add     ecx,iPos        ;ECX＝最後顏色
        add     ecx,r10d
        invoke  CreateSolidBrush,ecx
        ret
    .endif

.elseif uMsg==WM_CLOSE
exit:   invoke  EndDialog,hDlg,0
 
.else   ;其他未處理的訊息返回 FALSE
        mov     rax,0
        ret
 
.endif  ;已處理的訊息，返回 TRUE
        mov     rax,1
        ret
DlgProc ENDP
;-------------------------------------------------------------------------------
main    PROC
        invoke  GetModuleHandle,0
        mov     hInst,rax
        invoke  DialogBoxParam,hInst,OFFSET szDlgName,0,OFFSET DlgProc,0
        invoke  ExitProcess,0
main    ENDP
;*******************************************************************************
END     main

底下是 MODAL2.RC 的內容：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#include "RESOURCE.H"
#define  IDSB_RED   2001
#define  IDSB_GREEN 2002
#define  IDSB_BLUE  2003
#define  IDS_COLOR  2004
#define  IDB_EXIT   2005
#define  IDS_RED    2006
#define  IDS_GREEN  2007
#define  IDS_BLUE   2008

COLOR   DIALOGEX    200,100,150,108
FONT    10,"MS Shell Dlg"
CAPTION "光的三原色"
BEGIN
  RTEXT         "紅",1,           4, 5, 10,10
  SCROLLBAR          IDSB_RED,   16, 4,100,10,SBS_HORZ
  LTEXT         "0", IDS_RED,   118, 5, 16,10
  RTEXT         "綠",2,           4,25, 10,10
  SCROLLBAR          IDSB_GREEN, 16,24,100,10,SBS_HORZ
  LTEXT         "0", IDS_GREEN, 118,25, 16,10
  RTEXT         "藍",3,           4,45, 10,10
  SCROLLBAR          IDSB_BLUE,  16,44,100,10,SBS_HORZ
  LTEXT         "0", IDS_BLUE,  118,45, 16,10
  CTEXT         "",  IDS_COLOR,  16,64, 30,30
  DEFPUSHBUTTON "離開",IDB_EXIT, 85,80, 46,14
END

解釋 MODAL2.RC

注意到，MODAL2.RC 中第 24 行的靜態控制項並沒有文字，即使之後一直到 MODAL2 結束，也都沒有文字。理由很簡單，這個靜態控制僅僅用來表現顏色，所以不需要文字。甚至如果有文字，還會很麻煩。

假設有了一個文字「X」，執行結果會變成右圖。這時候還要費心呼叫 SetBkColor，讓文字背景色與控制項的背景色一樣；也要呼叫 SetTextColor 改變文字顏色。這樣豈不增加麻煩？所以乾脆讓這個靜態控制項自始至終沒有文字。

解釋 MODAL2.ASM 中處理 WM_HSCROLL 訊息的過程

捲動軸控制項傳遞訊息給父視窗，並不是藉由 WM_COMMAND 訊息。對於水平捲動軸控制項，是靠著 WM_HSCROLL 訊息；對於鉛錘捲動軸控制項，則是靠 WM_VSCROLL 訊息。藉著這兩種訊息，捲動軸控制項才能夠告訴父視窗，使用者做了哪些操作，父視窗在視窗函式中才能做出相對的回應。

但是 MODAL2 的對話盒有三個捲動軸控制項，分別對應紅色、綠色、藍色強度的捲動軸控制項，它們都會發出 WM_HSCROLL 訊息，那要怎麼分辨呢？其實不難，由 lParam 內的捲動軸控制項代碼，就能知道使用者正在操作哪個捲動軸控制項。這段過程在 MODAL2.ASM 的第 65∼73 行，最後結果紀錄於 RAX 暫存器內，再存入 tmp 區域變數中。程式碼如下：

65 ;判斷使用者操作哪個捲動軸控制項
66 .if r9==hRedSb
67     xor     rax,rax ;RAX＝0，表示使用者操作代表紅色的捲動軸控制項
68 .elseif r9==hGrnSb
69     mov     rax,4   ;RAX＝4，表示使用者操作代表綠色的捲動軸控制項
70 .else
71     mov     rax,8   ;RAX＝8，表示使用者操作代表藍色的捲動軸控制項
72 .endif
73     mov     tmp,rax

可能會有人懷疑，剛剛不是說以 lParam 作為判斷哪個捲動軸控制項發出的 WM_HSCROLL 訊息嗎？怎麼上面的的程式片段用 R9 暫存器呢？這是因為在 MODAL2.ASM 第七行有道敘述「OPTION WIN64:n」，當 n 的第零位元為一時，會自動在副程式一開始使 RCX、RDX、R8、R9 變為前四個參數，所以 R9 就等於 lParam。當使用者操作不同的捲動軸控制項時，R9 為控制項代碼，依據 R9 設定 RAX，如下：

  1. 當使用者操作代表紅色的捲動軸控制項時，不論是拖曳捲動方塊還是按捲動箭頭或是其他操作，RAX 都是 0。
  2. 當使用者操作代表綠色的捲動軸控制項時，不論是何種操作，RAX 都是 4。
  3. 當使用者操作代表藍色的捲動軸控制項時，不論是何種操作，RAX 都是 8。

為何 RAX 要設為這三種數，不行設 0、1、2 或其他數嗎？這和紀錄三個捲動軸控制項上捲動方塊的位置有關。在 MODAL2.ASM 的第 33 行定義了由三個雙字組長的元素所組成的陣列，iPos。由其名稱可以知道，這個陣列是紀錄三個捲動軸控制項上捲動軸的位置，而且每個元素長 4 個位元組。也就是說 iPos[0] 代表紅色捲動軸上捲動方塊的位置，iPos[4] 代表綠色捲動軸上捲動方塊的位置……。

接下來第 74∼87 行程式如下。由 wParam 低字組內的資料可以知道使用者進行了什麼操作，wParam 在進入視窗函式時就因第七行的「OPTION WIN64:7」敘述，而存於 R8 暫存器，所以只需由 R8W 來判斷即可。例如當使用者按下紅色捲動軸控制項上的向右捲動軌道，那麼 R8W 為 SB_PAGERIGHT，因此要使 iPos 的第 0 個元素加上 10H，所以要執行的指令是「add iPos[rax],10h」。

74 ;依據使用者的操作，改變相對應捲動軸上捲動方塊位置
75  .if r8w==SB_LINELEFT
76      dec     iPos[rax]
77  .elseif r8w==SB_LINERIGHT
78      inc     iPos[rax]
79  .elseif r8w==SB_PAGELEFT
80      sub     iPos[rax],10h
81  .elseif r8w==SB_PAGERIGHT
82      add     iPos[rax],10h
83  .elseif r8w==SB_THUMBTRACK
84      mov     r10,wParam
85      shr     r10,10h
86      mov     iPos[rax],r10d
87  .endif

剩下的檢查 iPos[rax] 的範圍是否在 0∼100 之間，改變捲動軸控制項右邊的靜態控制項上的文字，設定捲動方塊的位置都很簡單，不須詳述。

最後的難題是，當使用者已經操作了捲動軸控制項之後，要如何觸發 WM_CTLCOLORSTATIC 訊息，這樣才能即時改變左下角的靜態控制項（控制項代碼存於 hColor 變數）背景顏色？這時可以呼叫 InvalidateRect，讓 hColor 具有無效區域。在 MODAL2.ASM 的第 106 行，就是使得 hColor 的整個工作區都變得無效，這樣就必須重繪 hColor，如此就能觸發 WM)CTLCOLORSTATIC 訊息。

解釋 MODAL2.ASM 中處理 WM_CTLCOLORSTATIC 訊息的過程

首先在 MODAL2 對話盒裏有七個靜態控制項，但只有控制項代碼是 hColor 的靜態控制項（也就是對話盒左下角的靜態控制項）要改變背景顏色，其餘不必。因此必須用 .if/.endif 來判斷此 WM_CTLCOLORSTATIC 是否為 hColor 發出來的。程式在第 108∼118 行，節錄如下：

108 .elseif uMsg==WM_CTLCOLORSTATIC
109     .if r9==hColor
110         mov     ecx,iPos[8]     ;ECX＝藍色強度
111         mov     r10d,iPos[4]    ;R10D＝綠色強度
112         shl     ecx,10h
113         shl     r10d,8h
114         add     ecx,iPos        ;ECX＝最後顏色
115         add     ecx,r10d
116         invoke  CreateSolidBrush,ecx
117         ret
118     .endif

當 .if/endif 檢測到對話盒左下角的靜態控制項發出的 WM_CTLCOLORSTATIC 訊息時，才把回傳值設為由三個捲動軸控制項生成的顏色所建立的畫刷，這樣系統就能以此畫刷填滿靜態控制項的背景顏色了。雖然，其他的靜態控制項也會發出 WM_CTLCOLORSTATIC，但並沒有設置適當的回傳值，所以在系統內部設置畫刷時會發生錯誤，但還是有原來的畫刷可供系統使用，所以其他靜態控制項仍能正常畫出背景顏色。

上面的程式第 110∼115 行，是根據捲動方塊位置，也可以說是三原色的強度，計算出顏色，然後存於 ECX 暫存器。第 116 行則是根據 ECX 內儲存的顏色呼叫 CreateSolidBrush 建立畫刷，CreateSolidBrush 的回傳值就是新畫刷代碼，存於 RAX，然後直接返回對話盒管理器，對話盒管理器會自動使用新畫刷繪製背景。

後記

本章介紹了兩個主題：「捲動軸控制項」和「以對話盒為主要介面的應用程式」。以後的範例程式，大部分都會是「以對話盒為主要介面的應用程式」為主，因為它太方便了。但是細心的你，可能會發現，這幾章甚至更早之前所建立的視窗都是醜醜的，似乎跟一般市售軟體的視窗不太一樣。這是因為之前的範例程式都沒有使用「visual styles」，下一章介紹它。