IsMainMenuDefined()
  

Determine if a main menu window is defined.

SYNTAX

IsMainMenuDefined ( cFormName ) --> lBoolean

EXAMPLES


#include "minigui.ch"

PROCEDURE Test

LOCAL FormName AS STRING := "Form_1"

IF !IsWIndowDefined ( &FormName )

DEFINE WINDOW &FormName ;
AT 0,0 ;
WIDTH 400 ;
HEIGHT 200 ;
TITLE 'Hello World!' ;
MAIN

IF IsMainMenuDefined ( FormName )
      RELEASE MAIN MENU OF Form_1
ENDIF
DEFINE MAIN MENU OF Form_1
.........
END MENU

END WINDOW

ACTIVATE WINDOW &FormName

ENDIF

RETURN