home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 July / Chip_2001-07_cd1.bin / ctenari / Cerny / INSTALLF.EXE / rar / FREETFB / DOC / MENUFB.DOC < prev    next >
Text File  |  2001-03-05  |  3KB  |  76 lines
  1. ~16|0|05 MenuFB.fbl
  2.  
  3.  
  4.  |1|05 M.1  NewMenu;
  5.  P²ipraví a nastaví pot²ebné prom╪nné a datové pole
  6.  na poƒáteƒní hodnoty.
  7.  
  8.  |1|05 M.2  MenuItem('Název poloºky',1,
  9.  |1|05               'informace k poloºce');
  10.   V okénkovém menu màºe b∞t maximáln╪ 20 poloºek.
  11.   Uvede se nejprve název poloºky v menu, dále hodnota
  12.   1 nebo 0 (1 = p²ed textem bude τipka vyjad²ující
  13.   dalτí volbu, 0 = p²ed textem bude pouze mezera).
  14.   Ke kaºdé poloºce je moºné uvést struƒnou informaci
  15.   o délce maximáln╪ 40 znakà, která se bude vypisovat
  16.   ve spodním informaƒním ²ádku úvodní plochy kliknutím
  17.   lev∞m tlaƒítkem myτi na název poloºky.
  18.   Aktivování poloºky se provede kliknutím prav∞m
  19.   tlaƒítkem myτi na název poloºky.
  20.  
  21.  |1|05  M.3  MenuLine;
  22.   Linka odd╪lující skupinu poloºek v menu. P²i vyhodnocení
  23.   zvolené poloºky v menu se tato linka neaktivuje, ale
  24.   zapoƒítává se do po²adí poloºek v menu.
  25.  
  26.  |1|05  A.1  AssignMenu(SS,TS,BP);
  27.   Procedura naplní datové pole a pot²ebné prom╪nné zadan∞mi
  28.   údaji stanoví barvu okna menu podle údajà SS=sv╪tl∞ stín,
  29.   TS=tmav∞ stín a BP=barva plochy okna menu a ƒeká na aktivaci.
  30.  
  31.  |1|05  O.1  OpenMenu(X,Y);
  32.  Aktivuje menu na pozicích X a Y, které urƒují lev∞ horní
  33.  roh okénka menu. Uchová plochu, kterou bude p²ekr∞vat.
  34.  
  35.  |1|05  R.1  RepMenu(X,Y);
  36.  Pouºije se v p²ípad╪ volání dalτího podmenu nebo jiné funkce,
  37.  po které má b∞t pàvodní menu znovu aktivováno pro volbu dalτí
  38.  jiné poloºky. Pro podrobn╪jτí pochopení si dob²e prohlédn╪te
  39.  soubor DEMOMENU.FBS v podadresá²i FBS.
  40.  
  41.  |1|05  S.1  SelectItem
  42.  Funkce obsluhuje aktivované menu. Kliknutím levého tlaƒítka
  43.  na poloºku v menu tuto zv∞razní a vypíτe ve spodním informaƒním
  44.  ²ádku plochy p²ípadnou informaci k poloºce. Po kliknutí prav∞m
  45.  tlaƒítkem myτi na název poloºky v menu ukonƒí svou ƒinnost
  46.  a po²adí zvolené poloºky vrací jako ƒíselnou hodnotu. Tu je
  47.  moºné po p²evedení do jiné ƒíselné prom╪nné dále zpracovávat.
  48.  P²íklad:
  49.  |0|09 NewMenu;
  50.  |0|09 MenuItem('Nahrát',1,'Nahraje vybran∞ soubor');
  51.  |0|09 MenuItem('Uloºit',1,'Uloºí tento soubor');
  52.  |0|09 MenuLine;
  53.  |0|09 MenuItem('Konec',1,'Ukonƒí program');
  54.  |0|09 AssignMenu(MLBlue,Blue,LBlue);
  55.  |0|09 OpenMenu(50,30);
  56.  |0|09 :loop>
  57.  |0|09   let VyberMenu : SelectItem;
  58.  |0|09   case VyberMenu part
  59.  |0|09     case>1 :> {..nahrání souboru...} :<
  60.  |0|09     case>2 :> {..uloºení souboru...} :<
  61.  |0|09   {poloºka 3 se ignoruje, nebo£ je pouze linka}
  62.  |0|09     case>4 :> {..ukonƒení programu...} :<
  63.  |0|09   :case<
  64.  |0|09 :loop< VyberMenu = 0;
  65.  |0|09 CloseMenu(50,30);
  66.  |0|09 FilInfoLine;
  67.  
  68.  |1|05  C.1  CloseMenu(X,Y);
  69.  Funkce po ukonƒení okénkového menu vrátí zp╪t plochu, kterou
  70.  dosud p²ekr∞valo. Protoºe je moºné vytvá²et i dalτí podmenu,
  71.  musí p²íkaz CloseMenu obsahovat pozice X a Y, podle kter∞ch jednotka
  72.  pozná, kterou plochu pàvodního pozadí má vrátit (shodné jako u
  73.  OpenMenu).
  74.  
  75.  
  76.