I´m getting the error :
"Error FiveWin/6 Cannot create window or control"
Could anyone explains why can´t I do this ?
Sample code :

INCLUDE "FIVEWIN.CH"

PROCEDURE MAIN()
oDLG_MAIN := TWINDOW():NEW(,,,,"Test")
ACTIVATE WINDOW oDLG_MAIN ON INIT( TEST2() )
RETURN NIL

FUNCTION TEST2()
LOCAL oDialog
DEFINE DIALOG oDialog TITLE "Test2"
DEFINE MESSAGE oMessage OF oDialog PROMPT "Test2 Footer"
ACTIVATE DIALOG oDialog
RETURN

EnricoMaria wrote:

Code: Select all Collapse

#INCLUDE "FIVEWIN.CH" 

PROCEDURE MAIN() 
LOCAL oDLG_MAIN := TWINDOW():NEW(,,,,"Test"), oMessage
ACTIVATE WINDOW oDLG_MAIN ON INIT( TEST2() ) 
RETURN

FUNCTION TEST2() 
LOCAL oDialog, oMessage
DEFINE DIALOG oDialog TITLE "Test2" 
//DEFINE MESSAGE oMessage OF oDialog PROMPT "Test2 Footer" 
ACTIVATE DIALOG oDialog ON INIT TEST3( oDialog )
RETURN NIL

FUNCTION TEST3( oDialog )

    LOCAL oMessage

    DEFINE MESSAGE oMessage OF oDialog PROMPT "Test2 Footer" 

    RETURN NIL

EMG

DEFINE WINDOW oDialog TITLE "Test2"
DEFINE MESSAGE oMessage OF oDialog PROMPT "Test2 Footer" 
ACTIVATE DIALOG oDialog ON INIT TEST3( oDialog )

A WINDOW and a DIALOG are different things from the API point of view. Therefore you can't use a DIALOG exactly as it were a WINDOW.

EMG