Difference between revisions of "Default parameter/de"

From Lazarus wiki
Jump to navigationJump to search
(Created page with "{{Default parameter}} =Default Parameter= In einer procedure oder function, kann man auch Default Parameter deklarieren. Dabei muss beachtet...")
 
m (Fixed syntax highlighting)
 
(One intermediate revision by one other user not shown)
Line 6: Line 6:
  
 
Die letzten 2 Parameter haben Defaultwerte, und somit ist die erlaubt.
 
Die letzten 2 Parameter haben Defaultwerte, und somit ist die erlaubt.
<syntaxhighlight>
+
 
 +
<syntaxhighlight lang=pascal>
 
procedure Erlaubt(a: byte; b: byte = 4; c: byte = 5);
 
procedure Erlaubt(a: byte; b: byte = 4; c: byte = 5);
 
</syntaxhighlight>
 
</syntaxhighlight>
  
 
Nur der 2 Parameter hat eine Defaultwert und somit gibt dies einen Fehler.
 
Nur der 2 Parameter hat eine Defaultwert und somit gibt dies einen Fehler.
<syntaxhighlight>
+
 
 +
<syntaxhighlight lang=pascal>
 
procedure Verboten(a: byte; b: byte = 4; c: byte);
 
procedure Verboten(a: byte; b: byte = 4; c: byte);
 
</syntaxhighlight>
 
</syntaxhighlight>
Line 18: Line 20:
 
== Beispiel ==
 
== Beispiel ==
 
Diese Beispiel zeig eine Anwendung des Default Parameter.
 
Diese Beispiel zeig eine Anwendung des Default Parameter.
<syntaxhighlight>
+
 
 +
<syntaxhighlight lang=pascal>
 
program Example;
 
program Example;
  
Line 31: Line 34:
  
 
begin
 
begin
   Print('Hello ');      
+
   Print('Hello ');         // Entspricht Print('Hello ', False);
 
   Print('World !', True);
 
   Print('World !', True);
 
   Print('======', False);
 
   Print('======', False);

Latest revision as of 08:20, 12 February 2020

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