Get_fcursor

Internφ programovacφ jazykC/C++Pascal

function Get_fcursor(hView : window_id; var curs : cursor; var flags : short) : Boolean;
BOOL Get_fcursor(window_id hView, tcursnum *curs, uns16 *flags);
function Get_fcursor(hView : window_id; var curs : tcursnum; var flags : uns16) : Boolean;

Parametry

hView identifikace (handle) formulß°e
curs v²stupnφ parametr: Φφslo kurzoru
flags v²stupnφ parametr: viz Parametry otev°enφ formulß°e

Popis

Funkce zφskß z otev°enΘho formulß°e Φφslo jeho kurzoru a hodnoty p°φznak∙. Tyto ·daje zapφÜe do prom∞nn²ch curs a flags.

Pokud formulß° zadan² parametrem hView vede do tabulky, pak funkce v parametru curs vrßtφ Φφslo tΘto tabulky. ╚φsla kurzor∙ zaΦφnajφ od 32768, Φφsla tabulek jsou °ßdov∞ desφtky, tak₧e je lze od sebe rozeznat: Φφslo tabulky (kurzoru) m∙₧ete p°i°adit do prom∞nnΘ typu Integer a tu pak porovnat s 32768. Pro n∞kterΘ funkce (nap°. Translate) je nutnΘ v∞d∞t, zda jejφ parametr je kurzor nebo tabulka.

Nech¥ kurzor cur1 je zdrojem dat pro formulß° id1, pak po provedenφ funkce Get_fcursor(id1,cur2,f1) majφ kurzory cur1 a cur2 stejnß Φφsla a oba jsou otev°enΘ. Zav°enφ jednoho z nich znemo₧nφ prßci s druh²m.

Parametr flags smφ mφt hodnotu NIL (NULL), pokud se p°φznaky formulß°e nemajφ zjiÜ¥ovat.

Od verze 6.0 lze k zφskßnφ hodnoty Φφsla zdroje dat pro formulß° vyu₧φt takΘ vlastnosti formulß°e CursNum.

Hodnota funkce

Funkce vracφ TRUE po ·sp∞ÜnΘm provedenφ akce, jinak vracφ FALSE.

P°φklad

ve formulß°i id obΦas poklßdßme QBE dotaz. S jednφm z vybran²ch zßznam∙ formulß°e id (do tabulky nebo do kurzoru vzniklΘho odpov∞dφ QBE) chceme dßle pracovat:

      Get_view_pos(id, ic, ac);
/* zjiÜt∞nφ pozice zßznamu */
      Get_fcursor(id, curs1, nil);
/* zjiÜt∞nφ kurzoru nebo tabulky, do nφ₧ vede formulß° id */
      integ := curs1;
/* p°i°azenφ Φφsla kurzoru nebo tabulky do prom. typu Integer */
      if integ >= 32768 then
         Translate(curs1, ac, 0, cislo)
      else cislo : = ac;
/* p°epoΦtenφ pozice zßznamu ac v kurzoru curs1 na pozici tabulky, do nφ₧ vedl formulß° id */

Viz