Doch Self gibt es auch in Klassenmethoden, allerdings liefert das nun eine Klassenreferenz und nicht eine Objektreferenz zurück. Man kriegt also ein TClass.
Delphi-Quellcode:
class procedure TForm1.Test;
var
s: TForm1;
begin
s := Self.Create(nil);
s.Show;
end;
erzeugt z.B. eine neue Instanz von TForm1 und zeigt sie an.