TMyClass.ClassName?
Das ist
ein Class Property eine
Class Function.
Du hast diese Variable nicht initialisiert ... ich hoffe du freust dich über die
Exception.
(bei einer lokalen Variable)
Zitat:
Delphi-Quellcode:
var
MyClass: TMyClass;
begin
S := MyClass.ClassName;
end;
Und ja, das Andere geht auch
Delphi-Quellcode:
function GetClassName(C: TClass): string;
begin
Result := C.ClassName;
end;
oder wie währe es mit
S := TRttiContext.Create.GetType(TMyClass).Name;
?