[Ttssh2-commit] [5187] listboxマクロコマンドのリストボックスのアイテムが長いと見えなくなるので、内容を横スクロールできるようにした

svnno****@sourc***** svnno****@sourc*****
2013年 4月 4日 (木) 00:07:45 JST


Revision: 5187
          http://sourceforge.jp/projects/ttssh2/scm/svn/commits/5187
Author:   maya
Date:     2013-04-04 00:07:45 +0900 (Thu, 04 Apr 2013)
Log Message:
-----------
listboxマクロコマンドのリストボックスのアイテムが長いと見えなくなるので、内容を横スクロールできるようにした

Modified Paths:
--------------
    trunk/teraterm/ttpmacro/ListDlg.cpp
    trunk/teraterm/ttpmacro/ttpmacro.rc

-------------- next part --------------
Modified: trunk/teraterm/ttpmacro/ListDlg.cpp
===================================================================
--- trunk/teraterm/ttpmacro/ListDlg.cpp	2013-04-03 14:45:20 UTC (rev 5186)
+++ trunk/teraterm/ttpmacro/ListDlg.cpp	2013-04-03 15:07:45 UTC (rev 5187)
@@ -57,6 +57,10 @@
 	char uimsg[MAX_UIMSG], uimsg2[MAX_UIMSG];
 	LOGFONT logfont;
 	HFONT font;
+	int ListMaxWidth = 0;
+	int ListWidth;
+	CDC *pDC;
+	CFont *pOldFont;
 
 	CDialog::OnInitDialog();
 
@@ -77,13 +81,24 @@
 	get_lang_msg("BTN_CANCEL", uimsg, sizeof(uimsg), uimsg2, UILanguageFile);
 	SetDlgItemText(IDCANCEL, uimsg);
 
+	pDC = m_xcList.GetDC(); // \x83\x8A\x83X\x83g\x83{\x83b\x83N\x83X\x82\xF0\x89\xA1\x83X\x83N\x83\x8D\x81[\x83\x8B\x82ł\xAB\x82\xE9\x82悤\x82ɍő啝\x82\xF0\x8E擾
+	pOldFont = pDC->SelectObject(m_xcList.GetFont());
+
 	p = m_Lists;
 	while (*p) {
 		m_xcList.InsertString(-1, _T(*p));
+		ListWidth = pDC->GetTextExtent(*p).cx;
+		if (ListWidth > ListMaxWidth) {
+			ListMaxWidth = ListWidth;
+		}
 		p++;
 	}
-    UpdateData(FALSE);
+	UpdateData(FALSE);
 
+	m_xcList.SetHorizontalExtent(ListMaxWidth + 5);
+	pDC->SelectObject(pOldFont);
+	ReleaseDC(pDC);
+
 	// 1\x82‚߂\xF0\x91I\x91\xF0\x8F\xF3\x91Ԃɂ\xB7\x82\xE9\x81B
 	m_xcList.SetCurSel(0);
 

Modified: trunk/teraterm/ttpmacro/ttpmacro.rc
===================================================================
--- trunk/teraterm/ttpmacro/ttpmacro.rc	2013-04-03 14:45:20 UTC (rev 5186)
+++ trunk/teraterm/ttpmacro/ttpmacro.rc	2013-04-03 15:07:45 UTC (rev 5187)
@@ -12,7 +12,6 @@
 /////////////////////////////////////////////////////////////////////////////
 #undef APSTUDIO_READONLY_SYMBOLS
 
-
 /////////////////////////////////////////////////////////////////////////////
 // \x89p\x8C\xEA (\x95č\x91) resources
 
@@ -99,13 +98,13 @@
 END
 
 IDD_LISTDLG DIALOGEX 0, 0, 186, 86
-STYLE DS_SETFONT | DS_MODALFRAME | DS_FIXEDSYS | WS_POPUP | WS_CAPTION | WS_SYSMENU
+STYLE DS_SETFONT | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
 CAPTION "Dialog"
 FONT 14, "System", 0, 0, 0x0
 BEGIN
     DEFPUSHBUTTON   "OK",IDOK,129,7,50,14
     PUSHBUTTON      "Cancel",IDCANCEL,129,24,50,14
-    LISTBOX         IDC_LISTBOX,7,7,104,49,LBS_SORT | LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP
+    LISTBOX         IDC_LISTBOX,7,7,104,49,LBS_SORT | LBS_USETABSTOPS | LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP
     LTEXT           "Static",IDC_STATIC,7,63,172,15
 END
 
@@ -180,13 +179,3 @@
 /////////////////////////////////////////////////////////////////////////////
 
 
-
-#ifndef APSTUDIO_INVOKED
-/////////////////////////////////////////////////////////////////////////////
-//
-// Generated from the TEXTINCLUDE 3 resource.
-//
-
-/////////////////////////////////////////////////////////////////////////////
-#endif    // not APSTUDIO_INVOKED
-



Ttssh2-commit メーリングリストの案内