Funkce Print

Print_view

function Print_view(var viewdef : string; base : tcursnum; firstrec, lastrec : trecnum) : Boolean;
BOOL Print_view(const char *viewdef, tcursnum base, trecnum firstrec, trecnum lastrec, void *reserved);
function Print_view(viewdef : PChar; base : tcursnum; firstrec, lastrec : trecnum; var reserved) : Boolean;

Parametry

viewdef	specifikace formulß°e, kter² mß b²t otev°en
base	otev°en² kurzor nebo konstanta NO_REDIR
firstrec	po°adovΘ Φφslo (internφ) prvnφho tiÜt∞nΘho zßznamu
lastrec	po°adovΘ Φφslo (internφ) poslednφho tiÜt∞nΘho zßznamu
reserved	procedura vyhrazenß pro budoucφ pou₧itφ, zadejte NULL resp. NIL;

Popis

Funkce Print_view vytiskne sestavu specifikovanou parametrem viewdef. Pokud parametr base mß jinou hodnotu ne₧ NO_REDIR, bude sestava p°esm∞rovßna na tento kurzor.

Do sestavy budou zahrnuty pouze ty zßznamy, jejich₧ po°adovß Φφsla spadajφ do intervalu od firstrec do lastrec.

DalÜφ parametry tisku lze p°edem zadat bu∩ interaktivn∞ pomocφ funkce Print_opt, nebo neinteraktivn∞ pomocφ funkcφ Print_copies, Set_printer, Print_margins a Printer_dialog. Pokud chcete, aby funkce Print_view tiskla rozsah zßznam∙ specifikovan² n∞kterou z t∞chto funkcφ, pak hodnoty parametr∙ firstrec a lastrec musφ b²t -1.

Parametry firstrec a lastrec se interpretujφ jako po°adovΘ Φφslo zßznamu.

Hodnota funkce

V p°φpad∞ ·sp∞chu funkce vracφ TRUE, jinak FALSE.

P°φklad

Vytisknout sestavu nad dotazem upraven²m z programu.

   if Open_cursor(Adr_reg) then Signalize //otev°φt pevn² dotaz
   else begin
     podm := "Adresar.cislo="+spom;
     if Restrict_cursor(Adr_reg,podm) then Signalize //z·₧it odpov∞∩
     else begin                  // zadat parametry tisku a tisknout
       if Print_opt(0) then Print_view("*S_histfirmy",Adr_reg,-1,-1);
       Restore_cursor(Adr_reg); // odstranit restrict
     end;
     Close_cursor(Adr_reg);     // zav°φt kurzor
   end;

Viz