太怪的一个问题,listbox 控件居然会创建很多个(winxp+visual.net 2003书上的一个例程)?

Question

下面是代码,望高手指教,本人正努力学习中......//
// ListBox.cpp : 定义应用程序的入口点。
//#include "stdafx.h"
#include "ListBox.h"
#define MAX_LOADSTRING 100
#define ID_LIST 10
#define ID_TEXT 12
// 全局变量:
HINSTANCE hInst; // 当前实例
TCHAR szTitle[MAX_LOADSTRING]; // 标题栏文本
TCHAR szWindowClass[MAX_LOADSTRING]; // 主窗口类名// 此代码模块中包含的函数的前向声明:
ATOM MyRegisterClass(HINSTANCE hInstance);
BOOL InitInstance(HINSTANCE, int);
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK About(HWND, UINT, WPARAM, LPARAM);
void FillListbox(HWND hwndList1);int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
  // TODO: 在此放置代码。
MSG msg;
HACCEL hAccelTable; // 初始化全局字符串
LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
LoadString(hInstance, IDC_LISTBOX, szWindowClass, MAX_LOADSTRING);
MyRegisterClass(hInstance); // 执行应用程序初始化:
if (!InitInstance (hInstance, nCmdShow)) 
{
return FALSE;
} hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC_LISTBOX); // 主消息循环:
while (GetMessage(&msg, NULL, 0, 0)) 
{
if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) 
{
TranslateMessage(&msg);
DispatchMessage(&msg);
}
} return (int) msg.wParam;
}//
//  函数: MyRegisterClass()
//
//  目的: 注册窗口类。
//
//  注释: 
//
//    仅当希望在已添加到 Windows 95 的
//    “RegisterClassEx”函数之前此代码与 Win32 系统兼容时，
//    才需要此函数及其用法。调用此函数
//    十分重要，这样应用程序就可以获得关联的
//   “格式正确的”小图标。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
WNDCLASSEX wcex; wcex.cbSize = sizeof(WNDCLASSEX);  wcex.style = CS_HREDRAW | CS_VREDRAW;
wcex.lpfnWndProc = (WNDPROC)WndProc;
wcex.cbClsExtra = 0;
wcex.cbWndExtra = 0;
wcex.hInstance = hInstance;
wcex.hIcon = LoadIcon(hInstance, (LPCTSTR)IDI_LISTBOX);
wcex.hCursor = LoadCursor(NULL, IDC_ARROW);
wcex.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
wcex.lpszMenuName = (LPCTSTR)IDC_LISTBOX;
wcex.lpszClassName = szWindowClass;
wcex.hIconSm = LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL); return RegisterClassEx(&wcex);
}//
//   函数: InitInstance(HANDLE, int)
//
//   目的: 保存实例句柄并创建主窗口
//
//   注释: 
//
//        在此函数中，我们在全局变量中保存实例句柄并
//        创建和显示主程序窗口。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;   hInst = hInstance; // 将实例句柄存储在全局变量中   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);   if (!hWnd)
   {
      return FALSE;
   }   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);   return TRUE;
}//
//  函数: WndProc(HWND, unsigned, WORD, LONG)
//
//  目的: 处理主窗口的消息。
//
//  WM_COMMAND - 处理应用程序菜单
//  WM_PAINT - 绘制主窗口
//  WM_DESTROY - 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
int wmId, wmEvent;
PAINTSTRUCT ps;
HDC hdc; static HWND hwndList,hwndText;
int iIndex,iLength,cxChar,cyChar;
TCHAR *pVarName,*pVarValue; switch (message) 
{
case WM_CREATE :
{
cxChar = LOWORD(GetDialogBaseUnits());
cyChar = HIWORD(GetDialogBaseUnits()); hwndList = CreateWindow(TEXT("listbox"), NULL , WS_CHILD | WS_VISIBLE | LBS_STANDARD,cxChar, 
cyChar * 3, cxChar*32 + GetSystemMetrics(SM_CXVSCROLL), cyChar * 10, hWnd,
(HMENU)ID_LIST, (HINSTANCE)GetWindowLong(hWnd,GWL_HINSTANCE), NULL);                     //此处返回的句柄为空,不理解??? hwndText = CreateWindow(TEXT("static"),NULL,WS_CHILD | WS_VISIBLE | SS_LEFT,
cxChar,cyChar,GetSystemMetrics(SM_CXSCREEN),cyChar,hWnd,(HMENU)ID_TEXT,
((LPCREATESTRUCT)lParam)->hInstance,NULL); FillListbox(hwndList);
}
break;
case WM_SETFOCUS :
SetFocus(hwndList);
break;
case WM_COMMAND:
wmId    = LOWORD(wParam); 
wmEvent = HIWORD(wParam); 
// 分析菜单选择:
switch (wmId)
{
case IDM_ABOUT:
DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
break;
case IDM_EXIT:
DestroyWindow(hWnd);
break;
case ID_LIST :
if (wmEvent == LBN_SELCHANGE)
{
iIndex = SendMessage(hwndList,LB_GETCURSEL,0,0);
iLength = SendMessage(hwndList,LB_GETTEXTLEN,iIndex,0) + 1;
pVarName = (TCHAR *)calloc(iLength,sizeof(TCHAR));
SendMessage(hwndList,LB_GETTEXT,iIndex,(LPARAM)pVarName);
iLength = GetEnvironmentVariable(pVarName,NULL,0);
pVarValue = (TCHAR *)calloc(iLength,sizeof(TCHAR));
GetEnvironmentVariable(pVarName,pVarValue,iLength);
SetWindowText(hwndText,pVarValue);
free(pVarName);
free(pVarValue);
}
break;
default:
return DefWindowProc(hWnd, message, wParam, lParam);
}
break;
case WM_PAINT:
hdc = BeginPaint(hWnd, &ps);
// TODO: 在此添加任意绘图代码...
EndPaint(hWnd, &ps);
break;
case WM_DESTROY:
PostQuitMessage(0);
break;
default:
return DefWindowProc(hWnd, message, wParam, lParam);
}
return 0;
}// “关于”框的消息处理程序。
LRESULT CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
switch (message)
{
case WM_INITDIALOG:
return TRUE; case WM_COMMAND:
if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) 
{
EndDialog(hDlg, LOWORD(wParam));
return TRUE;
}
break;
}
return FALSE;
}void FillListbox(HWND hwndList1)
{
int iLength;
TCHAR *pVarBlock,*pVarBeg,*pVarEnd,*pVarName,*pBlock; pBlock = pVarBlock = GetEnvironmentStrings(); while(*pVarBlock)
{
if (*pVarBlock != '=')
{
pVarBeg = pVarBlock;
while(*pVarBlock++ != '=');
pVarEnd = pVarBlock - 1;
iLength = pVarEnd - pVarBeg;
pVarName = (TCHAR *)calloc(iLength + 1,sizeof(TCHAR));
CopyMemory(pVarName,pVarBeg,iLength * sizeof(TCHAR));
pVarName[iLength] = '\0'; SendMessage(hwndList1,LB_ADDSTRING,0,(LPARAM)pVarName);
free(pVarName);
} while(*pVarBlock++ != '\0');
} FreeEnvironmentStrings(pBlock);
}

Answer 1

listbox是你自己定义的控件吗？返回为空就表示createwindow函数失败

Answer 2

listbox是windows预定义类型，我只是创建它啊，可是程序运行后会不断的创建列表，不知道为啥会这样，昨晚在家用visual c++ 6.0还是这样结果。程序很简单，在WM_CREATE消息中添加如下代码
hwndList = CreateWindow(TEXT("listbox"), NULL , WS_CHILD | WS_VISIBLE | LBS_STANDARD,cxChar, 
cyChar * 3, cxChar*32 + GetSystemMetrics(SM_CXVSCROLL), cyChar * 10, hWnd,
(HMENU)ID_LIST, (HINSTANCE)GetWindowLong(hWnd,GWL_HINSTANCE), NULL); 我说的可能错误，不是句柄为空，而是在WM_CREATE消息中会产生递归循环，但又不是无限循环。