Default parameter/de

│ Deutsch (de) │ English (en) │ español (es) │ suomi (fi) │ français (fr) │ polski (pl) │ русский (ru) │

Default Parameter

In einer procedure oder function, kann man auch Default Parameter deklarieren. Dabei muss beachtet werden, das die nur bei den letzten Paramter gestattet ist.

Die letzten 2 Parameter haben Defaultwerte, und somit ist die erlaubt.

procedure Erlaubt(a: byte; b: byte = 4; c: byte = 5);

Nur der 2 Parameter hat eine Defaultwert und somit gibt dies einen Fehler.

procedure Verboten(a: byte; b: byte = 4; c: byte);

Beispiel

Diese Beispiel zeig eine Anwendung des Default Parameter.

program Example;

  procedure Print(s: string; LineEnd: boolean = False);
  begin
    if LineEnd then begin
      WriteLn(s);
    end else begin
      Write(s);
    end;
  end;

begin
  Print('Hello ');        
  Print('World !', True);
  Print('======', False);
  Print('=======', True);
end.

Autor: Mathias