/*-------------------------------------------------bobo，2020-01-18-------------------------------------------------*/ #include <windows.h>#define DIVISIONS 10 //單元格橫向縱向個數
int cxBlock, cyBlock;LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
LRESULT CALLBACK ChildWndProc (HWND, UINT, WPARAM, LPARAM) ;TCHAR szChildClass[] = TEXT ("caret_Child") ;int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,PSTR szCmdLine, int iCmdShow)
{static TCHAR szAppName[] = TEXT ("Cell Caret Demo") ;HWND hwnd ;MSG msg ;WNDCLASS wndclass ;wndclass.style = CS_HREDRAW | CS_VREDRAW ;wndclass.lpfnWndProc = WndProc ;wndclass.cbClsExtra = 0 ;wndclass.cbWndExtra = 0 ;wndclass.hInstance = hInstance ;wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION) ;wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH) ;wndclass.lpszMenuName = NULL ;wndclass.lpszClassName = szAppName ;if (!RegisterClass (&wndclass)){MessageBox (NULL, TEXT ("Program requires Windows NT!"), szAppName, MB_ICONERROR) ;return 0 ;}wndclass.lpfnWndProc = ChildWndProc ;wndclass.cbWndExtra = sizeof (long) ;wndclass.hIcon = NULL ;wndclass.lpszClassName = szChildClass ;RegisterClass (&wndclass) ;hwnd = CreateWindow (szAppName, TEXT ("Cell Caret Demo"),WS_OVERLAPPEDWINDOW,CW_USEDEFAULT, CW_USEDEFAULT,CW_USEDEFAULT, CW_USEDEFAULT,NULL, NULL, hInstance, NULL) ;ShowWindow (hwnd, iCmdShow) ;UpdateWindow (hwnd) ;while (GetMessage (&msg, NULL, 0, 0)){TranslateMessage (&msg) ;DispatchMessage (&msg) ;}return msg.wParam ;
}LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{static HWND hwndChild[DIVISIONS][DIVISIONS] ;int x, y ;switch (message){case WM_CREATE :for (x = 0 ; x < DIVISIONS ; x++)for (y = 0 ; y < DIVISIONS ; y++)hwndChild[x][y] = CreateWindow (szChildClass, NULL,WS_CHILDWINDOW | WS_VISIBLE,0, 0, 0, 0,hwnd, (HMENU) (y << 8 | x),(HINSTANCE) GetWindowLong (hwnd, GWL_HINSTANCE),NULL) ;return 0 ;case WM_SIZE :cxBlock = LOWORD (lParam) / DIVISIONS ;cyBlock = HIWORD (lParam) / DIVISIONS ;for (x = 0 ; x < DIVISIONS ; x++)for (y = 0 ; y < DIVISIONS ; y++)MoveWindow (hwndChild[x][y],x * cxBlock, y * cyBlock,cxBlock, cyBlock, TRUE) ;return 0 ;case WM_LBUTTONDOWN :return 0 ;case WM_DESTROY :PostQuitMessage (0) ;return 0 ;}return DefWindowProc (hwnd, message, wParam, lParam) ;
}LRESULT CALLBACK ChildWndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{HDC hdc ;PAINTSTRUCT ps ;RECT rect ;switch (message){case WM_CREATE :return 0 ;case WM_LBUTTONDOWN :CreateCaret(hwnd,NULL,10,50); SetCaretPos(cxBlock/2,cyBlock/2);ShowCaret(hwnd);return 0 ;case WM_PAINT :hdc = BeginPaint (hwnd, &ps) ;GetClientRect (hwnd, &rect) ;Rectangle (hdc, 0, 0, rect.right, rect.bottom) ;if (GetWindowLong (hwnd, 0)){MoveToEx (hdc, 0, 0, NULL) ;LineTo (hdc, rect.right, rect.bottom) ;MoveToEx (hdc, 0, rect.bottom, NULL) ;LineTo (hdc, rect.right, 0) ;}EndPaint (hwnd, &ps) ;return 0 ;}return DefWindowProc (hwnd, message, wParam, lParam) ;
}
?
代碼說明；
#define DIVISIONS 10 ? ?//單元格橫向縱向個數
創建子窗口的個數；
?
LRESULT CALLBACK WndProc ? (HWND, UINT, WPARAM, LPARAM) ;
LRESULT CALLBACK ChildWndProc (HWND, UINT, WPARAM, LPARAM) ;
窗口過程和子窗口過程；此處一個子窗口是一個單元格；
?
在主窗口的WM_CREATE消息中創建子窗口；
?
在主窗口的WM_SIZE 消息中改變子窗口大小；并獲取更改后的單元格大小到cxBlock、cyBlock；
?
這一段是在子窗口的WM_PAINT中把子窗口的邊線畫出；
? ? ? ? ? ? ? ?MoveToEx (hdc, 0, ? ? ? ? ?0, NULL) ;
? ? ? ? ? ? ? ?LineTo ? (hdc, rect.right, rect.bottom) ;
? ? ? ? ? ? ? ?MoveToEx (hdc, 0, ? ? ? ? ?rect.bottom, NULL) ;
? ? ? ? ? ? ? ?LineTo ? (hdc, rect.right, 0) ;
?
子窗口發生鼠標左鍵單擊時設置光標到本子窗口；
? ? ? ? ? CreateCaret(hwnd,NULL,10,50);?
? ? ? ? ? SetCaretPos(cxBlock/2,cyBlock/2);
?? ??? ? ?ShowCaret(hwnd);
? ? ?這個脫字符要調3個API才會出來；創建、設置坐標、顯示；創建和顯示的第一個參數是窗口句柄；
?
至于實際的電子表格的單元格，是一個個子窗口，還是都是繪制的，就不了解了；
?
?
?
?
?
?
?
總結
以上是生活随笔為你收集整理的Win32程序简单演示-模拟电子表格移动光标到另一单元格的全部內容，希望文章能夠幫你解決所遇到的問題。
如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。
