第137章 RTFを印刷する その2


まず前回の問題を解決します。

前章までのプログラムでは、一行に入力できる文字数は ウィンドウの大きさに依存していて、印刷すると一行の 文字数が違っていました。また、1ページ分しか印刷でき ませんでした。

まず、1ページに収まらない長い文書を印刷するときはどうすれば よいのでしょうか。実は

SendMessage(hEdit, EM_FORMATRANGE, TRUE, (LPARAM)&fr);

の戻り値は次のページの文字インデックス(最後の文字インデックス+1)となります。 これを利用すれば良いですね。

while (fr.chrg.cpMin < lTextLen) { lNextMin = SendMessage(hEdit, EM_FORMATRANGE, TRUE, (LPARAM)&fr); StartPage(hdc); SendMessage(hEdit, EM_DISPLAYBAND, 0, (LPARAM)&fr.rc); EndPage(hdc); fr.chrg.cpMin = lNextMin; }

このようにすれば、FORMATRANGE構造体のchrg.cpMinが次々と次の1ページの 先頭を表すことになります。そして、cpMinが印刷するテキストの長さよりも 小さいときはこれを繰り返せばよいことになります。

せっかくですから,印刷のときにページ番号も印刷される とうれしいですね。 これは、どうすればよいのでしょうか。

別に難しいことはありません。プリンタのhdcがわかっていますから TextOutなどを使ってプリンタに書きこめば良いですね。

