Deklarace procedury

Procedura se ve vnit°nφm programovacφm jazyce deklaruje zßpisem ve tvaru:

procedure identifikßtor
   (skupina_par; ... skupina_par);
blok; 

kde skupina_par je skupina parametr∙ ve tvaru:

identifikßtor, ... identifikßtor : identifikßtor_typu

nebo

var identifikßtor, ... identifikßtor : identifikßtor_typu

V prvnφm p°φpad∞ se parametry p°edßvajφ hodnotou, v druhΘm referencφ (odkazem). DatabßzovΘ sloupce nelze p°edßvat referencφ. Blok procedury je tvo°en p°φpadn²mi deklaracemi konstant, typ∙ a prom∞nn²ch a t∞lem procedury, kter²m je slo₧en² p°φkaz.

P°φklad:

procedure ReCard(idx : window_id; rec : integer);
{*************************************}
// znovuza°azenφ d°φve vy°azenΘ knihy zp∞t
var
  cx : cursor;
  trec : integer;
begin
  if YesNo_box('Otßzka','Opravdu si p°ejete znovu za°adit knihu mezi ostatnφ?') then 
    if Get_fcursor(idx,cx,nil) then
      if not Translate(cx,rec,0,trec) then begin
         Knihy[trec].vyrazena := false;
         Knihy[trec].dat_vyr := nonedate;
         Reset_view(id_vyr,-1,reset_deletions+reset_cursor);
         if idk > 0 then Reset_view(idk,-1,reset_deletions+reset_cursor);
      end;  
end;

Viz takΘ:

Vnit°nφ programovacφ jazyk

Programy

Deklarace v programech

P°ehled typ∙