+    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
+)