void __fastcall TForm1::Button1Click(TObject *Sender)
{
    HWND H1 = FindWindow(NULL, "文件 - WordPad");  // 找尋 WordPad
    if (H1 != NULL) {  // 如果找到目標視窗的話
        // 取得工具列底層的 ControlBar 的 HWND
        HWND hControlbar = FindWindowEx(H1, NULL, "AfxControlBar42u", NULL);
        if (hControlbar) {  // 如果找到的話
            // 取得工具列的 HWND
            HWND hToolbar = FindWindowEx(hControlbar, NULL, "ToolbarWindow32", NULL);
            if (hToolbar) {  // 如果找到的話
                if (IsWindowVisible(hToolbar)) {  // 如果是顯示狀態
                    ::ShowWindow(hToolbar, SW_HIDE);  // 設定成隱藏狀態
                } else {
                    ::ShowWindow(hToolbar, SW_SHOW);  // 設定成顯示狀態
                }
            }
        }
    }
}