Boolean var-Parameter in Prozedur mit Vorgabewert?

[Jasocul]

Wenn du die Prozedur zum Beispiel so änderst:

Delphi-Quellcode:

var
  BoolVar: Boolean;

procedure TestProc(a: string; x: Boolean = True);
begin
  BoolVar := x;
  .....
  BoolVar := not x;
end;

Hängt aber auch von deiner genauen Zielsetzung ab, die ich nicht bis ins letzte Detail kenne.

[bra]

Statt diesem ganzen unübersichtlichem Gepopel einfach eine zweite Prozedur anlegen, die nur einen Parameter hat und Prozedur mit Boolean ruft die ohne auf. Fertig.

Delphi-Quellcode:

procedure TestProc(a: string); overload;
begin
  .....
end; 

procedure TestProc(a: string; var x: Boolean); overload;
begin
  x := True;
  TestProc(a);
  x := False;
end;