Default parameter/de

From Lazarus wiki
Jump to navigationJump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

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

Autor: Mathias