Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Satyapal Singh
  Where is Satyapal Singh?
 DELHI
 India
 Satyapal Singh
 Tags
Subject: menu (Urgent Please)
Thread ID: 50865 Message ID: 50865 # Views: 4 # Ratings: 0
Version: Visual FoxPro 6 Category: Menus
Date: Monday, September 06, 2004 3:15:18 PM         
   


hi.

can anyone help me please.......... I am appending my small menu prg below.

my problem is that when i am running the menu it works fine even when I click on file it also run the form which i want to run but one that form cursor dosn't appear.

Please advise what to do

Thanks in advance
regards
satyapal

clea
set talk off
public sp

sp=.f.

set sysm automatic
set century on
set date british

modify window screen title 'Entry Module'
@ 0.000, 0.000 FILL TO 32.500,130.400 COLOR RGB(,,,0,128,128)



* *********************************************************
* *
* * Menu Definition
* *
* *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1bj12swy1 OF _MSYSMENU PROMPT "\<File" COLOR SCHEME 3 ;
KEY ALT+F, ""
ON PAD _1bj12swy1 OF _MSYSMENU ACTIVATE POPUP file

DEFINE POPUP file MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF file PROMPT "\<Data Entry"
DEFINE BAR 2 OF file PROMPT "E\<xit"
ON SELECTION BAR 1 OF file ;
DO _1bj12swy3 ;
IN LOCFILE("..\..\HOTEL\AA" ,"MPX;MPR|FXP;PRG" ,"WHERE is AA?")
ON SELECTION BAR 2 OF file ;
DO _1bj12swy4 ;
IN LOCFILE("..\..\HOTEL\AA" ,"MPX;MPR|FXP;PRG" ,"WHERE is AA?")


* *********************************************************
* *
* * Cleanup Code & Procedures
* *
* *********************************************************
*

read valid sp
set sysm on
set sysm to defa


* *********************************************************
* *
* * _1BJ12SWY3 ON SELECTION BAR 1 OF POPUP file
* *
* * Procedure Origin:
* *
* * From Menu: AA.MPR, Record: 5
* * Called By: ON SELECTION BAR 1 OF POPUP file
* * Prompt: Data Entry
* * Snippet: 1
* *
* *********************************************************
*
PROCEDURE _1bj12swy3
do form c:\hotel\forms\hotel.scx
return



* *********************************************************
* *
* * _1BJ12SWY4 ON SELECTION BAR 2 OF POPUP file
* *
* * Procedure Origin:
* *
* * From Menu: AA.MPR, Record: 6
* * Called By: ON SELECTION BAR 2 OF POPUP file
* * Prompt: Exit
* * Snippet: 2
* *
* *********************************************************
*
PROCEDURE _1bj12swy4
CLEA
set sysm to defa
MODIFY WINDOW SCREEN
QUIT





ENTIRE THREAD

menu (Urgent Please) Posted by Satyapal Singh @ 9/6/2004 3:15:18 PM
RE: menu (Urgent Please) Posted by Pete Sass @ 9/8/2004 1:17:28 PM
RE: menu (Urgent Please) Posted by Satyapal Singh @ 9/13/2004 9:09:24 AM
RE: menu (Urgent Please) Posted by Pete Sass @ 9/13/2004 6:35:17 PM
RE: menu (Urgent Please) Posted by viorel grafu @ 9/15/2004 7:44:55 AM
RE: menu (Urgent Please) Posted by Satyapal Singh @ 9/16/2004 8:45:54 AM
RE: menu (Urgent Please) Posted by viorel grafu @ 9/16/2004 9:59:45 AM
RE: menu (Urgent Please) Posted by viorel grafu @ 9/16/2004 10:05:10 AM
RE: menu (Urgent Please) Posted by Satyapal Singh @ 9/24/2004 8:05:05 AM