Self nicht definiert (Static Class Method)

[nicodex]

Zitat von sirius:

Ich dachte bisher self existiert nirgends in einer class procedure

Self referenziert dann die Klasse.

Delphi-Quellcode:

type
  TFoo = class
  public
    class function Bar(): string;
  end;

class function TFoo.Bar(): string;
begin
  Result := Self.ClassName;
end;

edit: zu spät