meniu.bak

来自「Acesta a fost un proiect de semestru pen」· BAK 代码 · 共 70 行

*       *********************************************************
*       *                                                         
*       * 07/15/04              MENIU.MPR               17:04:19  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2004 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1a910la2q OF _MSYSMENU PROMPT "\<Iesire" COLOR SCHEME 3 ;
	KEY ALT+I, ""
DEFINE PAD _1a910la2r OF _MSYSMENU PROMPT "\<Adaugare" COLOR SCHEME 3 ;
	KEY ALT+A, ""
DEFINE PAD _1a910la2s OF _MSYSMENU PROMPT "\<Stergere" COLOR SCHEME 3 ;
	KEY ALT+S, ""
DEFINE PAD _1a910la2t OF _MSYSMENU PROMPT "I\<mprumutare carti" COLOR SCHEME 3 ;
	KEY ALT+M, ""
DEFINE PAD _1a910la2u OF _MSYSMENU PROMPT "\<Primire carti" COLOR SCHEME 3 ;
	KEY ALT+P, ""
DEFINE PAD _1a910la2v OF _MSYSMENU PROMPT "\<Despre" COLOR SCHEME 3 ;
	KEY ALT+D, ""
ON SELECTION PAD _1a910la2q OF _MSYSMENU ;
	DO _1a910la2w ;
	IN LOCFILE("D:\LUCRU\AN III\SEM II\BD (BAZE DE DATE)\PROGRAME\PROIECT PRACTICA CIPRIAN SLEVOACA\GESTIUNE BIBLIOTECA\MENIU" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENIU?")
ON PAD _1a910la2r OF _MSYSMENU ACTIVATE POPUP adaugare
ON PAD _1a910la2s OF _MSYSMENU ACTIVATE POPUP stergere

DEFINE POPUP adaugare MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF adaugare PROMPT "Ca\<rti"
DEFINE BAR 2 OF adaugare PROMPT "Ci\<titori"

DEFINE POPUP stergere MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF stergere PROMPT "Cititor"


*       *********************************************************
*       *                                                         
*       * _1A910LA2W  ON SELECTION PAD                            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  MENIU.MPR,            Record:    3          
*       * Called By:  ON SELECTION PAD                            
*       * Prompt:     Iesire                                      
*       * Snippet:    1                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _1a910la2w
hide meniu