Property einer Klasse als Var-Parameter einer Procedure übergeben

[Uwe Raabe]

Zitat von nahpets:

Delphi-Quellcode:

  // Oder so, wenn im Quelltext keine Auswertung von Error notwendig sein sollte.
  Edit1.Text := AssignTheValue('Beschreibung', Edit1.Text, 'Vorgabestring').Value;

Wenn keine Auswertung des Integer-Results notwendig ist, kann man auch gleich den String zurückgeben.

function TTestForm.AssignTheValue(const aDescription, aString1, aString2: String): String;