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 ');         // Entspricht Print('Hello ', False);
      Print('World !', True);
      Print('======', False);
      Print('=======', True);
    end.

Autor: Mathias

From the Free Pascal wiki, page "Default parameter/de", as the Internet Archive kept it on 2022-11-28. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.