Open Source "Logging Facade" für Pascal auf Github

[mjustin]

Zitat von Uwe Raabe:

Du kannst so etwas mit inline erreichen. Ohne das DEFINE Log sieht man schon keinen blauen Punkt for dem Log-Aufruf in Main.

Leider funktioniert das hier bei Delphi 2009 nicht im Fall von Interface - Methoden, der blaue Punkt bleibt bestehen:

Delphi-Quellcode:

program Project201601291;

{$APPTYPE CONSOLE}

type
  ITest = interface['{76BA1F8A-D171-4817-BB3D-337295B03CE0}']
    procedure Log;
  end;

  TTest = class(TInterfacedObject, ITest)
  public
    procedure Log; inline;
  end;

var
  T: ITest;

procedure TTest.Log;
begin
end;

begin
  T := TTest.Create;
  T.Log;
end.