Otevřít hlavní menu

Procedura je část programu, která vykonává specifickou akci, často v závislosti na množině parametrů.

Syntaxe
  procedure identifikátor;
NEBO
  procedure identifikátor ( parametry );


Popis
  • Záhlaví procedury určuje identifikátor procedury a seznam formálních parametrů (jestliže nějaké jsou).
  • Procedura je aktivována příkazem volání procedury.
  • Za záhlavím procedury následuje blok procedury, který obsahuje:
    • deklarační část lokálních objektům (konstanty, proměnné, procedury aj.)
    • příkazy mezi vyhrazenými slovy a , které určují vykonávanou posloupnost příkazů při volání procedury


Pro deklaraci procedury obsluhy přerušení použijte direktivu interrupt.


Místo deklarační a příkazové části může deklarace funkce obsahovat direktivy forward, external nebo inline.


Příklad

{;Deklarace procedury }
  procedure WrStr(X, Y: integer; S: string);
  var
    SaveX, SaveY: Integer;
  begin
    SaveX :=WhereX;
    SaveY :=WhereY;
    GotoXY(X, Y);
    Write(S);
    GotoXY(SaveX, SaveY);
  end;


Viz také

procedurální typové konstanty