Default parameter/de
From Lazarus wiki
Jump to navigationJump to search
│
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
