如何判断一个集合变量的值？？？ 并传为字符串_没分了。下次再给分(5分)

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject
const Rect: TRect;
DataCol: Integer
Column: TColumn
State: TGridDrawState);

其中的TgridDrawState是 TGridDrawState = set of (gdSelected, gdFocused, gdFixed);
当State=gdSelected + gdFocused

如何得到“gdSelectgdFocused"????

Use
TypInfo;

TypInfo里面有相应的函数,可以取得你要的值.

你选中DBGrid的一行，那么在DrawColumnCell这行的State便有gdSelected
同样
如果焦点在改行，那么在DrawColumnCell这行的State便有gdFocused
比较笨的方法
if gdFocused in State
then s:='gdFocused ';
if gdSelected in State
then s:=s+' gdSelected';
....