文本框粘贴时兼容Unix、Mac换行符的方法源码

本篇文章属于《518抽奖软件开发日志》系列文章的一部分。

我在开发《518抽奖软件》（www.518cj.net）的时候，要在文本框粘贴从别处复制来的名单。发现一个问题，就是一些Unix传过来的多行文本，粘贴后都变成了一行。原来，它的换行符跟Winodws的不一致导致的。解决方法就是，窗口子类化，在新的窗口过程中，专门处理这个粘贴消息，兼容Windows、Mac、Unix三种不同的文本换行符。具体代码如下：

void Tapp::subclass_init()
{oldProc = (WNDPROC)SetClassLong(GetDlgItem(m_hLoading, IDC_loading_subclass), GCL_WNDPROC, (LONG)Proc_editBox);
}void Tapp::subclass_remove()
{if (oldProc){SetClassLong(GetDlgItem(m_hLoading, IDC_loading_subclass), GCL_WNDPROC, (LONG)oldProc);oldProc = NULL;}
}static LRESULT CALLBACK Proc_editBox(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
// 在粘贴时，处理换行符不一致if (uMsg == WM_PASTE){if (!IsClipboardFormatAvailable(CF_UNICODETEXT))return 0;if (!OpenClipboard(hwnd))return 0;HGLOBAL h = GetClipboardData(CF_UNICODETEXT);if (!h) { CloseClipboard(); return 0; }WCHAR* p = (WCHAR*)GlobalLock(h);if (!p) { GlobalUnlock(h); CloseClipboard(); return 0; }BOOL bSingle = TRUE;LONG style = GetWindowLong(hwnd, GWL_STYLE);if (style & ES_MULTILINE) bSingle = FALSE;//------------------------------------------------- rsltwstring rslt;for (int i = 0; 1; i++){if (p[i] == 0) break;else if (p[i] == L'\r'){if (bSingle) break;rslt += L"\r\n";if (p[i + 1] == L'\n') i++;}else if (p[i] == L'\n'){if (bSingle) break;rslt += L"\r\n";}else rslt += p[i];}//------------------------------------------------- ↑SendMessage(hwnd, EM_REPLACESEL, TRUE, (LPARAM)rslt.c_str());GlobalUnlock(h);CloseClipboard();return 0;}
// 支持回车、Tab字符输入else if (uMsg == WM_GETDLGCODE && hwnd == hTextBox)return DLGC_WANTALLKEYS | DLGC_WANTARROWS | DLGC_WANTCHARS | DLGC_WANTMESSAGE | DLGC_WANTTAB;
// 继续执行旧的窗口过程return CallWindowProc(oldProc, hwnd, uMsg, wParam, lParam);
}