集合转字符串的问题？？？没分了，下次再给 (10分)

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject
const Rect: TRect;
DataCol: Integer
Column: TColumn
State: TGridDrawState);
begin
memo1.Lines.add(GetEnumName(Typeinfo(TGridDrawState),Ord(State)));
为什么提这个错？？？ ord不能用于State??????????????????????????
==============================
[Error] Unit1.pas(39): Incompatible types

确实不可以，集合不是枚举。