+ if (pParent)
+ pParent->AddChild(this);
+ if (vId == -1)
+ m_windowId = NewControlId();
+ else
+ m_windowId = vId;
+ if (lX < 0)
+ lX = wxDIALOG_DEFAULT_X;
+ if (lY < 0)
+ lY = wxDIALOG_DEFAULT_Y;
+ m_windowStyle = lStyle;
+ if (lWidth < 0)
+ lWidth = wxDIALOG_DEFAULT_WIDTH;
+ if (lHeight < 0)
+ lHeight = wxDIALOG_DEFAULT_HEIGHT;
+
+ //
+ // All dialogs should really have this style
+ //
+ m_windowStyle |= wxTAB_TRAVERSAL;
+
+ //
+ // Allows creation of dialogs with & without captions under MSWindows,
+ // resizeable or not (but a resizeable dialog always has caption -
+ // otherwise it would look too strange)
+ //
+ if (lStyle & wxRESIZE_BORDER )
+ zDlg = "wxResizeableDialog";
+ else if (lStyle & wxCAPTION )
+ zDlg = "wxCaptionDialog";
+ else
+ zDlg = "wxNoCaptionDialog";
+ OS2Create( GetWinHwnd(pParent)
+ ,NULL
+ ,rsTitle.c_str()
+ ,0L
+ ,lX
+ ,lY
+ ,lWidth
+ ,lHeight
+ ,GetWinHwnd(pParent)
+ ,HWND_TOP
+ ,(long)m_windowId
+ ,NULL
+ ,NULL
+ );
+ hWnd = (HWND)GetHWND();
+ if (!hWnd)
+ {
+ return FALSE;
+ }
+ SubclassWin(GetHWND());
+ ::WinSetWindowText( hWnd
+ ,(PSZ)rsTitle.c_str()
+ );
+ SetFont(wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT));
+ return TRUE;
+} // end of wxDialog::Create
+
+void wxDialog::SetModal(
+ bool bFlag
+)