Set_printer

Internφ programovacφ jazykC/C++Pascal

procedure Set_printer(firstrec, lastrec : trecnum; firstpage, lastpage, direction : short; var outfile : string; leftmargin : short);
void Set_printer(trecnum firstrec, trecnum lastrec, int firstpage, int lastpage, int direction, const char *outfile, int leftmargin);
procedure Set_printer(firstrec, lastrec : trecnum; firstpage, lastpage, direction : integer; outfile : PChar; leftmargin : integer);

Parametry

firstrec internφ Φφslo prvnφho tiÜt∞nΘho zßznamu
lastrec internφ Φφslo poslednφho tiÜt∞nΘho zßznamu
firstpage Φφslo prvnφ tiÜt∞nΘ strßnky
lastpage Φφslo poslednφ tiÜt∞nΘ strßnky
direction zp∙sob generovßnφ sestavy:
outfile jmΘno v²stupnφho souboru; uplatnφ se pouze p°i direction = 2;
leftmargin velikost levΘho okraje sestavy v milimetrech (p°iΦte se ke standardnφmu okraji generovanΘmu tiskßrnou)

Popis

Procedura Set_printer provede nastavenφ parametr∙ vytvß°enφ sestav. Nastavenφ platφ a₧ do novΘho nastavenφ. Procedura Print_opt umo₧≥uje interaktivnφ nastavenφ t²ch₧ parametr∙.

Parametr direction nab²vß t∞chto hodnot:

Hodnota V²znam
0 tisk na tiskßrn∞,
1 kontrolnφ v²tisk na obrazovku (preview),
2 do textovΘho souboru zadanΘho parametrem outfile.

Zatφmco zßznamy se Φφslujφ od 0, strßnky se Φφslujφ od 1. ╚φsla strßnek se vztahujφ ke zvolenΘmu intervalu zßznam∙. Pokud jsou nap°. 3 zßznamy na strßnce, tisknete poΦφnaje zßznamem 100 a strßnkou 5, pak jako prvnφ se vytiskne zßznam s po°adov²m Φφslem 112.

Nastavenφ vÜech okraj∙ sestavy umo₧≥uje procedura Print_margins.

P°φklad

procedure Tiskx(idx : window_id);
{**************************************}
//tisk seznamu firem tlaΦφtkem z formulß°e... 
begin
  if Get_fcursor(idx,cursort,nil) then begin
     Set_printer(0,99999,1,99999,preview,"",10);
     Print_margins(10,0,10,10);
     Print_copies(kolikrat,true);
     Print_view("*Ptseznam",cursort,-1,-1);
  end;
end;

Viz