int RTF_AddPageNo(HDC hdc, int nPage) { int wx, wy, x, y; char szPage[64]; char *szPage_Org = "-- %d --"; int nTextW; //テキストの幅 TEXTMETRIC tm; wx = GetDeviceCaps(hdc, PHYSICALWIDTH); wy = GetDeviceCaps(hdc, PHYSICALHEIGHT); wsprintf(szPage, szPage_Org, nPage); GetTextMetrics(hdc, &tm); nTextW = (int)tm.tmAveCharWidth * strlen(szPage); x = (wx - nTextW) / 2; y = 40; TextOut (hdc, x, y, szPage, strlen(szPage)); return nPage; }

これは、nPageページを印刷するときに用紙の上のほうの真ん中に ページ番号を印刷する関数です。hdcはもちろんプリンタのhdcです。 szPageに「-- 3 --」などというページ番号が入ります。 そして、この文字列が用紙の中央に来るようにします。 用紙の幅はGetDeviceCaps(hdc, PHYSICALWIDTH);で求めます。

ページ番号の幅は文字1つの幅に文字数をかけたもので求めます。
GetTextMetrics(hdc, &tm);
でTEXTMETRIC構造体に情報をもらいます。そしてtmAveCharWidth メンバを調べると1文字の横幅がわかります。文字の幅は文字によって 微妙に異なるので平均的なものです。 GetTextMetrics関数などは第77章を 参照してください。

さて、この関数では使わないwyを求めています。これは、あとでページを 下のほうに入れるときに使おうと思って今から準備したものです。 関数の引数も増やして、任意の位置に好きな文字列を使ってページを 入れれるように作り直してみてください。

さて、

次の大問題は

1行に入力できる文字数がウィンドウの幅に 依存していて用紙の幅には関係していないということでした。 これは、意外に簡単に解決できます。見たとおりに印刷できることを WYSIWYG(What You See Is What You Get)といいます。 これを実現するには

EM_SETTARGETDEVICE wParam = (WPARAM) (HDC) hdcTarget; lParam = (LPARAM) (int) cxLineWidth;

を使います。hdcTargetはプリンタのhdcを指定します。 cxLineWidthには印刷される横幅を指定します。 さて、ヘルプには書いてないのですがcxLineWidthの 単位はtwipです。

これをリッチエディットコントロールに送ってやると印刷される 横幅分しか入力できなくなります。

さて、こうなるとまた問題が生じます。今までは入力が ウィンドウの横幅いっぱいまで来ると自動的に次の行に行っていました。 しかし、今度は入力できる横幅が決まっています。 ウィンドウがこれよりも狭いときは 水平スクロールバーを出さなくてはいけません。

この解決策も簡単です。エディットコントロールを作るときに WS_HSCROLL | ES_HAUTOSCROLLのウィンドウスタイルを加えてやるとよいです。

さらに、今回は「新規作成」コマンドも追加してみました。 これは、特に説明は不要と思われます。

では、プログラムを見てみましょう。

// rich08.rcの一部 ///////////////////////////////////////////////////////////////////////////// // // Menu // MYMENU MENU DISCARDABLE BEGIN POPUP "ファイル(&F)" BEGIN MENUITEM "新規作成(&N)", IDM_NEW MENUITEM "開く(&O)", IDM_OPEN MENUITEM SEPARATOR MENUITEM "上書き保存(&S)", IDM_SAVE MENUITEM "名前をつけて保存(&A)", IDM_SAVEAS MENUITEM SEPARATOR MENUITEM "プリンターの設定(&U)", IDM_PRNSET MENUITEM "印刷(&P)", IDM_PRINT MENUITEM SEPARATOR MENUITEM "終了(&X)", IDM_END END POPUP "編集(&E)" BEGIN MENUITEM "元に戻す(&U)", IDM_UNDO MENUITEM SEPARATOR MENUITEM "フォントの変更(&F)", IDM_FONT POPUP "段落書式" BEGIN MENUITEM "中央揃え(&C)", IDM_CENTER MENUITEM "左揃え(&L)", IDM_LEFT MENUITEM "右揃え(&R)", IDM_RIGHT END MENUITEM SEPARATOR MENUITEM "コピー(&C)", IDM_COPY MENUITEM "切り取り(&T)", IDM_CUT MENUITEM "貼り付け(&P)", IDM_PASTE MENUITEM SEPARATOR MENUITEM "すべて選択(&L)", IDM_ALL END END MYPOPUP MENU DISCARDABLE BEGIN POPUP "ダミーです" BEGIN MENUITEM "新規作成", IDM_NEW MENUITEM "開く", IDM_OPEN MENUITEM SEPARATOR MENUITEM "上書き保存", IDM_SAVE MENUITEM "名前をつけて保存", IDM_SAVEAS MENUITEM SEPARATOR MENUITEM "フォントの変更", IDM_FONT MENUITEM SEPARATOR MENUITEM "左揃え", IDM_LEFT MENUITEM "右揃え", IDM_RIGHT MENUITEM "中央揃え", IDM_CENTER MENUITEM SEPARATOR MENUITEM "終了", IDM_END MENUITEM SEPARATOR MENUITEM "コピー", IDM_COPY MENUITEM "切り取り", IDM_CUT MENUITEM "貼り付け", IDM_PASTE MENUITEM "元に戻す", IDM_UNDO MENUITEM SEPARATOR MENUITEM "印刷", IDM_PRINT MENUITEM "プリンタの設定", IDM_PRNSET MENUITEM SEPARATOR MENUITEM "すべて選択", IDM_ALL END END

「新規作成」が増えました。

// rich08.cpp #define STRICT #include <windows.h> #include <richedit.h> #include "resource.h" LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM); DWORD CALLBACK MySaveProc(DWORD, LPBYTE, LONG, LONG *); DWORD CALLBACK MyReadProc(DWORD, LPBYTE, LONG, LONG *); BOOL InitApp(HINSTANCE); BOOL InitInstance(HINSTANCE, int); BOOL SetInitialFont(HWND hWnd); BOOL SetMyFont(HWND); BOOL SetCenter(HWND); BOOL SetLeft(HWND); BOOL SetRight(HWND); void ClearCheck(HMENU);//段落書式のチェックをはずす void RTF_Save(HWND); void RTF_SaveAs(HWND); void RTF_Open(HWND); void RTF_CheckMenu(HWND, HMENU); void RTF_Print(HWND); void RTF_All(HWND); HDC GetPrintInfo(void); int PrinterSet(HWND); int RTF_AddPageNo(HDC, int); void RTF_SetWYSIWYG(HWND); void RTF_New(HWND); char szClassName[] = "rich08"; //ウィンドウクラス HINSTANCE hInst; DWORD dwMyMask; //CHARFORMATで使うマスク値 char szFName[MAX_PATH]; int nFileType; //1:RTF 2:TXT char *szAppTitle = "猫でもわかるRTF"; PRINTER_INFO_5 prninfo[3]; int WINAPI WinMain(HINSTANCE hCurInst, HINSTANCE hPrevInst, LPSTR lpsCmdLine, int nCmdShow) { MSG msg; if (!InitApp(hCurInst)) return FALSE; if (!InitInstance(hCurInst, nCmdShow)) return FALSE; while (GetMessage(&msg, NULL, 0, 0)) { TranslateMessage(&msg); DispatchMessage(&msg); } return msg.wParam; }

WinMainの中身は今までと全く同じです。

//ウィンドウ・クラスの登録 BOOL InitApp(HINSTANCE hInst) { WNDCLASSEX wc; wc.cbSize = sizeof(WNDCLASSEX); wc.style = CS_HREDRAW | CS_VREDRAW; wc.lpfnWndProc = WndProc; //プロシージャ名 wc.cbClsExtra = 0; wc.cbWndExtra = 0; wc.hInstance = hInst; //インスタンス wc.hIcon = LoadIcon(NULL, IDI_APPLICATION); wc.hCursor = LoadCursor(NULL, IDC_ARROW); wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH); wc.lpszMenuName = "MYMENU"; //メニュー名 wc.lpszClassName = (LPCSTR)szClassName; wc.hIconSm = LoadIcon(NULL, IDI_APPLICATION); return (RegisterClassEx(&wc)); } //ウィンドウの生成 BOOL InitInstance(HINSTANCE hInstance, int nCmdShow) { HWND hWnd; hInst = hInstance; hWnd = CreateWindow(szClassName, szAppTitle, //タイトルバーにこの名前が表示されます WS_OVERLAPPEDWINDOW,//ウィンドウの種類 CW_USEDEFAULT, //X座標 CW_USEDEFAULT, //Y座標 CW_USEDEFAULT, //幅 CW_USEDEFAULT, //高さ NULL,//親ウィンドウのハンドル、親を作るときはNULL NULL,//メニューハンドル、クラスメニューを使うときはNULL hInstance,//インスタンスハンドル NULL); if (!hWnd) return FALSE; ShowWindow(hWnd, nCmdShow); UpdateWindow(hWnd); return TRUE; }

これも今までと同じです。

//ウィンドウプロシージャ LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp) { int id; static HINSTANCE hRtLib; static HWND hEdit; DWORD dwEvent; MSGFILTER *pmf; HMENU hMenu, hSub; int x, y; POINT pt; switch (msg) { case WM_CREATE: hRtLib = LoadLibrary("RICHED32.DLL"); hEdit = CreateWindowEx(WS_EX_CLIENTEDGE, "RICHEDIT", "", WS_CHILD | WS_VISIBLE | WS_BORDER | ES_MULTILINE | WS_HSCROLL | WS_VSCROLL | ES_AUTOVSCROLL | ES_AUTOHSCROLL | ES_NOHIDESEL, 0, 0, 0, 0, //とりあえず幅、高さ0のウィンドウを作る hWnd, (HMENU)1, hInst, NULL); dwEvent = SendMessage(hEdit, EM_GETEVENTMASK, 0, 0); dwEvent |= ENM_MOUSEEVENTS; SendMessage(hEdit, EM_SETEVENTMASK, 0, (LPARAM)dwEvent); SetInitialFont(hEdit); //リッチエディットコントロールをWYSIWYGの幅にする //要するにプリンタにセットしてある用紙の幅に合わせる RTF_SetWYSIWYG(hEdit); break; case WM_NOTIFY: switch (((NMHDR*)lp)->code ) { case EN_MSGFILTER: pmf = (MSGFILTER *)lp; if (pmf->msg == WM_RBUTTONDOWN){ x = LOWORD(pmf->lParam); y = HIWORD(pmf->lParam); hMenu = LoadMenu(hInst, "MYPOPUP"); hSub = GetSubMenu(hMenu, 0); pt.x = (LONG)x; pt.y = (LONG)y; ClientToScreen(hEdit, &pt); TrackPopupMenu(hSub, TPM_LEFTALIGN, pt.x, pt.y, 0, hWnd, NULL); DestroyMenu(hMenu); } break; } break; case WM_SIZE: MoveWindow(hEdit, 0, 0, LOWORD(lp), HIWORD(lp), TRUE); SetFocus(hEdit); break; case WM_INITMENUPOPUP: RTF_CheckMenu(hEdit, (HMENU)wp); break; case WM_COMMAND: switch (LOWORD(wp)) { case IDM_END: SendMessage(hWnd, WM_CLOSE, 0, 0); break; case IDM_ALL: RTF_All(hEdit); break; case IDM_FONT: SetMyFont(hEdit); break; case IDM_CENTER: SetCenter(hEdit); break; case IDM_LEFT: SetLeft(hEdit); break; case IDM_RIGHT: SetRight(hEdit); break; case IDM_NEW: RTF_New(hEdit); break; case IDM_SAVE: RTF_Save(hEdit); break; case IDM_SAVEAS: RTF_SaveAs(hEdit); break; case IDM_OPEN: RTF_Open(hEdit); break; case IDM_COPY: SendMessage(hEdit, WM_COPY, 0, 0); break; case IDM_CUT: SendMessage(hEdit, WM_CUT, 0, 0); break; case IDM_PASTE: SendMessage(hEdit, WM_PASTE, 0, 0); break; case IDM_UNDO: SendMessage(hEdit, WM_UNDO, 0, 0); SendMessage(hEdit, EM_SETMODIFY, (WPARAM)FALSE, 0); break; case IDM_PRINT: RTF_Print(hEdit); break; case IDM_PRNSET: PrinterSet(hEdit); RTF_SetWYSIWYG(hEdit); break; } break; case WM_CLOSE: if (SendMessage(hEdit, EM_GETMODIFY, 0, 0)) { id = MessageBox(hWnd, "文書が変更されています。保存しますか。", "注意!", MB_YESNO); if (id == IDYES) RTF_Save(hEdit); } id = MessageBox(hWnd, "終了してもよいですか", "終了確認", MB_YESNO | MB_ICONQUESTION); if (id == IDYES) { DestroyWindow(hEdit); DestroyWindow(hWnd); } else SetFocus(hEdit); break; case WM_DESTROY: if(FreeLibrary(hRtLib) == 0) MessageBox(NULL, "ライブラリ開放失敗", "Error", MB_OK); PostQuitMessage(0); break; default: return (DefWindowProc(hWnd, msg, wp, lp)); } return 0L; }

WM_CREATEのところで、リッチエディットコントロールを作るときの ウィンドウスタイルが今までと少し変更になりました。また、 作った後すぐに自作関数RTF_SetWYSIWYG関数(後述)を呼んで、入力できる 幅を制限しています。

WM_COMMANDのIDM_NEWで自作関数RTF_New(後述)を呼んでいます。

IDM_PRNSETのところでプリンタの設定を変えたところでもRTF_SetWYSIWYG関数 を呼んでいます。ようしの向き,大きさなどが変えられた可能性があるからです。

BOOL SetInitialFont(HWND hEdit)//最初のフォントの設定 { CHARFORMAT cfm; memset(&cfm, 0, sizeof(CHARFORMAT)); cfm.cbSize = sizeof(CHARFORMAT); cfm.dwMask = CFM_BOLD | CFM_CHARSET | CFM_COLOR | CFM_FACE | CFM_ITALIC | CFM_SIZE | CFM_STRIKEOUT | CFM_UNDERLINE; dwMyMask = cfm.dwMask;//以後dwMyMaskの値を使う cfm.bCharSet = SHIFTJIS_CHARSET; strcpy(cfm.szFaceName, "MS ゴシック"); if (SendMessage(hEdit, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&cfm) == 0) { MessageBox(hEdit, "EM_SETCHARFORMAT失敗です", "Error", MB_OK); return FALSE; } return TRUE; } BOOL SetMyFont(HWND hEdit) { CHARFORMAT cfm; CHOOSEFONT cf; LOGFONT lf; HDC hDC; memset(&cf, 0, sizeof(CHOOSEFONT)); memset(&lf, 0, sizeof(LOGFONT)); cfm.cbSize = sizeof(CHARFORMAT); //今までの設定を取得してそれをCHOOSEFONT構造体に渡す SendMessage(hEdit, EM_GETCHARFORMAT, TRUE, (LPARAM)&cfm); hDC = GetDC(hEdit); lf.lfHeight = MulDiv(cfm.yHeight, GetDeviceCaps(hDC, LOGPIXELSY), -1440); ReleaseDC(hEdit, hDC); cfm.dwMask = dwMyMask; if (cfm.dwEffects & CFE_BOLD) lf.lfWeight = FW_BOLD; else lf.lfWeight = FW_NORMAL; if (cfm.dwEffects & CFE_ITALIC) lf.lfItalic = TRUE; if (cfm.dwEffects & CFE_UNDERLINE) lf.lfUnderline = TRUE; if (cfm.dwEffects & CFE_STRIKEOUT) lf.lfStrikeOut = TRUE; lf.lfCharSet = cfm.bCharSet; lf.lfQuality = DEFAULT_QUALITY; lf.lfPitchAndFamily = cfm.bPitchAndFamily; strcpy( lf.lfFaceName, cfm.szFaceName ); cf.rgbColors = cfm.crTextColor; cf.lStructSize = sizeof(CHOOSEFONT); cf.hwndOwner = hEdit; cf.lpLogFont = &lf; cf.Flags = CF_SCREENFONTS | CF_EFFECTS | CF_INITTOLOGFONTSTRUCT; //フォント選択ダイアログを出して新しい設定を取得する if (ChooseFont(&cf)) { cfm.cbSize = sizeof(CHARFORMAT); cfm.dwMask = dwMyMask; cfm.yHeight = 2 * cf.iPointSize; cfm.dwEffects = 0; if (lf.lfWeight >= FW_BOLD) cfm.dwEffects |= CFE_BOLD; if (lf.lfItalic) cfm.dwEffects |= CFE_ITALIC; if (lf.lfUnderline) cfm.dwEffects |= CFE_UNDERLINE; if (lf.lfStrikeOut) cfm.dwEffects |= CFE_STRIKEOUT; cfm.crTextColor = (COLORREF)cf.rgbColors; cfm.bPitchAndFamily = lf.lfPitchAndFamily; cfm.bCharSet = lf.lfCharSet; strcpy(cfm.szFaceName, lf.lfFaceName); if(SendMessage(hEdit, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&cfm) == 0) { MessageBox(hEdit, "失敗です", "Error", MB_OK); return FALSE; } } SetFocus(hEdit); return TRUE; } BOOL SetCenter(HWND hEdit) { PARAFORMAT pf; memset(&pf, 0, sizeof(PARAFORMAT)); pf.cbSize = sizeof(PARAFORMAT); pf.dwMask = PFM_ALIGNMENT; pf.wAlignment = PFA_CENTER; SendMessage(hEdit, EM_SETPARAFORMAT, 0, (LPARAM)&pf); SetFocus(hEdit); return TRUE; } BOOL SetLeft(HWND hEdit) { PARAFORMAT pf; memset(&pf, 0, sizeof(PARAFORMAT)); pf.cbSize = sizeof(PARAFORMAT); pf.dwMask = PFM_ALIGNMENT; pf.wAlignment = PFA_LEFT; SendMessage(hEdit, EM_SETPARAFORMAT, 0, (LPARAM)&pf); SetFocus(hEdit); return TRUE; } BOOL SetRight(HWND hEdit) { PARAFORMAT pf; memset(&pf, 0, sizeof(PARAFORMAT)); pf.cbSize = sizeof(PARAFORMAT); pf.dwMask = PFM_ALIGNMENT; pf.wAlignment = PFA_RIGHT; SendMessage(hEdit, EM_SETPARAFORMAT, 0, (LPARAM)&pf); SetFocus(hEdit); return TRUE; } void ClearCheck(HMENU hMenu) { CheckMenuItem(hMenu, IDM_LEFT, MF_BYCOMMAND | MF_UNCHECKED); CheckMenuItem(hMenu, IDM_RIGHT, MF_BYCOMMAND | MF_UNCHECKED); CheckMenuItem(hMenu, IDM_CENTER, MF_BYCOMMAND | MF_UNCHECKED); return; } void RTF_Save(HWND hEdit) { EDITSTREAM eds; HANDLE hFile; if (strcmp(szFName, "") == 0) { MessageBox(hEdit, "ファイル名を設定してください", "ファイル名", MB_OK); RTF_SaveAs(hEdit); } hFile = CreateFile(szFName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_WRITE_THROUGH, NULL); eds.dwCookie = (DWORD)hFile; eds.dwError = 0; eds.pfnCallback = MySaveProc; switch (nFileType) { case 1: SendMessage(hEdit, EM_STREAMOUT, (WPARAM)SF_RTF, (LPARAM)&eds); break; case 2: SendMessage(hEdit, EM_STREAMOUT, (WPARAM)SF_TEXT, (LPARAM)&eds); break; default: MessageBox(hEdit, "Error", "ok", MB_OK); break; } CloseHandle(hFile); SendMessage(hEdit, EM_SETMODIFY, (WPARAM)FALSE, 0); return; } void RTF_SaveAs(HWND hEdit) { OPENFILENAME of; HWND hParent; char szTitle[MAX_PATH]; memset(&of, 0, sizeof(OPENFILENAME)); of.lStructSize = sizeof(OPENFILENAME); of.hwndOwner = hEdit; of.lpstrFilter = "RTF(*.rtf)\0 *.rtf\0TEXT(*.txt)\0 *.txt\0\0"; of.lpstrFile = szFName; of.nMaxFile = MAX_PATH; of.Flags = OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT | OFN_HIDEREADONLY; of.lpstrDefExt = "rtf"; if (GetSaveFileName(&of)) { nFileType = of.nFilterIndex; RTF_Save(hEdit); } hParent = GetParent(hEdit); strcpy(szTitle, szAppTitle); strcat(szTitle, " ["); strcat(szTitle, szFName); strcat(szTitle, "]"); SetWindowText(hParent, szTitle); return; } DWORD CALLBACK MySaveProc(DWORD dwCookie, LPBYTE pbbuf, LONG cb, LONG *pcb) { if (WriteFile((HANDLE)dwCookie, pbbuf, cb, (LPDWORD)pcb, NULL)) return FALSE; else return TRUE; } void RTF_Open(HWND hEdit) { OPENFILENAME of; HANDLE hFile; EDITSTREAM eds; HWND hParent; char szTitle[MAX_PATH]; int id; if (SendMessage(hEdit, EM_GETMODIFY, 0, 0)) { id = MessageBox(hEdit, "文書が変更されています。\n保存しますか?", "注意!", MB_OKCANCEL | MB_ICONQUESTION); if (id == IDOK) RTF_Save(hEdit); SetFocus(hEdit); } memset(&of, 0, sizeof(OPENFILENAME)); of.lStructSize = sizeof(OPENFILENAME); of.hwndOwner = hEdit; of.lpstrFilter = "RTF(*.rtf)\0 *.rtf\0TEXT(*.txt)\0 *.txt\0\0"; of.lpstrFile = szFName; of.nMaxFile = MAX_PATH; of.Flags = OFN_PATHMUSTEXIST; of.lpstrDefExt = "rtf"; if (GetOpenFileName(&of) == 0) return; nFileType = of.nFilterIndex; hFile = CreateFile(szFName, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile == INVALID_HANDLE_VALUE) { MessageBox(hEdit, "ハンドルが無効です", "Error", MB_OK); return; } eds.dwCookie = (DWORD)hFile; eds.dwError = 0; eds.pfnCallback = MyReadProc; switch (nFileType) { case 1: SendMessage(hEdit, EM_STREAMIN, SF_RTF, (LPARAM)&eds); break; case 2: SendMessage(hEdit, EM_STREAMIN, SF_TEXT, (LPARAM)&eds); break; } SendMessage(hEdit, EM_SETMODIFY, (WPARAM)FALSE, 0); CloseHandle(hFile); strcpy(szTitle, szAppTitle); strcat(szTitle, " ["); strcat(szTitle, szFName); strcat(szTitle, "]"); hParent = GetParent(hEdit); SetWindowText(hParent, szTitle); return; } DWORD CALLBACK MyReadProc(DWORD dwCookie, LPBYTE pbBuf, LONG cb, LONG *pcb) { ReadFile((HANDLE)dwCookie, pbBuf, cb, (LPDWORD)pcb, NULL); return(FALSE); } void RTF_CheckMenu(HWND hEdit, HMENU hMenu) { CHARRANGE cr; PARAFORMAT pf; SendMessage(hEdit, EM_EXGETSEL, 0, (LPARAM)&cr); if (cr.cpMin == cr.cpMax) { EnableMenuItem(hMenu, IDM_CUT, MF_GRAYED | MF_BYCOMMAND); EnableMenuItem(hMenu, IDM_COPY, MF_GRAYED | MF_BYCOMMAND); } else { EnableMenuItem(hMenu, IDM_CUT, MF_ENABLED | MF_BYCOMMAND); EnableMenuItem(hMenu, IDM_COPY, MF_ENABLED | MF_BYCOMMAND); } if (SendMessage(hEdit, EM_GETMODIFY, 0, 0)) { EnableMenuItem(hMenu, IDM_UNDO, MF_ENABLED | MF_BYCOMMAND); } else { EnableMenuItem(hMenu, IDM_UNDO, MF_GRAYED | MF_BYCOMMAND); } if (SendMessage(hEdit, EM_CANPASTE, 0, 0)) { EnableMenuItem(hMenu, IDM_PASTE, MF_ENABLED | MF_BYCOMMAND); } else { EnableMenuItem(hMenu, IDM_PASTE, MF_GRAYED | MF_BYCOMMAND); } memset(&pf, 0, sizeof(PARAFORMAT)); pf.cbSize = sizeof(PARAFORMAT); SendMessage(hEdit, EM_GETPARAFORMAT, 0, (LPARAM)&pf); ClearCheck(hMenu); switch (pf.wAlignment) { case PFA_LEFT: CheckMenuItem(hMenu, IDM_LEFT, MF_CHECKED | MF_BYCOMMAND); break; case PFA_RIGHT: CheckMenuItem(hMenu, IDM_RIGHT, MF_CHECKED | MF_BYCOMMAND); break; case PFA_CENTER: CheckMenuItem(hMenu, IDM_CENTER, MF_CHECKED | MF_BYCOMMAND); break; } return; }

この部分は特に変更はありません。

void RTF_Print(HWND hEdit) { static FORMATRANGE fr; DOCINFO di; HDC hdc; LONG lTextLen; LONG lNextMin = 0; int nPage = 1; //印刷ページ memset(&fr, 0, sizeof(FORMATRANGE)); memset(&di, 0, sizeof(DOCINFO)); di.cbSize = sizeof(DOCINFO); if (strcmp(szFName, "") == 0) di.lpszDocName = "No Title"; else GetFileTitle(szFName, (LPTSTR)di.lpszDocName, sizeof(di.lpszDocName)); hdc = GetPrintInfo(); if (hdc == 0) { MessageBox(hEdit, "プリンタが取得できません", "Error", MB_OK | MB_ICONASTERISK); return; } fr.hdc = hdc; fr.hdcTarget = hdc; fr.rcPage.left = 0; fr.rcPage.top = 0; fr.rcPage.right = MulDiv(GetDeviceCaps(hdc, PHYSICALWIDTH), 1440, GetDeviceCaps(hdc, LOGPIXELSX)); fr.rcPage.bottom = MulDiv(GetDeviceCaps(hdc, PHYSICALHEIGHT), 1440, GetDeviceCaps(hdc, LOGPIXELSY)); //用紙の上下左右は1インチ(1440twip)あけて印刷 fr.rc.top = 1440; fr.rc.left = 1440; fr.rc.right = fr.rcPage.right - 1440; fr.rc.bottom = fr.rcPage.bottom -1440; lTextLen = SendMessage(hEdit, WM_GETTEXTLENGTH, 0, 0); fr.chrg.cpMin = 0; fr.chrg.cpMax = lTextLen; StartDoc(hdc, &di); while (fr.chrg.cpMin < lTextLen) { lNextMin = SendMessage(hEdit, EM_FORMATRANGE, TRUE, (LPARAM)&fr); StartPage(hdc); SendMessage(hEdit, EM_DISPLAYBAND, 0, (LPARAM)&fr.rc); RTF_AddPageNo(hdc, nPage); EndPage(hdc); fr.chrg.cpMin = lNextMin; nPage++; } SendMessage(hEdit, EM_FORMATRANGE, TRUE, NULL); EndDoc(hdc); DeleteDC(hdc); return; }

SendMessage(hEdit, EM_FORMATRANGE, ....);
StartPage(hdc);
SendMessage(hEdit, EM_DISPLAYBAND, ...);
EndPage(hdc);
がループになっていて1ページ分を印刷します。 また、このループの中に自作関数RTF_AddPageNoをいれて、 ページの印刷をさせています。

int PrinterSet(HWND hEdit) { HANDLE hPrint; GetPrintInfo(); OpenPrinter(prninfo[0].pPrinterName, &hPrint, NULL); PrinterProperties(hEdit, hPrint); ClosePrinter(hPrint); return 0; } HDC GetPrintInfo(void) { DWORD dwNeeded, dwReturned; if (EnumPrinters(PRINTER_ENUM_DEFAULT, NULL, 5, (LPBYTE)&prninfo, sizeof(prninfo), &dwNeeded, &dwReturned)) { return CreateDC(NULL, prninfo[0].pPrinterName, NULL, NULL); } return 0; } void RTF_All(HWND hEdit) { CHARRANGE cr; cr.cpMin = 0; cr.cpMax = -1; SendMessage(hEdit, EM_EXSETSEL, 0, (LPARAM)&cr); return; }

これは、前回と同じです。

int RTF_AddPageNo(HDC hdc, int nPage) { int wx, wy, x, y; char szPage[64]; char *szPage_Org = "-- %d --"; int nTextW; //テキストの幅 TEXTMETRIC tm; wx = GetDeviceCaps(hdc, PHYSICALWIDTH); wy = GetDeviceCaps(hdc, PHYSICALHEIGHT); wsprintf(szPage, szPage_Org, nPage); GetTextMetrics(hdc, &tm); nTextW = (int)tm.tmAveCharWidth * strlen(szPage); x = (wx - nTextW) / 2; y = 40; TextOut (hdc, x, y, szPage, strlen(szPage)); return nPage; }

これは、最初に説明したページ番号を印刷する関数です。 この関数の引数をもっと増やして印刷する場所、文字列を 呼び出し側で自由に設定できるようにしてみてください。 そのためには印刷の設定ダイアログも作る必要がありますね。 y = 40;というのは用紙の上の方ということで筆者が勝手に 設定した値です。これもきちんと計算してください。 (本文が印刷される部分と重ならないように)

void RTF_SetWYSIWYG(HWND hEdit) { HDC hdc; //プリンタのhdc int nPrnW; int nLog; int w; //RTFに設定する横幅(twip) hdc = GetPrintInfo(); nPrnW = GetDeviceCaps(hdc, PHYSICALWIDTH); nLog = GetDeviceCaps(hdc, LOGPIXELSX); //左右1インチあけるので1440*2(twip)引く w = MulDiv(nPrnW, 1440, nLog) - 1440 * 2; if (SendMessage(hEdit, EM_SETTARGETDEVICE, (WPARAM)hdc, (LPARAM)w) == 0) MessageBox(hEdit, "RTF横幅設定でエラーが発生しました", "ERROR", MB_OK); return;

EM_SETTARGEDEVICEメッセージを送るときのWPARAMの値に 注意してください。twip単位です。また、今回のプログラムでは 左右に1インチの余白を設けているので2インチ分引くことも忘れないで ください。デバイス単位をtwip単位に変換する方法は 前章を参照してください。

void RTF_New(HWND hEdit) { char szTitle[MAX_PATH]; int id; if (SendMessage(hEdit, EM_GETMODIFY, 0, 0)) { id = MessageBox(hEdit, "文書が変更されています。\n保存しますか?", "注意!", MB_OKCANCEL | MB_ICONQUESTION); if (id == IDOK) RTF_Save(hEdit); } SetWindowText(hEdit, ""); strcpy(szTitle, szAppTitle); strcat(szTitle, " [ 無題 ]"); SetWindowText(GetParent(hEdit), szTitle); SendMessage(hEdit, EM_SETMODIFY, FALSE, 0); SetFocus(hEdit); return; }

「新規作成」コマンドの中身です。

さて、今回で印刷部分が少しましなものになってきました。 しかし、まだまだ不満の多いプログラムです。


[SDK第2部 Index] [総合Index] [Previous Chapter] [Next Chapter]

Update 10/Aug/1998 By Y.Kumei
当ホーム・ページの一部または全部を無断で複写、複製、 転載あるいはコンピュータ等のファイルに保存することを禁じます。