FiveTech Support Forums

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oDlg

    DEFINE DIALOG oDlg

    ACTIVATE DIALOG oDlg;
             ON INIT STATUSBAR( oDlg );
             CENTER

    RETURN NIL


STATIC FUNCTION STATUSBAR( oDlg )

    SET MESSAGE OF oDlg;
        TO "This is a status bar";
        TIME DATE NOINSET 2007

    RETURN NIL