Question

delphi有没有一个函数能将enum型转换成string型的

Answer 1

delphi 将枚举类型（缓握颂delphi 没有 enum 关键字）转换成 string 类型，可以借用 TypInfo 单元的相关函数，以下是示例代皮纯码：

Uses TypInfo;
  
//定义枚举类型  
type  
  TDayOfWeek=(Monday,Tuesday,Wednesday,Thursday,FriDay,Saturday,Sunday);  

procedure TForm1.Button1Click(Sender: TObject);
var
  s: string;
begin
  s := GetEnumName(TypeInfo(TDayOfWeek),Ord(Monday));
 扰郑 ShowMessage('枚举字符串：' + s);
end;