Variable Parameter bei Prozeduren/Funktionen?

[Ungeübter]

Hi,

gibt es in Delphi die Möglichkeit variable Parameter für Prozduren/Funktionen zu benutzen? Sprich Übergabeparameter die nicht zwingend bei jedem Aufruf übergeben werden müssen sondern eben nur wenn man sie innerhalb der Prozedur/Funktion áuch benutzt?

Gruß

[SirThornberry]

nicht das ich wüsste, aber du kannst einen pointer auf eine struktur übergeben und wenn dieser nil ist gibts logischer weise auch keine daten.

[xaromz]

Hallo,

ja, sowas gibst:
procedure Tuwas(X: Integer; Y: Integer = 10); Wenn Du Y nicht angibst, dann wird der Defaultwert genommen (im Beispiel 10).
Einzige Einschränkung: Optionale Parameter müssen am Ende stehen.

Gruß
xaromz

[SirThornberry]

naja, bei der variante wird aber dann eben ein wert übergeben und man weiß nicht ob es eben nichts ist oder zufällig jemand genau den dafault wert meint. Und so wie ich die frage verstanden hab soll ja nicht mit einem defaultwert irgendwas gemacht werden sondern gar nix wenn ein parameter nicht übergeben wird.

[xaromz]

Hallo,

dann muss man eben einen Default nehmen, der nicht vorkommen kann (z. B. MaxInt) ud entsprechend reagieren.

Gruß
xaromz

[nailor]

Delphi-Quellcode:

procedure Foo(i: integer); overload;
procedure Foo(i:integer; x: integer); overload;

geht auch

[dizzy]

Oder ein "array of const", wobei die Parameter dann arraymäßig übergeben werden müssen.

Delphi-Quellcode:

procedure TuWas(array of const);
begin
  // wirrer code :)
end;
.
.
begin
  TuWas([12,  4, 13]);
  TuWas([0 , 22,  8, 19]);
end;

//edit: Es ist eine procedure, keine function

[NicoDE]

Wenn Du versuchst Funktionen mit variabler Anzahl von Parametern zu schreiben, dann geht das nur mit externen (CBuilder) cdecl-Funktionen die eingebunden (linked) werden (siehe Doku zur varargs-Direktive).

[Ungeübter]

Ah, hätte mich ja auch gewundert wenn das nicht funktionieren würde. Dankeschön.