Runtime Type Information (RTTI)/ru
From Lazarus wiki
Jump to navigationJump to searchThe printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.
│ English (en) │ français (fr) │ русский (ru) │
Информация времени выполнения (RTTI) может быть использована для получения мета-данных в приложениях Pascal.
Преобразование перечислимого типа в строку
Можно использовать RTTI для получения строки из перечисляемого типа.
type
TProgrammerType = (tpDelphi, tpVisualC, tpVB, tpJava) ;
uses TypInfo;
var
s: string;
begin
s := GetEnumName(TypeInfo(TProgrammerType), integer(tpDelphi));
// Здесь s = 'tpDelphi'
Вы также можете сделать это, без использования RTTI:
program noRTTI;
type
TProgrammerType = (tpDelphi, tpVisualC, tpVB, tpJava) ;
var
s: string;
begin
writestr(s,tpDelphi);
writeln(s);
end.