home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 July / Chip_2001-07_cd1.bin / ctenari / Cerny / INSTALLF.EXE / rar / FREETFB / DOC / CALCFB.DOC < prev    next >
Text File  |  2001-03-01  |  2KB  |  69 lines
  1. ~16|0|05  Jednotka CalcFB.fbl
  2.  
  3.  Protoºe grafick∞ reºim Fast Building
  4.  nemàºe vypisovat ƒíselné údaje jako
  5.  ƒíselné hodnoty, jsou vτechny ƒíselné
  6.  hodnoty v programech pro v∞pis na
  7.  plochu vypisovány jako ²et╪zec. Aby
  8.  bylo moºné ƒíselné hodnoty zpracovávat
  9.  jako ²et╪zce, obsahuje tato jednotka
  10.  n╪kolik základních funkcí.
  11.  
  12.  |1|05 1.1 NumTotal('str1,'str2');
  13.  Funkce provede souƒet dvou ²et╪zcov∞ch
  14.  hodnot. V∞sledek vrací op╪t jako ²et╪zec.
  15.  P²íklad: 
  16.  |1|12 variable
  17.  |1|12    string[10]~Vysl;
  18.  
  19.  |1|12 let Vysl : NumTotal('302.50','120');
  20.  
  21.  |1|05 1.2 NumDeduct('str1','str2');
  22.  Funkce provede odeƒtení dvou ²et╪zcov∞ch
  23.  hodnot str1 - str2. V∞sledek vrátí op╪t
  24.  jako ²et╪zec.
  25.  |1|12 variable
  26.  |1|12    string[10]~Vysl;
  27.  
  28.  |1|12 let Vysl : NumDeduct('302.50','120');
  29.  
  30.  |1|05 1.3 NumDivision('str1','str2');
  31.  Vyd╪lí dv╪ ²et╪zcové hodnoty str1 : str2.
  32.  V∞sledek vrátí op╪t jako ²et╪zec.
  33.  |1|12 variable
  34.  |1|12    string[10]~Vysl;
  35.  
  36.  |1|12 let Vysl : NumDivision('300','12');
  37.  
  38.  |1|05 1.4 NumMultiply('str1','str2');
  39.  Vynásobí dv╪ ²etezcové hodnoty str1 x str2.
  40.  V∞sledek vrátí op╪t jako ²et╪zec.
  41.  |1|12 variable
  42.  |1|12    string[10]~Vysl;
  43.  
  44.  |1|12 let Vysl : NumMultiply('120','12');
  45.  
  46.  |1|05 1.5 HexToWord('str');
  47.  P²evede ƒíslo tvaru Hexa (²et╪zec) do tvaru
  48.  word (ƒíseln∞ tvar).
  49.  |1|12 variable
  50.  |1|12    Word~Vysl;
  51.  
  52.  |1|12 let Vysl : HexToWord('22D9');
  53.  
  54.  |1|05 1.6 LongToHexa(HL,4);
  55.  P²evede ƒíselnou hodnotu do tvaru Hexa na
  56.  uveden∞ poƒet míst (v tomto p²ípad╪ ƒty²místné).
  57.  |1|12 variable
  58.  |1|12    string~Vysl;
  59.  
  60.  |1|12 let Vysl : LongToHexa(9821,4);
  61.  
  62.  |1|05 1.7 CalculatXY(X,Y);
  63.  Malá kalkulaƒka vyuºívající v∞τe uvedené funkce.
  64.  Kalkulaƒku je moºné na ploτe p²emístit kliknutím
  65.  prav∞m tlaƒítkem v oblasti displeje. Po p²emíst╪ní
  66.  se kalkulaƒka umístí na vybranou plochu kliknutím
  67.  lev∞m tlaƒítkem.
  68.  
  69.