;----------------------------------------------------------------------
; PROC MaxWin() - Maximize the current window       Paradox for DOS 4.5
;----------------------------------------------------------------------
PROC MaxWin()
   WINDOW HANDLE CURRENT TO winhndl
   DYNARRAY winatts[]
   winatts["MAXIMIZED"] = TRUE
   IF ISFORMVIEW() THEN
      winatts["HASFRAME"] = FALSE
   ELSE
      winatts["HASFRAME"] = TRUE
   ENDIF
   WINDOW SETATTRIBUTES winhndl FROM winatts
ENDPROC

;----------------------------------------------------------------------
; PROC MaxWin1() - Maximize the current window     Paradox for DOS 4.5
; Checks first for a valid current window handle.
;----------------------------------------------------------------------
PROC MaxWin1()
winhndl = GetWindow()
IF IsWindow( winhndl ) THEN
   DYNARRAY winatts[]
   winatts["MAXIMIZED"] = TRUE
   IF Imagetype() = "Display" THEN
      IF ISFORMVIEW() THEN
         winatts["HASFRAME"] = FALSE
      ELSE
         winatts["HASFRAME"] = TRUE
      ENDIF
   ENDIF
   WINDOW SETATTRIBUTES winhndl FROM winatts
ENDIF
ENDPROC