Edit_view

Internφ programovacφ jazykC/C++Pascal

function Edit_view(var name : string) : Boolean;
BOOL Edit_view(cdp_t cdp, const char * name);
function Edit_view(cdp : cdp_t; name : PChar) : Boolean;

Parametry

cdp kontextovΘ prom∞nnΘ klienta
name jmΘno formulß°e nebo sestavy

Popis

Otev°e nßvrhß° pohledu ve variant∞ podle typu pohledu (formulß°, sestava atd.) na pohled jmΘnem name. Pokud tento pohled byl vytvo°en funkci Insert_object a dosud nebyl editovßn, p°ed otev°enφm nßvrhß°e projde volbou inicißlnφho stavu pohledu. Funkce skonΦφ a₧ potΘ, co u₧ivatel uzav°e nßvrhß°. Po skonΦenφ funkce vrßtφ p∙vodnφ menu.

Hodnota funkce

Funkce vracφ TRUE po ·sp∞ÜnΘm provedenφ akce, p°i chyb∞ vracφ FALSE.

P°φklad

Pokud zatφm neexistuje Ütφtek se jmΘnem labelname, je vytvo°en s prßzdnou definicφ a poslΘze na n∞j otev°en nßvrhß°. Pokud ji₧ existuje, je otev°en nßvrhß° na n∞j.

if (editview = 1) and (labelsize = 10) then  begin
  labelname := "LABEL"+int2str(labeltype)+"X";  
  if Find_object(labelname, CATEG_VIEW, pozice) then begin
    if Insert_object(labelname, CATEG_VIEW, pozice) then Signalize;
  end else
    if Edit_view(labelname) then Signalize;
end;

Viz