=================================================================== RCS file: /home/cvs/OpenXM_contrib2/windows/asir32gui/asir32guiview.cpp,v retrieving revision 1.14 retrieving revision 1.18 diff -u -p -r1.14 -r1.18 --- OpenXM_contrib2/windows/asir32gui/asir32guiview.cpp 2005/10/03 00:07:53 1.14 +++ OpenXM_contrib2/windows/asir32gui/asir32guiview.cpp 2008/05/02 02:12:47 1.18 @@ -93,7 +93,7 @@ CAsir32guiView::CAsir32guiView() { // TODO: この場所に構築用のコードを追加してください。 static int tmpView_created = 0; - char errmsg[BUFSIZ]; + char errmsg[BUFSIZ],view_handle[BUFSIZ]; init_input_history(); read_input_history(); @@ -203,9 +203,7 @@ void CAsir32guiView::DeleteChar(int count) { if ( count > (EndPos-CurrentPos) ) count = EndPos - CurrentPos; - if ( count == 0 ) - Beep(); - else { + if ( count > 0 ) { EndPos -= count; for ( i = CurrentPos; i < EndPos; i++ ) Buffer[i] = Buffer[i+count]; @@ -718,4 +716,30 @@ void CAsir32guiView::OnTodoparametrize() sprintf(helpfile,"%s\\help\\todo_parametrizehelp.chm",root); ::HtmlHelp(NULL, helpfile, HH_DISPLAY_TOPIC, 0); +} + +BOOL CAsir32guiView::Create(LPCTSTR lpszClassName, LPCTSTR lpszWindowName, DWORD dwStyle, const RECT& rect, CWnd* pParentWnd, UINT nID, CCreateContext* pContext) +{ + // TODO: この位置に固有の処理を追加するか、または基本クラスを呼び出してください + + BOOL ret = CWnd::Create(lpszClassName, lpszWindowName, dwStyle, rect, pParentWnd, nID, pContext); + FILE *fp = fopen("asirgui.hnd","w"); + char *temp; + + if ( fp ) { + fprintf(fp,"%d",(unsigned int)theView->m_hWnd); + fclose(fp); + if ( temp = getenv("TEMP") ) { + int len; + char *name; + + len = strlen(temp); + name = (char *)malloc(len+BUFSIZ); + sprintf(name,"%s\\asirgui.hnd",temp); + fopen(name,"w"); + fprintf(fp,"%d",(unsigned int)theView->m_hWnd); + fclose(fp); + } + } + return ret; }