[fpc-pascal] Default value for an open array

kyan alfasud.ti at gmail.com
Fri Jun 1 16:58:45 CEST 2012


> However, given a declaration of that form, is it possible to define a
> default parameter of [] so that  OutputWriteF('Test, no params\n')  is
> valid?

Not for open arrays, but you can write an overloaded version without
the open array argument that calls the version with the open array
parameter passing an empty array, or an array initialised with
whatever "default" values you want:

interface

procedure OutputWriteF(const str: widestring); overload;
procedure OutputWriteF(const str: widestring; values: array of const); overload;

implementation

procedure OutputWriteF(const str: widestring);
begin
  OutputWriteF(str, [clBlack, clDefault]);
end;

procedure OutputWriteF(const str: widestring; values: array of const);
begin
 ...
end;

HTH

Constantine.



More information about the fpc-pascal mailing list