Klassendesign - wie umgehen mit bedingten Eigenschaften?

[Namenloser]

Der einfachste und allgemeinste Weg:

Delphi-Quellcode:

  TFoo = class
  strict private
    FHasFixBar: Boolean;
    FBar: Integer;
  public
    function GetBar(out Value: Integer): Boolean;
  end;


function TFoo.GetBar(out Value: Integer): Boolean;
begin
  Result := FHasFixBar;
  if Result then
    Value := FBar;
end;

Properties kann man dann halt nicht verwenden, aber eine saubere Schnittstelle finde ich wichtiger als syntaktischen Zucker.