Einen Parameter, der eine Referenz erwartet, stattdesem einen Wert übergeben

[Bladefire]

Hallo,

Gibt es eine möglichkeit einer procedur, die eine Referenz erwartet, stattdesen einen Wert zu übergeben? (Ohne das ich extra eine zwischenvariable machen muss; Ohne dass ich etwas neu deklarieren muss)

Lg Simon

[Sir Rufo]

Nein

[Dejan Vu]

Stümmt.

[Sir Rufo]

Da Programmierer von Haus aus sehr (schreib-)faul sein sollen (DRY) behelfen sich die meisten mit einem Wrapper:

Delphi-Quellcode:

procedure foo( var AValue : string );
begin
  AValue := 'foo' + AValue;
end;

function foowrap( const AValue : string ): string;
begin
  Result := AValue;
  foo( Result );
end;

Schwupps ist das mit der Referenz gegessen ;)

[himitsu]

Zitat:

Zitat von Sir Rufo (Beitrag 1285209)

Nein

Na komm schon.

Will hier denn keiner ein wüstes Pointer-gecaste vorschlagen? :roll:

[p80286]

Zitat:

Zitat von himitsu (Beitrag 1285216)

Zitat:

Zitat von Sir Rufo (Beitrag 1285209)

Nein

Na komm schon.

Will hier denn keiner ein wüstes Pointer-gecaste vorschlagen? :roll:

Nö, wir kennen den Unterschied zwischen Nacht- und Koch-Topf.

Gruß
K-H

[Dejan Vu]

Delphi-Quellcode:

Procedure Foo (Var Bar : Integer);
Begin
  Inc(Bar);
End;

...

Foo (WildesPointerGeCaste(5))

Wie könnte 'WildesPointerGeCaste' denn aussehen? Und, muss ich befürchten, das 5 hinterher 6 ist? :stupid: