EternalWindows
タブコントロール / イメージリストの設定

今回は、タブコントロールの各タブにビットマップを表示します。 これには、ビットマップをイメージリストとしてロードし、 TabCtrl_SetImageListに指定することになります。

BOOL TabCtrl_SetImageList(
  HWND hwnd,
  HIMAGELIST himl
);

hwndは、タブコントロールのハンドルを指定します。 himlは、イメージリストのハンドルを指定します。

次に、ビットマップのサンプルを示します。 各イメージは、次のように一定サイズで分割されている必要があります。

次に、今回のプログラムを示します。

#include <windows.h>
#include <commctrl.h>

#pragma comment (lib, "comctl32.lib")

LRESULT CALLBACK WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam);

int WINAPI WinMain(HINSTANCE hinst, HINSTANCE hinstPrev, LPSTR lpszCmdLine, int nCmdShow)
{
	TCHAR      szAppName[] = TEXT("sample");
	HWND       hwnd;
	MSG        msg;
	WNDCLASSEX wc;

	wc.cbSize        = sizeof(WNDCLASSEX);
	wc.style         = 0;
	wc.lpfnWndProc   = WindowProc;
	wc.cbClsExtra    = 0;
	wc.cbWndExtra    = 0;
	wc.hInstance     = hinst;
	wc.hIcon         = (HICON)LoadImage(NULL, IDI_APPLICATION, IMAGE_ICON, 0, 0, LR_SHARED);
	wc.hCursor       = (HCURSOR)LoadImage(NULL, IDC_ARROW, IMAGE_CURSOR, 0, 0, LR_SHARED);
	wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
	wc.lpszMenuName  = NULL;
	wc.lpszClassName = szAppName;
	wc.hIconSm       = (HICON)LoadImage(NULL, IDI_APPLICATION, IMAGE_ICON, 0, 0, LR_SHARED);
	
	if (RegisterClassEx(&wc) == 0)
		return 0;

	hwnd = CreateWindowEx(0, szAppName, szAppName, WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hinst, NULL);
	if (hwnd == NULL)
		return 0;

	ShowWindow(hwnd, nCmdShow);
	UpdateWindow(hwnd);
	
	while (GetMessage(&msg, NULL, 0, 0) > 0) {
		TranslateMessage(&msg);
		DispatchMessage(&msg);
	}

	return (int)msg.wParam;
}

LRESULT CALLBACK WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
	static int        nSelIndex = 0;
	static HWND       hwndTab = NULL;
	static HIMAGELIST himl = NULL;

	switch (uMsg) {
		
	case WM_CREATE: {
		TCITEM               item;
		INITCOMMONCONTROLSEX ic;
		
		ic.dwSize = sizeof(INITCOMMONCONTROLSEX);
		ic.dwICC  = ICC_TAB_CLASSES;
		InitCommonControlsEx(&ic);
		
		hwndTab = CreateWindowEx(0, WC_TABCONTROL, TEXT(""), WS_CHILD | WS_VISIBLE, 0, 0, 0, 0, hwnd, (HMENU)1, ((LPCREATESTRUCT)lParam)->hInstance, NULL);		
		
		item.mask    = TCIF_TEXT | TCIF_IMAGE;
		item.iImage  = 0;
		item.pszText = TEXT("タブA");
		TabCtrl_InsertItem(hwndTab, 0, &item);
		
		item.mask    = TCIF_TEXT | TCIF_IMAGE;
		item.iImage  = 1;
		item.pszText = TEXT("タブB");
		TabCtrl_InsertItem(hwndTab, 1, &item);
		
		himl = ImageList_LoadImage(NULL, TEXT("tab_image.bmp"), 16, CLR_NONE, RGB(255, 255, 255), IMAGE_BITMAP, LR_CREATEDIBSECTION | LR_LOADFROMFILE);
		if (himl == NULL)
			return -1;

		TabCtrl_SetImageList(hwndTab, himl);

		return 0;
	}
	
	case WM_PAINT: {
		int         yStart;
		HDC         hdc;
		RECT        rc;
		PAINTSTRUCT ps;

		hdc = BeginPaint(hwnd, &ps);

		GetClientRect(hwndTab, &rc);
		yStart = rc.bottom - rc.top;
		
		if (TabCtrl_GetCurSel(hwndTab) == 0)
			Rectangle(hdc, 0, yStart, 30, yStart + 30);
		else
			Ellipse(hdc, 0, yStart, 30, yStart + 30);

		EndPaint(hwnd, &ps);

		return 0;
	}
	
	case WM_NOTIFY:
		if (((LPNMHDR)lParam)->code == TCN_SELCHANGE)
			InvalidateRect(hwnd, NULL, TRUE);
		return 0;
	
	case WM_SIZE:
		MoveWindow(hwndTab, 0, 0, LOWORD(lParam), 30, TRUE);
		return 0;

	case WM_DESTROY:
		if (himl != NULL)
			ImageList_Destroy(himl);
		PostQuitMessage(0);
		return 0;

	default:
		break;

	}

	return DefWindowProc(hwnd, uMsg, wParam, lParam);
}

タブコントロールにビットマップを表示するには、 TabCtrl_SetImageListでタブコントロールにイメージリストを設定します。 イメージリストは、ImageList_LoadImageで取得することができ、 第2引数にビットマップファイルの名前、第3引数に各イメージの幅、 第5引数に透過色を指定します。 イメージリストを設定する場合は、TCITEM構造体のmaskにTCIF_IMAGEを指定し、 iImageに使用するイメージのインデックスを指定します。


戻る