Procedure

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