Funktion über ihren Namen als String aufrufen

[Sir Rufo]

Zitat von Der schöne Günther:

Ich habe zwar das Delphi Language Coding Standards Document oder den Object Pascal Style Guide zwar noch nicht durchgeackert. Aber darf man trotzdem fragen, warum eigentlich das A als Prefix?

Weil es dadurch klarer wird

Delphi-Quellcode:

type
  TMyClass = class
  strict private
    _Value : string; 
  private
    FValue : string;
    function GetValue : string;
  public
    function GetSomething( const AValue : string ) : string;
    property Value : string read GetValue;
  end;

function TMyClass.GetValue : string;
begin
  Result := '_' + FValue + '_';
end;

function TMyClass.GetSomething( const AValue : string ) : string;
var
  LValue : string;
begin
  LValue := 'Something';
  
  Result := 
    LValue + // local variable
    AValue + // attribute
    _Value + // strict private class field
    FValue + // private class field
    Value;   // property
end;