Funkce Set_fcursor

Set_fcursor

function Set_fcursor(hView : window_id; curs : tcursnum; flags : short) : Boolean;
BOOL Set_fcursor(window_id hView, tcursnum curs, uns32 flags);
function Set_fcursor(hView : window_id; curs : tcursnum; flags : uns32) : Boolean;

Parametry

hView	identifikace (handle) formulß°e
curs	otev°en² pevn² nebo prom∞nn² kurzor
flags	viz Parametry otev°enφ formulß°e

Popis

Funkce p°esm∞ruje ji₧ otev°en² formulß° hView na nov² kurzor curs a p°edß formulß°i novΘ parametry flags. Kurzor curs musφ mφt stejnΘ slo₧ky jako kurzor, nad nim₧ je formulß° otev°en, jinak je chovßnφ WinBase602 nedefinovßno.

Je-li mezi parametry flags po₧adavek na uzav°enφ kurzoru p°i uzavφrßnφ formulß°e (AUTO_CURSOR), pak se vztahuje ji₧ k novΘmu kurzoru curs. Je-li flags rovno -1, p°evezmou se p∙vodnφ parametry formulß°e.

P°ed zavolßnφm funkce Set_fcursor je nutnΘ pomocφ Get_fcursor a Close_cursor zav°φt p∙vodnφ kurzor formulß°e. V opaΦnΘm p°φpad∞ z∙stane kurzor otev°en² a₧ do konce b∞hu programu a blokuje mφsto v pam∞ti.

Pro provedenφ funkce Set_fcursor je rozumnΘ volat proceduru Reset_view.

Od verze 6.0 lze ke zm∞n∞ zdroje dat pro formulß° (a s velkou v²hodou pro subformulß°) vyu₧φt takΘ vlastnosti formulß°e CursNum.

Hodnota funkce

Funkce vracφ TRUE po ·sp∞ÜnΘm provedenφ akce, jinak vracφ FALSE. Hodnota funkce ne°φkß nic o tom, zda formulß° bude schopen s dodan²m kurzorem pracovat.

P°φklad

sel := 'select * from Tab1 where ...' ;
if Open_sql_cursor(c2,sel) then Signalize;

Open_view('*pvybrsuper',no_redir,0,0,0,id_vyb);
{ otev°enφ formulß°e se subformulß°em }
id_subvyb := GetDlgItem(id_vyb,3);
{ zjiÜt∞nφ id subformulß°e - pozor! externφ funkce}
if Get_fcursor(id_subvyd,cx,fx) then
   Close_cursor(cx);
{ zav°enφ p∙vodnφho kurzoru }
if Set_fcursor(id_subvyb,c2,-1) then
   Reset_view(id_subvyb,-1,1);
{ vnucenφ kurzoru c2 subformulß°i}

Viz

Get_fcursor